[Emacs-diffs] Changes to emacs/lisp/calculator.el

[Juri Linkov]

Index: emacs/lisp/calculator.el
diff -c emacs/lisp/calculator.el:1.19 emacs/lisp/calculator.el:1.20
*** emacs/lisp/calculator.el:1.19       Sat Jul 16 17:31:53 2005
--- emacs/lisp/calculator.el    Mon Jul 18 15:16:47 2005
***************
*** 4,10 ****
  
  ;; Author: Eli Barzilay <address@hidden>
  ;; Keywords: tools, convenience
! ;; Time-stamp: <26 May 2005, 14:32:34, Lute Kamstra, pijl>
  
  ;; This file is part of GNU Emacs.
  
--- 4,10 ----
  
  ;; Author: Eli Barzilay <address@hidden>
  ;; Keywords: tools, convenience
! ;; Time-stamp: <2005-07-18 17:45:34 juri>
  
  ;; This file is part of GNU Emacs.
  
***************
*** 1594,1600 ****
          (calculator-displayers
           (if calculator-copy-displayer nil calculator-displayers)))
      (calculator-enter)
!     ;; remove trailing spaces and and an index
      (let ((s (cdr calculator-stack-display)))
        (and s
             (if (string-match "^\\([^ ]+\\) *\\(\\[[0-9/]+\\]\\)? *$" s)
--- 1594,1600 ----
          (calculator-displayers
           (if calculator-copy-displayer nil calculator-displayers)))
      (calculator-enter)
!     ;; remove trailing spaces and an index
      (let ((s (cdr calculator-stack-display)))
        (and s
             (if (string-match "^\\([^ ]+\\) *\\(\\[[0-9/]+\\]\\)? *$" s)