summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorMattias Engdegård <mattiase@acm.org>2021-01-19 11:55:13 +0100
committerMattias Engdegård <mattiase@acm.org>2021-01-19 16:11:51 +0100
commit5369b69bd86ee6d9565a82842cbeb37749cd5a6b (patch)
tree3897e7f16123ff2aef559bee9598e8c61d24349b
parent297edbebec5eaf2924f65bd2015b65d16cbf9254 (diff)
downloademacs-5369b69bd86ee6d9565a82842cbeb37749cd5a6b.tar.gz
Parse square root sign in embedded Calc mode
* lisp/calc/calc-lang.el (math-read-big-rec): Recognise √ since it may be used in Big mode.
-rw-r--r--lisp/calc/calc-lang.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/calc/calc-lang.el b/lisp/calc/calc-lang.el
index b4b2d4cc4f4..0117f449dd5 100644
--- a/lisp/calc/calc-lang.el
+++ b/lisp/calc/calc-lang.el
@@ -2181,7 +2181,7 @@ order to Calc's."
v math-read-big-baseline))
;; Small radical sign.
- ((and (= other-char ?V)
+ ((and (memq other-char '(?V ?√))
(= (math-read-big-char (1+ math-rb-h1) (1- v)) ?\_))
(setq h (1+ math-rb-h1))
(math-read-big-emptyp math-rb-h1 math-rb-v1 h (1- v) nil t)