
15 Mar
2006
15 Mar
'06
12:14 p.m.
Update of /project/climacs/cvsroot/climacs In directory clnet:/tmp/cvs-serv23859 Modified Files: lisp-syntax-commands.lisp Log Message: Fix `com-package'. --- /project/climacs/cvsroot/climacs/lisp-syntax-commands.lisp 2006/02/07 15:27:50 1.1 +++ /project/climacs/cvsroot/climacs/lisp-syntax-commands.lisp 2006/03/15 12:14:22 1.2 @@ -44,7 +44,7 @@ (let* ((pane (current-window)) (syntax (syntax (buffer pane))) (package (climacs-lisp-syntax::package-of syntax))) - (display-message (format nil "~s" package)))) + (esa:display-message (format nil "~A" (package-name package))))) (define-command (com-fill-paragraph :name t :command-table lisp-table) () )