diff options
Diffstat (limited to 'lisp/rsz-mini.el')
| -rw-r--r-- | lisp/rsz-mini.el | 12 |
1 files changed, 5 insertions, 7 deletions
diff --git a/lisp/rsz-mini.el b/lisp/rsz-mini.el index 7f3313a728..647f1d46cc 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 <[email protected]> ;; Roland McGrath <[email protected]> ;; Maintainer: [email protected] ;; 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 |