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

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

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

revision 1.17 by jpb, Tue Oct 19 14:21:31 2004 UTC revision 1.18 by jpb, Tue Oct 19 14:41:50 2004 UTC
# Line 1393  calc-kill calc-kill-region calc-yank)))) Line 1393  calc-kill calc-kill-region calc-yank))))
1393                         (and (>= last-command-char 0) (< last-command-char ? )                         (and (>= last-command-char 0) (< last-command-char ? )
1394                              (not (memq last-command-char '(?\e)))))                              (not (memq last-command-char '(?\e)))))
1395                     (calc-wrapper))  ; clear flags if not a Calc command.                     (calc-wrapper))  ; clear flags if not a Calc command.
1396                 (if calc-emacs-type-19                 (setq last-command-event (cdr event))
                    (setq last-command-event (cdr event)))  
1397                 (if (or (not (integerp last-command-char))                 (if (or (not (integerp last-command-char))
1398                         (eq last-command-char ?-))                         (eq last-command-char ?-))
1399                     (calc-unread-command)                     (calc-unread-command)

Legend:
Removed from v.1.17  
changed lines
  Added in v.1.18

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