Update copyright year.

Put back RCS version comment string, which rms keeps removing.

Don't call resize-minibuffer-mode at load time.
Don't modify minibuffer-setup-hook at load time.

(resize-minibuffer-mode): Add resize-minibuffer-setup to
minibuffer-setup-hook.

1 files changed, 5 insertions, 7 deletions

diff --git a/lisp/rsz-mini.el b/lisp/rsz-mini.el
index 7f3313a7286..647f1d46cc0 100644
--- a/lisp/rsz-mini.el
+++ b/lisp/rsz-mini.el
@@ -1,12 +1,14 @@
 ;;; rsz-mini.el --- dynamically resize minibuffer to display entire contents
 
-;; Copyright (C) 1990, 1993, 1994, 1995 Free Software Foundation, Inc.
+;; Copyright (C) 1990, 1993, 1994, 1995, 1997 Free Software Foundation, Inc.
 
 ;; Author: Noah Friedman <friedman@prep.ai.mit.edu>
 ;;         Roland McGrath <roland@prep.ai.mit.edu>
 ;; Maintainer: friedman@prep.ai.mit.edu
 ;; Keywords: minibuffer, window, frame, display
 
+;; $Id$
+
 ;; This file is part of GNU Emacs.
 
 ;; GNU Emacs is free software; you can redistribute it and/or modify
@@ -59,7 +61,6 @@
   "Dynamically resize minibuffer to display entire contents"
   :group 'frames)
 
-
 ;;;###autoload
 (defcustom resize-minibuffer-mode nil
   "*If non-`nil', resize the minibuffer so its entire contents are visible."
@@ -143,7 +144,8 @@ counterparts."
    ((>= prefix 0)
     (setq resize-minibuffer-mode t))
    (t
-    (setq resize-minibuffer-mode nil))))
+    (setq resize-minibuffer-mode nil)))
+  (add-hook 'minibuffer-setup-hook 'resize-minibuffer-setup))
 
 (defun resize-minibuffer-setup ()
   (cond
@@ -260,10 +262,6 @@ respectively."
                   (frame-width)
                   resize-minibuffer-frame-original-height))
 
-
 (provide 'rsz-mini)
 
-(add-hook 'minibuffer-setup-hook 'resize-minibuffer-setup)
-(resize-minibuffer-mode)
-
 ;; rsz-mini.el ends here