Replace use of the obsolete write-contents-hooks
* lisp/play/gametree.el (gametree-mode): Replace write-contents-hooks, obsolete since 22.1, with write-contents-functions. ; * lisp/files.el: Related comment.
This commit is contained in:
parent
e067f1fd9f
commit
6b80a585c7
2 changed files with 2 additions and 2 deletions
|
@ -521,6 +521,7 @@ updates before the buffer is saved, use `before-save-hook'.")
|
|||
(put 'local-write-file-hooks 'permanent-local t)
|
||||
(make-obsolete-variable 'local-write-file-hooks 'write-file-functions "22.1")
|
||||
|
||||
;; I found some files still using the obsolete form in 2018.
|
||||
(define-obsolete-variable-alias 'write-contents-hooks
|
||||
'write-contents-functions "22.1")
|
||||
(defvar write-contents-functions nil
|
||||
|
|
|
@ -586,8 +586,7 @@ shogi, etc.) players, it is a slightly modified version of Outline mode.
|
|||
|
||||
\\{gametree-mode-map}"
|
||||
(auto-fill-mode 0)
|
||||
(make-local-variable 'write-contents-hooks)
|
||||
(add-hook 'write-contents-hooks 'gametree-save-and-hack-layout))
|
||||
(add-hook 'write-contents-functions 'gametree-save-and-hack-layout nil t))
|
||||
|
||||
;;;; Goodies for mousing users
|
||||
(defun gametree-mouse-break-line-here (event)
|
||||
|
|
Loading…
Add table
Add a link
Reference in a new issue