Show
Ignore:
Timestamp:
2006年07月01日 08時27分06秒 (2 years ago)
Author:
miyoshi
Message:

Sync up with Emacs CVS HEAD.

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved
  • trunk/lisp/cus-edit.el

    r4073 r4098  
    588588(defcustom custom-guess-name-alist 
    589589  '(("-p\\'" boolean) 
     590    ("-flag\\'" boolean) 
    590591    ("-hook\\'" hook) 
    591592    ("-face\\'" face) 
     
    10551056  "Customize SYMBOL, which must be a user option variable." 
    10561057  (interactive (custom-variable-prompt)) 
     1058  (unless symbol 
     1059    (error "No variable specified")) 
    10571060  (let ((basevar (indirect-variable symbol))) 
    10581061    (custom-buffer-create (list (list basevar 'custom-variable)) 
     
    10701073Show the buffer in another window, but don't select it." 
    10711074  (interactive (custom-variable-prompt)) 
     1075  (unless symbol 
     1076    (error "No variable specified")) 
    10721077  (let ((basevar (indirect-variable symbol))) 
    10731078    (custom-buffer-create-other-window 
     
    13621367                    (push (list symbol 'custom-variable) found))))) 
    13631368    (if (not found) 
    1364         (error "No matches"
    1365       (custom-buffer-create (custom-sort-items found t 
    1366                                               custom-buffer-order-groups) 
    1367                            "*Customize Apropos*")))) 
     1369        (error "No customizable items matching %s" regexp
     1370      (custom-buffer-create 
     1371       (custom-sort-items found t custom-buffer-order-groups) 
     1372       "*Customize Apropos*")))) 
    13681373 
    13691374;;;###autoload 
     
    45164521(put 'custom-mode 'mode-class 'special) 
    45174522 
    4518 (add-to-list 
    4519  'debug-ignored-errors 
    4520  "^No user options have changed defaults in recent Emacs versions$") 
     4523(dolist (regexp 
     4524         '("^No user option defaults have been changed since Emacs " 
     4525           "^Invalid face:? " 
     4526           "^No \\(?:customized\\|rogue\\|saved\\) user options" 
     4527           "^No customizable items matching " 
     4528           "^There are unset changes" 
     4529           "^Cannot set hidden variable" 
     4530           "^No \\(?:saved\\|backup\\) value for " 
     4531           "^No standard setting known for " 
     4532           "^No standard setting for this face" 
     4533           "^Saving settings from \"emacs -q\" would overwrite existing customizations")) 
     4534  (add-to-list 'debug-ignored-errors regexp)) 
    45214535 
    45224536;;; The End.