/[emacs]/emacs/lisp/calc/calc-incom.el
ViewVC logotype

Diff of /emacs/lisp/calc/calc-incom.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.5.4.1 by handa, Fri Apr 16 12:50:11 2004 UTC revision 1.5.4.2 by miles, Wed Oct 27 05:42:03 2004 UTC
# Line 183  Line 183 
183          (if calc-prev-prev-char          (if calc-prev-prev-char
184              (calcDigit-nondigit)              (calcDigit-nondigit)
185            (setq calc-digit-value nil)            (setq calc-digit-value nil)
186            (erase-buffer)            (let ((inhibit-read-only t))
187                (erase-buffer))
188            (exit-minibuffer)))            (exit-minibuffer)))
189      ;; just ignore extra decimal point, anticipating ".."      ;; just ignore extra decimal point, anticipating ".."
190      (delete-backward-char 1)))      (delete-backward-char 1)))

Legend:
Removed from v.1.5.4.1  
changed lines
  Added in v.1.5.4.2

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26