# HG changeset patch
# User Noah Friedman <friedman@splode.com>
# Date 867054086 0
# Node ID da941474d947cfe65e4492d5ec71954f3c237309
# Parent  9a272a7dae129a89d91947f4f02f72c2fedacaed
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.

diff -r 9a272a7dae12 -r da941474d947 lisp/rsz-mini.el
--- a/lisp/rsz-mini.el	Mon Jun 23 06:34:29 1997 +0000
+++ b/lisp/rsz-mini.el	Mon Jun 23 08:21:26 1997 +0000
@@ -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 @@
    ((>= 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 @@
                   (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