* lsdb.el (lsdb-mode-map): Bind [backspace]
authorueno <ueno>
Fri, 26 Apr 2002 14:34:16 +0000 (14:34 +0000)
committerueno <ueno>
Fri, 26 Apr 2002 14:34:16 +0000 (14:34 +0000)
(lsdb-mode-lookup): Prepare lsdb-hash-table.

lsdb.el

diff --git a/lsdb.el b/lsdb.el
index 7186f00..94ad1f3 100644 (file)
--- a/lsdb.el
+++ b/lsdb.el
@@ -563,6 +563,7 @@ This is the current number of slots in HASH-TABLE, whether occupied or not."
     (define-key keymap " " 'scroll-up)
     (define-key keymap [delete] 'scroll-down)
     (define-key keymap "\177" 'scroll-down)
+    (define-key keymap [backspace] 'scroll-down)
     keymap)
   "LSDB's keymap.")
 
@@ -734,6 +735,7 @@ This is the current number of slots in HASH-TABLE, whether occupied or not."
        nil nil nil 'lsdb-mode-lookup-history)
       entry-name)))
   (let (records)
+    (lsdb-maybe-load-file)
     (lsdb-maphash
      (if entry-name
         (lambda (key value)