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)