aboutsummaryrefslogtreecommitdiffstats
path: root/lisp/rsz-mini.el
diff options
context:
space:
mode:
authorRichard M. Stallman <[email protected]>1997-04-12 19:31:00 +0000
committerRichard M. Stallman <[email protected]>1997-04-12 19:31:00 +0000
commit9e5b444e89808cf2b2fac7457722fb0cbe22f210 (patch)
tree7d8f05e23752e01b1a79300f04a9834a6158384f /lisp/rsz-mini.el
parentabbc1a7ac93b8116f0d7c42af3a8ac1c0cab70f6 (diff)
Add defgroup; use defcustom for user vars.
Diffstat (limited to 'lisp/rsz-mini.el')
-rw-r--r--lisp/rsz-mini.el37
1 files changed, 26 insertions, 11 deletions
diff --git a/lisp/rsz-mini.el b/lisp/rsz-mini.el
index da5f4b478b..7f3313a728 100644
--- a/lisp/rsz-mini.el
+++ b/lisp/rsz-mini.el
@@ -55,40 +55,55 @@
;;; Code:
+(defgroup resize-minibuffer nil
+ "Dynamically resize minibuffer to display entire contents"
+ :group 'frames)
+
+
;;;###autoload
-(defvar resize-minibuffer-mode nil
- "*If non-`nil', resize the minibuffer so its entire contents are visible.")
+(defcustom resize-minibuffer-mode nil
+ "*If non-`nil', resize the minibuffer so its entire contents are visible."
+ :type 'boolean
+ :group 'resize-minibuffer)
;;;###autoload
-(defvar resize-minibuffer-window-max-height nil
+(defcustom resize-minibuffer-window-max-height nil
"*Maximum size the minibuffer window is allowed to become.
If less than 1 or not a number, the limit is the height of the frame in
-which the active minibuffer window resides.")
+which the active minibuffer window resides."
+ :type '(choice (const nil) integer)
+ :group 'resize-minibuffer)
;;;###autoload
-(defvar resize-minibuffer-window-exactly t
+(defcustom resize-minibuffer-window-exactly t
"*Allow making minibuffer exactly the size to display all its contents.
If `nil', the minibuffer window can temporarily increase in size but
never get smaller while it is active. Any other value allows exact
-resizing.")
+resizing."
+ :type 'boolean
+ :group 'resize-minibuffer)
;;;###autoload
-(defvar resize-minibuffer-frame nil
+(defcustom resize-minibuffer-frame nil
"*Allow changing the frame height of minibuffer frames.
If non-`nil' and the active minibuffer is the sole window in its frame,
-allow changing the frame height.")
+allow changing the frame height."
+ :type 'boolean
+ :group 'resize-minibuffer)
;;;###autoload
-(defvar resize-minibuffer-frame-max-height nil
+(defcustom resize-minibuffer-frame-max-height nil
"*Maximum size the minibuffer frame is allowed to become.
If less than 1 or not a number, there is no limit.")
;;;###autoload
-(defvar resize-minibuffer-frame-exactly t
+(defcustom resize-minibuffer-frame-exactly t
"*Allow making minibuffer frame exactly the size to display all its contents.
If `nil', the minibuffer frame can temporarily increase in size but
never get smaller while it is active. Any other value allows exact
-resizing.")
+resizing."
+ :type 'boolean
+ :group 'resize-minibuffer)
;; Variable used to store the height of the minibuffer frame
;; on entry, so it can be restored on exit. It is made local before it is