# HG changeset patch
# User Gerd Moellmann <gerd@gnu.org>
# Date 978016313 0
# Node ID 421a33797ea8541cea0b36bf9e9dbce675f967eb
# Parent  85685c9b814532719a2c605f0f9fab9f86ed1d8e
(delete-key-deletes-forward-mode): Bind backspace
and delete in isearch-mode-map.

diff -r 85685c9b8145 -r 421a33797ea8 lisp/simple.el
--- a/lisp/simple.el	Thu Dec 28 13:41:26 2000 +0000
+++ b/lisp/simple.el	Thu Dec 28 15:11:53 2000 +0000
@@ -4042,8 +4042,10 @@
 		  ([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))