Mercurial > emacs
changeset 59265:eb45d1b6dbc3
(calcVar-digit, calcVar-oper): Remove need for "var-" at the
beginning of the minibuffer.
author | Jay Belanger <jay.p.belanger@gmail.com> |
---|---|
date | Fri, 31 Dec 2004 20:36:48 +0000 |
parents | b7ebbcf3b120 |
children | b462b7b828d1 |
files | lisp/calc/calc-store.el |
diffstat | 1 files changed, 2 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/calc/calc-store.el Fri Dec 31 18:16:10 2004 +0000 +++ b/lisp/calc/calc-store.el Fri Dec 31 20:36:48 2004 +0000 @@ -200,7 +200,7 @@ (defun calcVar-digit () (interactive) - (if (calc-minibuffer-contains "var-\\'") + (if (calc-minibuffer-contains "\\'") (if (eq calc-store-opers 0) (beep) (insert "q") @@ -210,7 +210,7 @@ (defun calcVar-oper () (interactive) (if (and (eq calc-store-opers t) - (calc-minibuffer-contains "var-\\'")) + (calc-minibuffer-contains "\\'")) (progn (erase-buffer) (self-insert-and-exit))