Update of /project/clim-desktop/cvsroot/clim-desktop In directory clnet:/tmp/cvs-serv19156
Modified Files: climacs.lisp Log Message: Use the :edit gesture instead of :select for editing.
--- /project/clim-desktop/cvsroot/clim-desktop/climacs.lisp 2006/05/30 21:59:25 1.7 +++ /project/clim-desktop/cvsroot/clim-desktop/climacs.lisp 2006/05/30 22:18:17 1.8 @@ -118,24 +118,24 @@
(define-presentation-to-command-translator global-edit-definition (symbol com-edit-in-climacs global-command-table - :gesture :select :tester ((object presentation) (declare (ignore object)) (not (eq (presentation-type presentation) 'unknown-symbol))) + :gesture :edit :documentation "Edit Definition") (object) (list object))
(define-presentation-to-command-translator global-edit-definition (command-name com-edit-in-climacs global-command-table - :gesture :select + :gesture :edit :documentation "Edit Definition Of Command") (object) (list object))
(define-presentation-to-command-translator global-edit-definition (command com-edit-in-climacs global-command-table - :gesture :select + :gesture :edit :documentation "Edit Definition Of Command") (object) (list (command-name object))) \ No newline at end of file