2 Jun
2006
2 Jun
'06
9:25 a.m.
Update of /project/clim-desktop/cvsroot/clim-desktop In directory clnet:/tmp/cvs-serv21969 Modified Files: climacs.lisp Log Message: Removed unnecessary Find File Arg command. --- /project/clim-desktop/cvsroot/clim-desktop/climacs.lisp 2006/06/01 23:00:09 1.11 +++ /project/clim-desktop/cvsroot/clim-desktop/climacs.lisp 2006/06/02 09:25:09 1.12 @@ -4,10 +4,6 @@ (let ((url (accept 'url :prompt "Browse URL"))) (closure:visit url))) -(define-command (com-find-file-arg :name t :command-table buffer-table) - ((file 'pathname)) - (find-file file)) - (define-command (com-inspect-buffer :name "Inspect Buffer" :command-table base-table) () (clouseau:inspector (buffer (current-window))))