summaryrefslogtreecommitdiff
path: root/lisp/calc/calccomp.el
diff options
context:
space:
mode:
authorJay Belanger <jay.p.belanger@gmail.com>2012-07-26 22:48:40 -0500
committerJay Belanger <jay.p.belanger@gmail.com>2012-07-26 22:48:40 -0500
commitca1302a40a560521627fd6a2954a51a79d105a16 (patch)
treecb14770069d5f17aa818806f36f035b57a701978 /lisp/calc/calccomp.el
parent6195f3845db9aa785e644f55c86270788b293740 (diff)
downloademacs-ca1302a40a560521627fd6a2954a51a79d105a16.tar.gz
calccomp.el (math-compose-expr): Use parentheses when
there is a product in the denominator of a fraction.
Diffstat (limited to 'lisp/calc/calccomp.el')
-rw-r--r--lisp/calc/calccomp.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/lisp/calc/calccomp.el b/lisp/calc/calccomp.el
index d8ad7e2cede..73e745bcf75 100644
--- a/lisp/calc/calccomp.el
+++ b/lisp/calc/calccomp.el
@@ -87,7 +87,8 @@
sn)))
(defun math-compose-expr (a prec)
- (let ((math-compose-level (1+ math-compose-level))
+ (let ((calc-multiplication-has-precedence nil)
+ (math-compose-level (1+ math-compose-level))
(math-expr-opers (math-expr-ops))
spfn)
(cond