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

2 files changed, 5 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index eb79a8c2b73..888c519faf7 100644
--- 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 cdb592a3944..bb813808ed9 100644
--- 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)