mirror of
https://git.savannah.gnu.org/git/emacs.git
synced 2025-01-28 19:42:02 +00:00
(idlwave-shell-mode): Do not use make-local-hook.
This commit is contained in:
parent
4924ca44cb
commit
1affb21658
@ -4,7 +4,7 @@
|
||||
;; Author: Chris Chase <chase@att.com>
|
||||
;; Maintainer: John-David Smith <jdsmith@astro.cornell.edu>
|
||||
;; Version: 4.7
|
||||
;; Date: $Date: 2001/11/27 15:52:51 $
|
||||
;; Date: $Date: 2001/12/01 12:54:29 $
|
||||
;; Keywords: processes
|
||||
|
||||
;; This file is part of GNU Emacs.
|
||||
@ -723,7 +723,6 @@ IDL has currently stepped.")
|
||||
(setq idlwave-shell-sources-alist nil)
|
||||
(setq idlwave-shell-default-directory default-directory)
|
||||
(setq idlwave-shell-hide-output nil)
|
||||
(make-local-hook 'kill-buffer-hook)
|
||||
(add-hook 'kill-buffer-hook 'idlwave-shell-kill-shell-buffer-confirm
|
||||
nil 'local)
|
||||
(add-hook 'kill-buffer-hook 'idlwave-shell-delete-temp-files nil 'local)
|
||||
@ -739,7 +738,6 @@ IDL has currently stepped.")
|
||||
(set-syntax-table idlwave-mode-syntax-table)
|
||||
(set (make-local-variable 'comment-start) ";")
|
||||
(setq abbrev-mode t)
|
||||
(make-local-hook 'post-command-hook)
|
||||
(add-hook 'post-command-hook 'idlwave-command-hook nil t)
|
||||
|
||||
;; Run the hooks.
|
||||
|
Loading…
Reference in New Issue
Block a user