diff options
Diffstat (limited to 'lisp/calc/calc-aent.el')
| -rw-r--r-- | lisp/calc/calc-aent.el | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/lisp/calc/calc-aent.el b/lisp/calc/calc-aent.el index 712acfa686..5b93a54439 100644 --- a/lisp/calc/calc-aent.el +++ b/lisp/calc/calc-aent.el @@ -1020,11 +1020,9 @@ in Calc algebraic input.") x)) (defun math-remove-percentsigns (x) - (if (string-match "^%" x) - (setq x (concat "I#'" (substring x 1)))) (if (string-match "\\`\\(.*\\)%\\(.*\\)\\'" x) (math-remove-percentsigns - (concat (math-match-substring x 1) "'" (math-match-substring x 2))) + (concat (math-match-substring x 1) "o'o" (math-match-substring x 2))) x)) (defun math-restore-dashes (x) |