[mcclim-cvs] CVS mcclim/Drei

thenriksen thenriksen at common-lisp.net
Thu Dec 7 15:02:46 UTC 2006


Update of /project/mcclim/cvsroot/mcclim/Drei
In directory clnet:/tmp/cvs-serv5095

Modified Files:
	drei.lisp 
Log Message:
I think that Drei variant-specific commands should take priority over
standard editor commands. I just hope I didn't have a good reason for
having the old order.


--- /project/mcclim/cvsroot/mcclim/Drei/drei.lisp	2006/12/04 10:17:21	1.10
+++ /project/mcclim/cvsroot/mcclim/Drei/drei.lisp	2006/12/07 15:02:45	1.11
@@ -550,10 +550,10 @@
 
 (defmethod command-table-inherit-from ((table drei-command-table))
   (let ((syntax-table (command-table *current-syntax*)))
-    (list* syntax-table
-           (when (use-editor-commands-p syntax-table)
-             'editor-table)
-           (additional-command-tables *current-window* table))))
+    (append `(,syntax-table)
+            (additional-command-tables *current-window* table)
+            (when (use-editor-commands-p syntax-table)
+              '(editor-table)))))
 
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;;;




More information about the Mcclim-cvs mailing list