Show
Ignore:
Timestamp:
07/16/06 08:36:52 (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

    r4098 r4111  
    44204420  (let ((map (make-keymap))) 
    44214421    (set-keymap-parent map widget-keymap) 
    4422     (suppress-keymap map) 
     4422    (define-key map [remap self-insert-command] 
     4423      'custom-no-edit) 
     4424    (define-key map "\^m" 'custom-no-edit) 
    44234425    (define-key map " " 'scroll-up) 
    44244426    (define-key map "\177" 'scroll-down) 
    …… 
    44314433    map) 
    44324434  "Keymap for `custom-mode'.") 
     4435 
     4436(defun custom-no-edit () 
     4437  "Refuse to allow editing of Custom buffer." 
     4438  (interactive) 
     4439  (error "You can't edit this part of the Custom buffer")) 
    44334440 
    44344441(easy-menu-define Custom-mode-menu