Mercurial > hg > xemacs-beta

comparison lisp/simple.el @ 396:6719134a07c2 r21-2-13

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r21-2-13
author cvs
date Mon, 13 Aug 2007 11:12:05 +0200
parents 8626e4521993
children 74fd4e045ea6
comparison
equal deleted inserted replaced
395:de2c2a7459d2 396:6719134a07c2
431 ;; XEmacs: In overwrite mode, back over columns while clearing them out, 431 ;; XEmacs: In overwrite mode, back over columns while clearing them out,
432 ;; unless at end of line. 432 ;; unless at end of line.
433 (and overwrite-mode (not (eolp)) 433 (and overwrite-mode (not (eolp))
434 (save-excursion (insert-char ?\ arg)))) 434 (save-excursion (insert-char ?\ arg))))
435 435
436 (defcustom delete-key-deletes-forward t 436 (defcustom delete-key-deletes-forward nil
437 "*If non-nil, the DEL key will erase one character forwards. 437 "*If non-nil, the DEL key will erase one character forwards.
438 If nil, the DEL key will erase one character backwards." 438 If nil, the DEL key will erase one character backwards."
439 :type 'boolean 439 :type 'boolean
440 :group 'editing-basics) 440 :group 'editing-basics)
441 441