Mercurial > hg > xemacs-beta
diff lisp/custom.el @ 442:abe6d1db359e r21-2-36
Import from CVS: tag r21-2-36
author | cvs |
---|---|
date | Mon, 13 Aug 2007 11:35:02 +0200 |
parents | 8de8e3f6228a |
children | 576fb035e263 |
line wrap: on
line diff
--- a/lisp/custom.el Mon Aug 13 11:33:40 2007 +0200 +++ b/lisp/custom.el Mon Aug 13 11:35:02 2007 +0200 @@ -38,10 +38,10 @@ ;;; Code: (eval-when-compile - (load "cl-macs")) + (load "cl-macs" nil t)) -(if (not (fboundp 'defun*)) - (autoload 'defun* "cl-macs")) +(autoload 'custom-declare-face "cus-face") +(autoload 'defun* "cl-macs") (require 'widget) @@ -185,7 +185,7 @@ the current value for that symbol. The default is `default-value'. :require VALUE should be a feature symbol. Each feature will be - required after initialization, of the the user have saved this + required after initialization, of the user have saved this option. Read the section about customization in the Emacs Lisp manual for more @@ -227,7 +227,7 @@ match one of the ITEM. The following REQ are defined: `type' (the value of `window-system') - Should be one of `x' or `tty'. + Should be one of `x', `mswindows', or `tty'. `class' (the frame's color support) Should be one of `color', `grayscale', or `mono'. @@ -395,7 +395,7 @@ "(deftheme THEME &optional DOC &key KEYWORDS) Define a theme labeled by SYMBOL THEME. The optional argument DOC is a -doc string describing the the theme. It is optionally followed by the +doc string describing the theme. It is optionally followed by the following keyboard arguments :short-description DESC @@ -535,7 +535,7 @@ (defun custom-theme-load-themes (by-theme &rest body) "Load the themes specified by BODY and record them as required by -theme BY-THEME. BODY is a secuence of +theme BY-THEME. BODY is a sequence of - a SYMBOL require the theme SYMBOL - a list (reset THEME) @@ -565,7 +565,7 @@ (defsubst copy-upto-last (elt list) - "Copy all the elements of the list upto the last occurence of elt" + "Copy all the elements of the list upto the last occurrence of elt" ;; Is it faster to do more work in C than to do less in elisp? (nreverse (cdr (member elt (reverse list))))) @@ -614,7 +614,7 @@ (defun custom-theme-reset-variables (theme &rest args) "Reset the value of the variables to values previously defined. -Assosiate this setting with THEME. +Associate this setting with THEME. ARGS is a list of lists of the form @@ -629,7 +629,7 @@ (defun custom-reset-variables (&rest args) "Reset the value of the variables to values previously defined. -Assosiate this setting with the `user' theme. +Associate this setting with the `user' theme. The ARGS are as in `custom-theme-reset-variables'." (apply #'custom-theme-reset-variables 'user args))