[clim-desktop-cvs] CVS clim-desktop

[thenriksen]

Update of /project/clim-desktop/cvsroot/clim-desktop
In directory clnet:/tmp/cvs-serv3963

Modified Files:
	clim-launcher.lisp 
Log Message:
Remove explicit presentation type definition for
`clim-app'. Apparently caused some problems...


--- /project/clim-desktop/cvsroot/clim-desktop/clim-launcher.lisp	2006/07/20 20:15:47	1.5
+++ /project/clim-desktop/cvsroot/clim-desktop/clim-launcher.lisp	2006/07/21 04:38:15	1.6
@@ -17,8 +17,6 @@
   ((name :initarg :name :accessor name :initform "")
    (entry :initarg :entry :accessor entry :initform (lambda (x) (format t "~A was called~%" x)))))
 
-(define-presentation-type clim-app ())
-
 (defmethod display-commands ((frame launcher) stream) 
   (loop for app being the hash-values of *apps*
      do (present app 'clim-app :stream stream)))