* speedbar.el (speedbar-file-key-map): Fix typo.

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index eb79a8c2b733406a2c391b0ad26a46605b11132e..888c519faf75b858b1a04bb1eee3ee0c2ed4fe2a 100644 (file)
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,7 @@
+2005-10-09  Chong Yidong  <cyd@stupidchicken.com>
+
+       * speedbar.el (speedbar-file-key-map): Fix typo.
+
 2005-10-09  Daniel Brockman <daniel@brockman.se>
 
        * cus-start.el (line-spacing): Add custom spec.

diff --git a/lisp/speedbar.el b/lisp/speedbar.el
index cdb592a3944f4219c76e652fcad61c549913f601..bb813808ed9232ce40d3c597da7fbf6d1e8e89d7 100644 (file)
--- a/lisp/speedbar.el
+++ b/lisp/speedbar.el
@@ -762,7 +762,7 @@ This basically creates a sparse keymap, and makes it's parent be
   (define-key speedbar-file-key-map "-" 'speedbar-contract-line)
 
   (define-key speedbar-file-key-map "[" 'speedbar-expand-line-descendants)
-  (define-key speedbar-file-key-map "]" 'speedbar-close-line-descendants)
+  (define-key speedbar-file-key-map "]" 'speedbar-contract-line-descendants)
 
   (define-key speedbar-file-key-map " " 'speedbar-toggle-line-expansion)