org-table: Correctly match ".[0-9]+" as a number

* lisp/org-table.el (org-table-copy-down): Correctly match
".[0-9]+" as a number.
This commit is contained in:
Bastien 2017-12-29 18:14:42 +01:00
parent e401afffde
commit d792b57ffc
1 changed files with 1 additions and 1 deletions

View File

@ -1166,7 +1166,7 @@ to a number. In the case of a timestamp, increment by days."
(- (org-time-string-to-absolute txt)
(org-time-string-to-absolute txt-up)))
((string-match org-ts-regexp3 txt) 1)
((string-match "\\([-+]\\)?[0-9]+\\(?:\.[0-9]+\\)?" txt-up)
((string-match "\\([-+]\\)?\\(?:[0-9]+\\)?\\(?:\.[0-9]+\\)?" txt-up)
(- (string-to-number txt)
(string-to-number (match-string 0 txt-up))))
(t 1)))