Mercurial > hg > xemacs-beta
diff lisp/frame.el @ 219:262b8bb4a523 r20-4b8
Import from CVS: tag r20-4b8
author | cvs |
---|---|
date | Mon, 13 Aug 2007 10:09:35 +0200 |
parents | 78f53ef88e17 |
children | 51092a27c943 |
line wrap: on
line diff
--- a/lisp/frame.el Mon Aug 13 10:08:36 2007 +0200 +++ b/lisp/frame.el Mon Aug 13 10:09:35 2007 +0200 @@ -61,9 +61,7 @@ don't affect subsequent frames. * Set `initial-frame-plist' in a way that matches the X resources, to override what you put in `default-frame-plist'." - :type '(repeat (group :inline t - (symbol :tag "Property") - (sexp :tag "Value"))) + :type 'plist :group 'frames) (defcustom minibuffer-frame-plist '(width 80 height 2 menubar-visible-p nil @@ -74,9 +72,7 @@ Properties specified here supersede the values given in `default-frame-plist'. The format of this can also be an alist for backward compatibility." - :type '(repeat (group :inline t - (symbol :tag "Property") - (sexp :tag "Value"))) + :type 'plist :group 'frames) (defcustom pop-up-frame-plist nil @@ -86,9 +82,7 @@ (setq pop-up-frame-plist '(width 80 height 20)) These supersede the values given in `default-frame-plist'. The format of this can also be an alist for backward compatibility." - :type '(repeat (group :inline t - (symbol :tag "Property") - (sexp :tag "Value"))) + :type 'plist :group 'frames) (setq pop-up-frame-function @@ -104,9 +98,7 @@ (setq special-display-frame-plist '(width 80 height 20)) These supersede the values given in `default-frame-plist'. The format of this can also be an alist for backward compatibility." - :type '(repeat (group :inline t - (symbol :tag "Property") - (sexp :tag "Value"))) + :type 'plist :group 'frames) (defun safe-alist-to-plist (cruftiness)