emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

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


From: Andreas Schwab
Subject: [Emacs-diffs] Changes to emacs/lisp/calc/calc.el
Date: Fri, 08 Feb 2002 07:32:00 -0500

Index: emacs/lisp/calc/calc.el
diff -c emacs/lisp/calc/calc.el:1.8 emacs/lisp/calc/calc.el:1.9
*** emacs/lisp/calc/calc.el:1.8 Thu Dec 20 13:50:30 2001
--- emacs/lisp/calc/calc.el     Fri Feb  8 07:32:00 2002
***************
*** 1,6 ****
  ;;; calc.el --- the GNU Emacs calculator
  
! ;; Copyright (C) 1990, 1991, 1992, 1993, 2001 Free Software Foundation, Inc.
  
  ;; Author: David Gillespie <address@hidden>
  ;; Maintainer: Colin Walters <address@hidden>
--- 1,6 ----
  ;;; calc.el --- the GNU Emacs calculator
  
! ;; Copyright (C) 1990, 1991, 1992, 1993, 2001, 2002 Free Software Foundation, 
Inc.
  
  ;; Author: David Gillespie <address@hidden>
  ;; Maintainer: Colin Walters <address@hidden>
***************
*** 2076,2082 ****
        (setq last-command-char (upcase last-command-char)))
      (cond
       ((memq last-command-char '(?_ ?n))
!       (goto-char (point-min))
        (if (and (search-forward " +/- " nil t)
               (not (search-forward "e" nil t)))
          (beep)
--- 2076,2082 ----
        (setq last-command-char (upcase last-command-char)))
      (cond
       ((memq last-command-char '(?_ ?n))
!       (goto-char (minibuffer-prompt-end))
        (if (and (search-forward " +/- " nil t)
               (not (search-forward "e" nil t)))
          (beep)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]