/[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.6 by miles, Mon Sep 1 15:45:18 2003 UTC revision 1.7 by jpb, Mon Oct 25 13:57:20 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.6  
changed lines
  Added in v.1.7

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