Mercurial > emacs

changeset 24926:4cb7e7beea27

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(minibuffer-frame-alist): Use defcustom. (pop-up-frame-alist): Likewise. (initial-frame-alist): Specify * in the doc string.
author Richard M. Stallman <rms@gnu.org>
date Tue, 06 Jul 1999 18:27:40 +0000
parents 5169ebe70135
children cfd699838151
files lisp/frame.el
diffstat 1 files changed, 16 insertions(+), 7 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/frame.el	Mon Jul 05 22:49:45 1999 +0000
+++ b/lisp/frame.el	Tue Jul 06 18:27:40 1999 +0000
@@ -33,7 +33,7 @@
 ;;; But that's not necessary, because the default is to have one.
 ;;; By not specifying it here, we let an X resource specify it.
 (defcustom initial-frame-alist nil
-  "Alist of frame parameters for creating the initial X window frame.
+  "*Alist of frame parameters for creating the initial X window frame.
 You can set this in your `.emacs' file; for example,
  (setq initial-frame-alist '((top . 1) (left . 1) (width . 80) (height . 55)))
 Parameters specified here supersede the values given in `default-frame-alist'.
@@ -57,20 +57,29 @@
 		       (sexp :tag "Value")))
   :group 'frames)
 
-(defvar minibuffer-frame-alist '((width . 80) (height . 2))
-  "Alist of frame parameters for initially creating a minibuffer frame.
+(defcustom minibuffer-frame-alist '((width . 80) (height . 2))
+  "*Alist of frame parameters for initially creating a minibuffer frame.
 You can set this in your `.emacs' file; for example,
  (setq minibuffer-frame-alist
    '((top . 1) (left . 1) (width . 80) (height . 2)))
 Parameters specified here supersede the values given in
-`default-frame-alist'.")
+`default-frame-alist', for a minibuffer frame."
+  :type '(repeat (cons :format "%v"
+		       (symbol :tag "Parameter")
+		       (sexp :tag "Value")))
+  :group 'frames)
 
-(defvar pop-up-frame-alist nil
-  "Alist of frame parameters used when creating pop-up frames.
+(defcustom pop-up-frame-alist nil
+  "*Alist of frame parameters used when creating pop-up frames.
 Pop-up frames are used for completions, help, and the like.
 This variable can be set in your init file, like this:
   (setq pop-up-frame-alist '((width . 80) (height . 20)))
-These supersede the values given in `default-frame-alist'.")
+These supersede the values given in `default-frame-alist',
+for pop-up frames."
+  :type '(repeat (cons :format "%v"
+		       (symbol :tag "Parameter")
+		       (sexp :tag "Value")))
+  :group 'frames)
 
 (setq pop-up-frame-function
       (function (lambda ()