瀏覽代碼

Fix calc-eval date(<timestamp>)

Benjamin Andresen 14 年之前
父節點
當前提交
a493b4d489
共有 1 個文件被更改,包括 1 次插入0 次删除
  1. 1 0
      lisp/org-table.el

+ 1 - 0
lisp/org-table.el

@@ -3213,6 +3213,7 @@ For example:  28 -> AB."
 	  (sec (string-to-number (match-string 3 s))))
       (+ (* hour 3600) (* min 60) sec)))
    ((and (stringp s)
+	 (not (string-match org-ts-regexp-both s))
 	 (string-match "\\([0-9]+\\):\\([0-9]+\\)" s))
     (let ((min (string-to-number (match-string 1 s)))
 	  (sec (string-to-number (match-string 2 s))))