(defgroup reftex): Update home page url-link.

[bpt/emacs.git] / lisp / bindings.el

diff --git a/lisp/bindings.el b/lisp/bindings.el
index 4100a4d..d077e64 100644 (file)
--- a/lisp/bindings.el
+++ b/lisp/bindings.el
@@ -346,7 +346,6 @@ Keymap to display on minor modes.")
     (define-key map [mode-line mouse-1] 'mode-line-previous-buffer)
     (define-key map [header-line down-mouse-1] 'ignore)
     (define-key map [header-line mouse-1] 'mode-line-previous-buffer)
-    (define-key map [header-line down-mouse-3] 'ignore)
     (define-key map [mode-line mouse-3] 'mode-line-next-buffer)
     (define-key map [header-line down-mouse-3] 'ignore)
     (define-key map [header-line mouse-3] 'mode-line-next-buffer)
@@ -605,7 +604,7 @@ language you are using."
 (let ((l (generic-character-list))
       (table (nth 1 global-map)))
   (while l
-    (set-char-table-default table (car l) 'self-insert-command)
+    (aset table (car l) 'self-insert-command)
     (setq l (cdr l))))
 
 (setq help-event-list '(help f1))