Index: Drei/drei-clim.lisp
===================================================================
RCS file: /project/mcclim/cvsroot/mcclim/Drei/drei-clim.lisp,v
retrieving revision 1.41
diff -u -r1.41 drei-clim.lisp
--- Drei/drei-clim.lisp	2 Feb 2008 19:03:26 -0000	1.41
+++ Drei/drei-clim.lisp	16 Feb 2008 20:28:00 -0000
@@ -337,7 +337,8 @@
 
 (defmethod additional-command-tables append ((drei drei-gadget-pane)
                                              (table drei-command-table))
-  `(exclusive-gadget-table))
+  `(exclusive-gadget-table
+    ,(frame-command-table *application-frame*)))
 
 (defclass drei-area (drei displayed-output-record region
                           command-processor