diff options
author | Richard M. Stallman <[email protected]> | 1994-07-12 19:51:30 +0000 |
---|---|---|
committer | Richard M. Stallman <[email protected]> | 1994-07-12 19:51:30 +0000 |
commit | f509158c263f8371e031e15e622180e034ab46ed (patch) | |
tree | 8a8e67bb854a433cec84643cf7b6115eaf78dad1 /lisp/rsz-mini.el | |
parent | 72e2e0c393dec5bcab8bd1ea99e21d1cd76b0abb (diff) |
(resize-minibuffer-setup):
Copy the value of post-command-hook.
Diffstat (limited to 'lisp/rsz-mini.el')
-rw-r--r-- | lisp/rsz-mini.el | 4 |
1 files changed, 3 insertions, 1 deletions
diff --git a/lisp/rsz-mini.el b/lisp/rsz-mini.el index 8d90e0c8a5..a55ab90ac4 100644 --- a/lisp/rsz-mini.el +++ b/lisp/rsz-mini.el @@ -7,7 +7,7 @@ ;;; Maintainer: [email protected] ;;; Keywords: minibuffer, window, frame, display ;;; Status: Known to work in FSF GNU Emacs 19.26 and later. -;;; $Id: rsz-mini.el,v 1.4 1994/06/22 22:14:28 friedman Exp friedman $ +;;; $Id: rsz-mini.el,v 1.5 1994/06/30 06:46:44 friedman Exp rms $ ;; This file is part of GNU Emacs. @@ -153,6 +153,8 @@ counterparts." (make-local-variable 'minibuffer-exit-hook) (add-hook 'minibuffer-exit-hook 'resize-minibuffer-frame-restore) (make-local-variable 'post-command-hook) + ;; Copy this because add-hook modifies the list structure. + (setq post-command-hook (copy-sequence post-command-hook)) (add-hook 'post-command-hook 'resize-minibuffer-frame 'append)))) (t (make-local-variable 'post-command-hook) |