Update of /project/climacs/cvsroot/climacs In directory clnet:/tmp/cvs-serv13351

Modified Files: climacs-lisp-syntax.lisp climacs-lisp-syntax-commands.lisp Log Message: I broke the Swank-using code, now unbroke it.

--- /project/climacs/cvsroot/climacs/climacs-lisp-syntax.lisp 2007/12/08 08:55:06 1.6 +++ /project/climacs/cvsroot/climacs/climacs-lisp-syntax.lisp 2007/12/11 18:46:53 1.7 @@ -286,7 +286,7 @@ (form-to-object syntax token :read t :package (package-at-mark syntax mark)) - syntax m) + view m) (show-note-counts notes (second result)) (when (not (null notes)) (show-notes notes (name view) --- /project/climacs/cvsroot/climacs/climacs-lisp-syntax-commands.lisp 2007/12/08 08:55:06 1.6 +++ /project/climacs/cvsroot/climacs/climacs-lisp-syntax-commands.lisp 2007/12/11 18:46:53 1.7 @@ -78,12 +78,12 @@ () "Compile and load the current file.

-Compiler notes will be displayed in a seperate buffer." - (compile-file-interactively (current-buffer) t)) +Compiler notes will be displayed in a seperate view." + (compile-file-interactively (current-view) t))

(define-command (com-compile-file :name t :command-table climacs-lisp-table) () - "Compile the file open in the current buffer. + "Compile the file open in the current view.

This command does not load the file after it has been compiled." (compile-file-interactively (current-view) nil))