|
@@ -2705,7 +2705,7 @@ not overwrite the stored one."
|
|
(if lispp
|
|
(if lispp
|
|
(setq ev (condition-case nil
|
|
(setq ev (condition-case nil
|
|
(eval (eval (read form)))
|
|
(eval (eval (read form)))
|
|
- (user-error "#ERROR"))
|
|
|
|
|
|
+ (error "#ERROR"))
|
|
ev (if (numberp ev) (number-to-string ev) ev)
|
|
ev (if (numberp ev) (number-to-string ev) ev)
|
|
ev (if duration (org-table-time-seconds-to-string
|
|
ev (if duration (org-table-time-seconds-to-string
|
|
(string-to-number ev)
|
|
(string-to-number ev)
|