[mcclim-cvs] CVS mcclim/Examples

[thenriksen]

Update of /project/mcclim/cvsroot/mcclim/Examples
In directory clnet:/tmp/cvs-serv21577/Examples

Modified Files:
	clim-fig.lisp 
Log Message:
The text-field gadget is not supposed to be editable here.  Also, this
is actually not what this gadget is supposed to be used for.


--- /project/mcclim/cvsroot/mcclim/Examples/clim-fig.lisp	2004/02/07 14:05:50	1.28
+++ /project/mcclim/cvsroot/mcclim/Examples/clim-fig.lisp	2006/11/10 18:36:57	1.29
@@ -278,7 +278,8 @@
           :activate-callback #'(lambda (x)
                                  (declare (ignore x))
                                  (com-clear)))
-   (status :text-field :value "CLIM Fig"))
+   (status :text-field :value "CLIM Fig"
+           :editable-p nil))
   (:layouts
    (default
      (vertically ()