# HG changeset patch
# User Lute Kamstra <lute@gnu.org>
# Date 1117109765 0
# Node ID d07ea6e0706b6ad72429134593a26e74df328c5e
# Parent  ec0621e2b94fe0fd246d6e1ba6054e32489991ea
(array-mode): Use kill-all-local-variables and run-mode-hooks.

diff -r ec0621e2b94f -r d07ea6e0706b lisp/array.el
--- a/lisp/array.el	Thu May 26 12:11:10 2005 +0000
+++ b/lisp/array.el	Thu May 26 12:16:05 2005 +0000
@@ -872,6 +872,7 @@
 Entering array mode calls the function `array-mode-hook'."
 
   (interactive)
+  (kill-all-local-variables)
   ;; Number of rows in the array.
   (make-local-variable 'array-max-row)
   ;; Number of columns in the array.
@@ -907,7 +908,7 @@
   (setq truncate-lines t)
   (setq overwrite-mode 'overwrite-mode-textual)
   (use-local-map array-mode-map)
-  (run-hooks 'array-mode-hook))
+  (run-mode-hooks 'array-mode-hook))