Skip to content
GitLab
Projects
Groups
Snippets
Help
Loading...
Help
What's new
7
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Open sidebar
emacs
emacs
Commits
6292c599
Commit
6292c599
authored
Nov 02, 2009
by
Jay Belanger
Browse files
Options
Browse Files
Download
Email Patches
Plain Diff
(calc-date-notation): Check to see if the format is whitespace
instead of only the empty string.
parent
0f063651
Changes
2
Hide whitespace changes
Inline
Side-by-side
Showing
2 changed files
with
6 additions
and
1 deletion
+6
-1
lisp/ChangeLog
lisp/ChangeLog
+5
-0
lisp/calc/calc-forms.el
lisp/calc/calc-forms.el
+1
-1
No files found.
lisp/ChangeLog
View file @
6292c599
2009-11-02 Jay Belanger <jay.p.belanger@gmail.com>
* calc/calc-forms.el (calc-date-notation): Allow a "blank string"
to be made up of whitespace.
2009-11-02 Chong Yidong <cyd@stupidchicken.com>
* minibuffer.el (read-file-name): Don't use file dialogs for
...
...
lisp/calc/calc-forms.el
View file @
6292c599
...
...
@@ -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
)))
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment