[mcclim-cvs] CVS mcclim/ESA

[ahefner]

Update of /project/mcclim/cvsroot/mcclim/ESA
In directory clnet:/tmp/cvs-serv15618

Modified Files:
	esa-io.lisp 
Log Message:
Filepath and buffer args were transposed in com-write-buffer.


--- /project/mcclim/cvsroot/mcclim/ESA/esa-io.lisp	2006/11/22 14:53:12	1.2
+++ /project/mcclim/cvsroot/mcclim/ESA/esa-io.lisp	2006/11/23 19:53:53	1.3
@@ -258,7 +258,7 @@
     "Prompt for a filename and write the current buffer to it.
 Changes the file visted by the buffer to the given file."
   (let ((buffer (current-buffer)))
-    (write-buffer buffer filepath)))
+    (write-buffer filepath buffer)))
 
 (set-key `(com-write-buffer ,*unsupplied-argument-marker*)
          'esa-io-table '((#\x :control) (#\w :control)))