(array-mode): Use kill-all-local-variables and run-mode-hooks.

diff --git a/lisp/array.el b/lisp/array.el
index f65f14ac5506b07c66270bfed8f4b4ae94d7d4e6..2f270d0f0860a94ce2cd4efd89414c5ba9b9bc3c 100644 (file)
--- a/lisp/array.el
+++ b/lisp/array.el
@@ -872,6 +872,7 @@ take a numeric prefix argument):
 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 @@ Entering array mode calls the function `array-mode-hook'."
   (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))
 
 \f