Browse Source

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

Dan Davison 16 years ago
parent
commit
dc66d84ac4
1 changed files with 1 additions and 1 deletions
  1. 1 1
      lisp/org-babel.el

+ 1 - 1
lisp/org-babel.el

@@ -704,7 +704,7 @@ This is taken almost directly from `org-read-prop'."
 
 
 (defun org-babel-number-p (string)
 (defun org-babel-number-p (string)
   "Return t if STRING represents a number"
   "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)))
            (= (match-end 0) (length string)))
       (string-to-number string)))
       (string-to-number string)))