[climacs-cvs] CVS climacs

[crhodes]

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

Modified Files:
	file-commands.lisp 
Log Message:
Make the buffer of a syntax be the buffer created by MAKE-BUFFER rather 
than the buffer of (point pane).  (In practice, this means the 
climacs-buffer (delegating) rather than the implementation buffer).  

(This is largely to facilitate the ability to print tablature along with 
the buffer name; there are probably other reasons to allow this.)


--- /project/climacs/cvsroot/climacs/file-commands.lisp	2006/03/03 19:38:57	1.3
+++ /project/climacs/cvsroot/climacs/file-commands.lisp	2006/03/25 20:58:41	1.4
@@ -155,7 +155,7 @@
 		 (setf (buffer (current-window)) buffer)
 		 (setf (syntax buffer)
 		       (make-instance (syntax-class-name-for-filepath filepath)
-			  :buffer (buffer (point pane))))
+			  :buffer buffer))
 		 ;; Don't want to create the file if it doesn't exist.
 		 (when (probe-file filepath)
 		   (with-open-file (stream filepath :direction :input)