[Emacs-diffs] emacs/lisp ChangeLog calculator.el

[Juanma Barranquero]

CVSROOT:        /cvsroot/emacs
Module name:    emacs
Changes by:     Juanma Barranquero <lektu>      08/11/25 00:30:53

Modified files:
        lisp           : ChangeLog calculator.el 

Log message:
        * calculator.el (calculator-op-or-exp): Reflow docstring.
          (calculator-remove-zeros, calculator-repR, calculator-repL):
          Fix typos in docstrings.

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/ChangeLog?cvsroot=emacs&r1=1.14857&r2=1.14858
http://cvs.savannah.gnu.org/viewcvs/emacs/lisp/calculator.el?cvsroot=emacs&r1=1.38&r2=1.39

Patches:
Index: ChangeLog
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/ChangeLog,v
retrieving revision 1.14857
retrieving revision 1.14858
diff -u -b -r1.14857 -r1.14858
--- ChangeLog   24 Nov 2008 21:19:46 -0000      1.14857
+++ ChangeLog   25 Nov 2008 00:30:47 -0000      1.14858
@@ -1,3 +1,9 @@
+2008-11-25  Juanma Barranquero  <address@hidden>
+
+       * calculator.el (calculator-op-or-exp): Reflow docstring.
+       (calculator-remove-zeros, calculator-repR, calculator-repL):
+       Fix typos in docstrings.
+
 2008-11-24  Chong Yidong  <address@hidden>
 
        * log-view.el (log-view-annotate-version): Let vc-annotate manage

Index: calculator.el
===================================================================
RCS file: /cvsroot/emacs/emacs/lisp/calculator.el,v
retrieving revision 1.38
retrieving revision 1.39
diff -u -b -r1.38 -r1.39
--- calculator.el       6 May 2008 08:02:25 -0000       1.38
+++ calculator.el       25 Nov 2008 00:30:52 -0000      1.39
@@ -996,8 +996,8 @@
               (calculator-standard-displayer 'right (cadr disp))))))))
 
 (defun calculator-remove-zeros (numstr)
-  "Get a number string NUMSTR and remove unnecessary zeroes.
-the behavior of this function is controlled by
+  "Get a number string NUMSTR and remove unnecessary zeros.
+The behavior of this function is controlled by
 `calculator-remove-zeros'."
   (cond ((and (eq calculator-remove-zeros t)
               (string-match "\\.0+\\([eE][+-]?[0-9]*\\)?$" numstr))
@@ -1457,8 +1457,7 @@
 (defun calculator-op-or-exp ()
   "Either enter an operator or a digit.
 Used with +/- for entering them as digits in numbers like 1e-3 (there is
-no need for negative numbers since these are handled by unary
-operators)."
+no need for negative numbers since these are handled by unary operators)."
   (interactive)
   (if (and (not calculator-display-fragile)
            calculator-curnum
@@ -1755,7 +1754,7 @@
   (calculator-quit))
 
 (defun calculator-repR (x)
-  "Repeats the last binary operation with its second argument and X.
+  "Repeat the last binary operation with its second argument and X.
 To use this, apply a binary operator (evaluate it), then call this."
   (if calculator-last-opXY
     ;; avoid rebinding calculator-last-opXY
@@ -1765,7 +1764,7 @@
     x))
 
 (defun calculator-repL (x)
-  "Repeats the last binary operation with its first argument and X.
+  "Repeat the last binary operation with its first argument and X.
 To use this, apply a binary operator (evaluate it), then call this."
   (if calculator-last-opXY
     ;; avoid rebinding calculator-last-opXY