mirror/emacs
1
0
Fork 0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2025-01-02 11:21:42 +00:00
Code Issues Releases Activity

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

Browse Source
This commit is contained in:
Lute Kamstra 2005-05-26 12:16:05 +00:00
parent 21a88c56b3
commit e3e4b1f233
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lisp/array.el
View File

@ -872,6 +872,7 @@ take a numeric prefix argument):
Entering array mode calls the function `array-mode-hook'." Entering array mode calls the function `array-mode-hook'."
(interactive) (interactive)
(kill-all-local-variables)
;; Number of rows in the array. ;; Number of rows in the array.
(make-local-variable 'array-max-row) (make-local-variable 'array-max-row)
;; Number of columns in the array. ;; Number of columns in the array.
@ -907,7 +908,7 @@ Entering array mode calls the function `array-mode-hook'."
(setq truncate-lines t) (setq truncate-lines t)
(setq overwrite-mode 'overwrite-mode-textual) (setq overwrite-mode 'overwrite-mode-textual)
(use-local-map array-mode-map) (use-local-map array-mode-map)
(run-hooks 'array-mode-hook)) (run-mode-hooks 'array-mode-hook))