branch: externals/dismal
commit 1b5e0979becb3a0b936366fa76217cf4c6b41c9a
Author: Stefan Monnier <monn...@iro.umontreal.ca>
Commit: Stefan Monnier <monn...@iro.umontreal.ca>
* dismal.el (dis--formula-string-p): Fix regexp according to manual
---
dismal.el | 4 ++--
1 file changed, 2 insertions(+), 2 deletions(-)
diff --git a/dismal.el b/dismal.el
index e830717..caf9660 100644
--- a/dismal.el
+++ b/dismal.el
@@ -1,6 +1,6 @@
;;; dismal.el --- Dis Mode Ain't Lotus: Spreadsheet program Emacs
-;; Copyright (C) 1993-2018 Free Software Foundation, Inc.
+;; Copyright (C) 1993-2019 Free Software Foundation, Inc.
;; Author: David Fox, f...@cs.nyu.edu
;; Frank E. Ritter, rit...@cs.cmu.edu
@@ -6089,7 +6089,7 @@ can use."
; (setq item "(if (> 3 4) nil 4)")
(defun dis--formula-string-p (item) ;;(dis--formula-string-p "(* 34 34)")
(and (stringp item) ;;(dis--formula-string-p "(/ (float 3) (float
3))")
- (string-match "^([a-zA-Z .0-9:$---/^\"+=<>\\]*)$" item)
+ (string-match "\\`(.*)\\'" item)
(fboundp (car (car (read-from-string item))))))
; (dismal-char-col-to-dismal-col 50)
