[slime-cvs] CVS slime

[alendvai]

Update of /project/slime/cvsroot/slime
In directory clnet:/tmp/cvs-serv16768

Modified Files:
	slime.el 
Log Message:
FIX: slime-fuzzy-target-buffer-completions-mode's keymap must always precede other keymaps


--- /project/slime/cvsroot/slime/slime.el	2006/12/20 14:29:09	1.720
+++ /project/slime/cvsroot/slime/slime.el	2006/12/20 14:32:44	1.721
@@ -576,7 +576,7 @@
                (call-interactively 'isearch-forward)))
 
       ;; some unconditional direct bindings
-      (dolist (key (list (kbd "RET") (kbd "<SPC>") "(" ")" "[" "]"))
+      (dolist (key (list (kbd "<return>") (kbd "RET") (kbd "<SPC>") "(" ")" "[" "]"))
         (define-key map key 'slime-fuzzy-select-and-process-event-in-target-buffer)))
     map
     )
@@ -638,6 +638,14 @@
    "The Lisp package to show in the modeline.
 This is automatically updated based on the buffer/point."))
 
+;; Make sure slime-fuzzy-target-buffer-completions-mode's map is
+;; before everything else.
+(setf minor-mode-map-alist
+      (stable-sort minor-mode-map-alist
+                   (lambda (a b)
+                     (eq a 'slime-fuzzy-target-buffer-completions-mode))
+                   :key #'car))
+
 (defun slime-update-modeline-package ()
   (ignore-errors
     (when (and slime-update-modeline-package