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)))