diff options
| author | Jay Belanger <[email protected]> | 2004-11-23 05:58:20 +0000 |
|---|---|---|
| committer | Jay Belanger <[email protected]> | 2004-11-23 05:58:20 +0000 |
| commit | c4446fc2e900c69730162fa816ee45ec8290a464 (patch) | |
| tree | ed0e562421c5111e2e16a9617a1bf1f635188667 /lisp/calc/calc-aent.el | |
| parent | 66c2cf664e9cb9053bcdaa7169fd64b2db32bd3a (diff) | |
(math-read-exprs): Filter input through math-read-preprocess-string.
Diffstat (limited to 'lisp/calc/calc-aent.el')
| -rw-r--r-- | lisp/calc/calc-aent.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/calc/calc-aent.el b/lisp/calc/calc-aent.el index 182b3b0635..a615ec5062 100644 --- a/lisp/calc/calc-aent.el +++ b/lisp/calc/calc-aent.el @@ -3,8 +3,7 @@ ;; Copyright (C) 1990, 1991, 1992, 1993, 2001 Free Software Foundation, Inc. ;; Author: Dave Gillespie <[email protected]> -;; Maintainers: D. Goel <[email protected]> -;; Colin Walters <[email protected]> +;; Maintainer: Jay Belanger <[email protected]> ;; This file is part of GNU Emacs. @@ -473,6 +472,7 @@ (math-exp-old-pos 0) (math-exp-keep-spaces nil) math-exp-token math-expr-data) + (setq math-exp-str (math-read-preprocess-string math-exp-str)) (if calc-language-input-filter (setq math-exp-str (funcall calc-language-input-filter math-exp-str))) (while (setq math-exp-token (string-match "\\.\\.\\([^.]\\|.[^.]\\)" math-exp-str)) |