# HG changeset patch
# User Eli Zaretskii <eliz@gnu.org>
# Date 1005636447 0
# Node ID e29926a2ef595dbf3cb4955fd3718277357111e9
# Parent  eb1e014ea09c3fd933e3fec66f5abca461ba94be
(calc-do-alg-entry): Use
`blink-paren-function' instead of `blink-paren-hook'.

diff -r eb1e014ea09c -r e29926a2ef59 lisp/calc/calc-aent.el
--- a/lisp/calc/calc-aent.el	Tue Nov 13 07:10:57 2001 +0000
+++ b/lisp/calc/calc-aent.el	Tue Nov 13 07:27:27 2001 +0000
@@ -1,5 +1,5 @@
 ;; Calculator for GNU Emacs, part I [calc-aent.el]
-;; Copyright (C) 1990, 1991, 1992, 1993 Free Software Foundation, Inc.
+;; Copyright (C) 1990, 1991, 1992, 1993, 2001 Free Software Foundation, Inc.
 ;; Written by Dave Gillespie, daveg@synaptics.com.
 
 ;; This file is part of GNU Emacs.
@@ -298,7 +298,7 @@
 
 (defun calc-do-alg-entry (&optional initial prompt no-normalize)
   (let* ((calc-buffer (current-buffer))
-	 (blink-paren-hook 'calcAlg-blink-matching-open)
+	 (blink-paren-function 'calcAlg-blink-matching-open)
 	 (alg-exp 'error))
     (if (boundp 'calc-alg-ent-map)
 	()