From xemacs-m  Mon Mar 24 19:05:37 1997
Received: from jagor.srce.hr (hniksic@jagor.srce.hr [161.53.2.130])
	by xemacs.org (8.8.5/8.8.5) with ESMTP id TAA26568
	for <xemacs-beta@xemacs.org>; Mon, 24 Mar 1997 19:05:36 -0600 (CST)
Received: (from hniksic@localhost)
          by jagor.srce.hr (8.8.5/8.8.4)
	  id CAA06939; Tue, 25 Mar 1997 02:05:35 +0100 (MET)
Sender: hniksic@public.srce.hr
To: XEmacs Developers <xemacs-beta@xemacs.org>
Subject: delete should scroll in hyper-apropos
X-URL: ftp://gnjilux.cc.fer.hr/pub/unix/util/wget/
X-Attribution: Hrv
X-Face: &}4JQk=L;e.~x+|eo]#DGk@x3~ed!.~lZ}YQcYb7f[WL9L'Z*+OyA\nA
        EL1M(".[qvI#a2E6WYI5>>e7'@_)3Ol9p|Nn2wNa/;~06jL*B%tTcn/X
        vhAu7qeES0\|MF%$;sI#yn1+y"
From: Hrvoje Niksic <hniksic@srce.hr>
Date: 25 Mar 1997 02:05:34 +0100
Message-ID: <kigybbcok69.fsf@jagor.srce.hr>
Lines: 29
X-Mailer: Gnus v5.4.37/XEmacs 19.14

It has always been annoying to me that delete and backspace are bound
to their normal functions in hyper-apropos.  Here is a small patch
that fixes it.  The patch is untested, but trivial:

--- hyper-apropos.el.orig	Tue Mar 25 02:01:09 1997
+++ hyper-apropos.el	Tue Mar 25 02:03:15 1997
@@ -157,6 +157,8 @@
 			    ;; movement
 			    (define-key map " "     'scroll-up)
 			    (define-key map "b"     'scroll-down)
+			    (define-key map [delete] 'scroll-down)
+			    (define-key map [backspace] 'scroll-down)
 			    (define-key map "/"     'isearch-forward)
 			    (define-key map "?"     'isearch-backward)
 			    ;; follow links
@@ -182,6 +184,8 @@
 		       ;; slightly different scrolling...
 		       (define-key map " "     'hypropos-scroll-up)
 		       (define-key map "b"     'hypropos-scroll-down)
+		       (define-key map [delete] 'hypropos-scroll-down)
+		       (define-key map [backspace] 'hypropos-scroll-down)
 		       ;; act on the current line...
 		       (define-key map "w"     'hypropos-where-is)
 		       (define-key map "i"     'hypropos-invoke-fn)

-- 
Hrvoje Niksic <hniksic@srce.hr> | Student at FER Zagreb, Croatia
--------------------------------+--------------------------------
The end of the world is coming...  SAVE YOUR BUFFERS!

