Mercurial > emacs

changeset 8226:3ad4ec3c9228

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(resize-minibuffer-setup): Copy the value of post-command-hook.
author Richard M. Stallman <rms@gnu.org>
date Tue, 12 Jul 1994 19:51:30 +0000
parents c6a3a9b2ef3f
children 0e6b7eeedc3b
files lisp/rsz-mini.el
diffstat 1 files changed, 3 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/rsz-mini.el	Tue Jul 12 17:37:32 1994 +0000
+++ b/lisp/rsz-mini.el	Tue Jul 12 19:51:30 1994 +0000
@@ -7,7 +7,7 @@
 ;;; Maintainer: friedman@prep.ai.mit.edu
 ;;; 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 @@
              (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)