diff options
Diffstat (limited to 'lisp/calc')
| -rw-r--r-- | lisp/calc/calc-forms.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/calc/calc-forms.el b/lisp/calc/calc-forms.el index 99a8b949c42..0845fb151ab 100644 --- a/lisp/calc/calc-forms.el +++ b/lisp/calc/calc-forms.el @@ -81,7 +81,7 @@ (defun calc-date-notation (fmt arg) (interactive "sDate format (e.g., M/D/YY h:mm:ss): \nP") (calc-wrapper - (if (equal fmt "") + (if (string-match-p "\\`\\s-*\\'" fmt) (setq fmt "1")) (if (string-match "\\` *[0-9] *\\'" fmt) (setq fmt (nth (string-to-number fmt) calc-standard-date-formats))) |