Mercurial > hg > xemacs-beta

diff lisp/isearch-mode.el @ 253:157b30c96d03 r20-5b25

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-5b25
author cvs
date Mon, 13 Aug 2007 10:20:27 +0200
parents 41ff10fd062f
children c5d627a313b1
line wrap: on
line diff
--- a/lisp/isearch-mode.el	Mon Aug 13 10:20:01 2007 +0200
+++ b/lisp/isearch-mode.el	Mon Aug 13 10:20:27 2007 +0200
@@ -869,7 +869,7 @@
   (if (and delete-key-deletes-forward
            (case (device-type)
              ('tty (eq tty-erase-char ?\C-h))
-             ('x (not (x-keysym-on-keyboard-p "BackSpace")))))
+             ('x (not (x-keysym-on-keyboard-sans-modifiers-p 'backspace)))))
       (isearch-delete-char)
     (isearch-mode-help)))