diff options
author | Gerd Moellmann <[email protected]> | 2000-12-14 13:36:34 +0000 |
---|---|---|
committer | Gerd Moellmann <[email protected]> | 2000-12-14 13:36:34 +0000 |
commit | 14f076a8ce03667b53ae5848a9932deca278d1c9 (patch) | |
tree | 8f1b80b20af40670b8827cee20431a02300f37b5 /lisp | |
parent | 02387dcc1f220af9311bc1a85716fa5a64431649 (diff) |
(command-line): Call delete-key-deletes-forward-mode,
if appropriate.
Diffstat (limited to 'lisp')
-rw-r--r-- | lisp/startup.el | 6 |
1 files changed, 6 insertions, 0 deletions
diff --git a/lisp/startup.el b/lisp/startup.el index 6978855bd9..06ed24620b 100644 --- a/lisp/startup.el +++ b/lisp/startup.el @@ -768,6 +768,12 @@ or `CVS', and any subdirectory that contains a file named `.nosearch'." (blink-cursor-mode 1)) (when (and (not noninteractive) + (not (eq system-type 'ms-dos)) + (memq window-system '(x))) + (setq-default delete-key-deletes-forward (x-backspace-delete-keys-p)) + (delete-key-deletes-forward-mode 1)) + + (when (and (not noninteractive) (display-graphic-p) (fboundp 'x-show-tip)) (setq-default tooltip-mode t) |