[Emacs-diffs] /srv/bzr/emacs/trunk r109222: calccomp.el (math-compose-expr): Use parentheses when

[Jay Belanger]

------------------------------------------------------------
revno: 109222
committer: Jay Belanger <address@hidden>
branch nick: trunk
timestamp: Thu 2012-07-26 22:48:40 -0500
message:
  calccomp.el (math-compose-expr): Use parentheses when
  there is a product in the denominator of a fraction.
modified:
  lisp/ChangeLog
  lisp/calc/calccomp.el

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2012-07-26 17:10:21 +0000
+++ b/lisp/ChangeLog    2012-07-27 03:48:40 +0000
@@ -1,3 +1,8 @@
+2012-07-27  Jay Belanger  <address@hidden>
+
+       * calc/calccomp.el (math-compose-expr): Use parentheses when
+       there is a product in the denominator of a fraction.
+
 2012-07-26  Eli Zaretskii  <address@hidden>
 
        * makefile.w32-in ($(lisp)/calendar/cal-loaddefs.el)

=== modified file 'lisp/calc/calccomp.el'
--- a/lisp/calc/calccomp.el     2012-01-19 07:21:25 +0000
+++ b/lisp/calc/calccomp.el     2012-07-27 03:48:40 +0000
@@ -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