summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJesse Alama <alama@stanford.edu>2009-02-22 15:42:34 -0800
committerJohn Wiegley <johnw@newartisans.com>2009-02-24 16:12:18 -0400
commit50ad2cd3a5f225b1e91eb6358df92b9c7dcc6e9d (patch)
tree8e8f2ad61cca9b76db9c4b2f8e971e240dd2cbef
parent119d86d31bc18100b52dc4707eb4f5afa88d71f5 (diff)
downloadfork-ledger-50ad2cd3a5f225b1e91eb6358df92b9c7dcc6e9d.tar.gz
fork-ledger-50ad2cd3a5f225b1e91eb6358df92b9c7dcc6e9d.tar.bz2
fork-ledger-50ad2cd3a5f225b1e91eb6358df92b9c7dcc6e9d.zip
Make backspace scroll down in ledger-report buffers.
* lisp/ledger.el: Make backspace scroll down in ledger-report buffers.
-rw-r--r--lisp/ledger.el1
1 files changed, 1 insertions, 0 deletions
diff --git a/lisp/ledger.el b/lisp/ledger.el
index 6636e744..336fdc82 100644
--- a/lisp/ledger.el
+++ b/lisp/ledger.el
@@ -801,6 +801,7 @@ specified line, returns nil."
"A mode for viewing ledger reports."
(let ((map (make-sparse-keymap)))
(define-key map [? ] 'scroll-up)
+ (define-key map (kbd "<backspace>") 'scroll-down)
(define-key map [?r] 'ledger-report-redo)
(define-key map [?s] 'ledger-report-save)
(define-key map [?k] 'ledger-report-kill)