summaryrefslogtreecommitdiff
path: root/lisp/calc/calc-forms.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/calc/calc-forms.el')
-rw-r--r--lisp/calc/calc-forms.el2
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)))