diff options
| -rw-r--r-- | lisp/calc/calc-aent.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/calc/calc-aent.el b/lisp/calc/calc-aent.el index 4441989603f..bceb1f68a04 100644 --- a/lisp/calc/calc-aent.el +++ b/lisp/calc/calc-aent.el | |||
| @@ -1,5 +1,5 @@ | |||
| 1 | ;; Calculator for GNU Emacs, part I [calc-aent.el] | 1 | ;; Calculator for GNU Emacs, part I [calc-aent.el] |
| 2 | ;; Copyright (C) 1990, 1991, 1992, 1993 Free Software Foundation, Inc. | 2 | ;; Copyright (C) 1990, 1991, 1992, 1993, 2001 Free Software Foundation, Inc. |
| 3 | ;; Written by Dave Gillespie, daveg@synaptics.com. | 3 | ;; Written by Dave Gillespie, daveg@synaptics.com. |
| 4 | 4 | ||
| 5 | ;; This file is part of GNU Emacs. | 5 | ;; This file is part of GNU Emacs. |
| @@ -298,7 +298,7 @@ | |||
| 298 | 298 | ||
| 299 | (defun calc-do-alg-entry (&optional initial prompt no-normalize) | 299 | (defun calc-do-alg-entry (&optional initial prompt no-normalize) |
| 300 | (let* ((calc-buffer (current-buffer)) | 300 | (let* ((calc-buffer (current-buffer)) |
| 301 | (blink-paren-hook 'calcAlg-blink-matching-open) | 301 | (blink-paren-function 'calcAlg-blink-matching-open) |
| 302 | (alg-exp 'error)) | 302 | (alg-exp 'error)) |
| 303 | (if (boundp 'calc-alg-ent-map) | 303 | (if (boundp 'calc-alg-ent-map) |
| 304 | () | 304 | () |