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

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

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

revision 1.1 by eliz, Tue Nov 6 18:59:06 2001 UTC revision 1.2 by eliz, Tue Nov 13 07:29:02 2001 UTC
# Line 1  Line 1 
1  ;; Calculator for GNU Emacs, part I [calc-misc.el]  ;; Calculator for GNU Emacs, part I [calc-misc.el]
2  ;; Copyright (C) 1990, 1991, 1992, 1993 Free Software Foundation, Inc.  ;; Copyright (C) 1990, 1991, 1992, 1993, 2001 Free Software Foundation, Inc.
3  ;; Written by Dave Gillespie, daveg@synaptics.com.  ;; Written by Dave Gillespie, daveg@synaptics.com.
4    
5  ;; This file is part of GNU Emacs.  ;; This file is part of GNU Emacs.
# Line 108  Calc user interface as before (either M- Line 108  Calc user interface as before (either M-
108      (if cwin      (if cwin
109          (setq calc-full-mode          (setq calc-full-mode
110                (if kwin                (if kwin
111                    (and twin (eq (window-width twin) (screen-width)))                    (and twin (eq (window-width twin) (frame-width)))
112                  (eq (window-height cwin) (1- (screen-height))))))                  (eq (window-height cwin) (1- (frame-height))))))
113      (setq calc-full-mode (if arg      (setq calc-full-mode (if arg
114                               (> (prefix-numeric-value arg) 0)                               (> (prefix-numeric-value arg) 0)
115                             (not calc-full-mode)))                             (not calc-full-mode)))
# Line 759  loaded and the keystroke automatically r Line 759  loaded and the keystroke automatically r
759    
760    
761  (defun math-do-working (msg arg)  (defun math-do-working (msg arg)
762    (or executing-macro    (or executing-kbd-macro
763        (progn        (progn
764          (calc-set-command-flag 'clear-message)          (calc-set-command-flag 'clear-message)
765          (if math-working-step          (if math-working-step

Legend:
Removed from v.1.1  
changed lines
  Added in v.1.2

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