(delete-key-deletes-forward-mode): Bind backspace

and delete in isearch-mode-map.

2 files changed, 9 insertions, 2 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index f0413982191..fe861f35442 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2000-12-28  Gerd Moellmann  <gerd@gnu.org>
+
+        * simple.el (delete-key-deletes-forward-mode): Bind backspace
+        and delete in isearch-mode-map.
+
 2000-12-28  Kenichi Handa  <handa@etl.go.jp>
 
         * textmodes/artist.el (artist-butlast): Deleted.
diff --git a/lisp/simple.el b/lisp/simple.el
index d7fab489621..6aae21a3f0c 100644
--- a/lisp/simple.el
+++ b/lisp/simple.el
@@ -4042,8 +4042,10 @@ For more details, see `delete-key-deletes-forward'."
                   ([C-delete] [C-backspace] kill-word backward-kill-word)
                   ([M-delete] [M-backspace] kill-word backward-kill-word)
                   ([C-M-delete] [C-M-backspace] kill-sexp backward-kill-sexp)
-                  (,esc-map
-                   [C-delete] [C-backspace] kill-sexp backward-kill-sexp))))
+                  (,esc-map [C-delete] [C-backspace] kill-sexp
+                            backward-kill-sexp)
+                  (,isearch-mode-map [backspace] [delete] isearch-delete-char
+                                     isearch-other-control-char))))
            (dolist (binding bindings)
              (let ((map global-map))
                (when (keymapp (car binding))