[Emacs-diffs] Changes to emacs/lisp/calc/calc-misc.el [lexbind]

[Miles Bader]

Index: emacs/lisp/calc/calc-misc.el
diff -c emacs/lisp/calc/calc-misc.el:1.8.2.3 
emacs/lisp/calc/calc-misc.el:1.8.2.4
*** emacs/lisp/calc/calc-misc.el:1.8.2.3        Mon Oct 25 04:19:45 2004
--- emacs/lisp/calc/calc-misc.el        Fri Oct 29 02:05:13 2004
***************
*** 130,138 ****
                 "Now using full screen for Calc"
               "Now using partial screen for Calc"))))
  
! (defun calc-other-window ()
    "Invoke the Calculator in another window."
!   (interactive)
    (if (memq major-mode '(calc-mode calc-trail-mode))
        (progn
        (other-window 1)
--- 130,138 ----
                 "Now using full screen for Calc"
               "Now using partial screen for Calc"))))
  
! (defun calc-other-window (&optional interactive)
    "Invoke the Calculator in another window."
!   (interactive "p")
    (if (memq major-mode '(calc-mode calc-trail-mode))
        (progn
        (other-window 1)
***************
*** 141,147 ****
      (if (get-buffer-window "*Calculator*")
        (calc-quit)
        (let ((win (selected-window)))
!       (calc nil win (interactive-p))))))
  
  (defun another-calc ()
    "Create another, independent Calculator buffer."
--- 141,147 ----
      (if (get-buffer-window "*Calculator*")
        (calc-quit)
        (let ((win (selected-window)))
!       (calc nil win interactive)))))
  
  (defun another-calc ()
    "Create another, independent Calculator buffer."