Alter org-babel-number-p so that it recognises negative numbers

This commit is contained in:
Dan Davison 2009-09-04 23:06:05 -04:00
parent b085fafc8b
commit dc66d84ac4
1 changed files with 1 additions and 1 deletions

View File

@ -704,7 +704,7 @@ This is taken almost directly from `org-read-prop'."
(defun org-babel-number-p (string)
"Return t if STRING represents a number"
(if (and (string-match "^[[:digit:]]*\\.?[[:digit:]]*$" string)
(if (and (string-match "^-?[[:digit:]]*\\.?[[:digit:]]*$" string)
(= (match-end 0) (length string)))
(string-to-number string)))