[noctool-cvs] CVS source

[jprewett]

Update of /project/noctool/cvsroot/source
In directory clnet:/tmp/cvs-serv27331

Modified Files:
	graphing.lisp 
Log Message:
changed image:height to image::height as height is not external in the image library.



--- /project/noctool/cvsroot/source/graphing.lisp	2008/05/17 12:43:27	1.2
+++ /project/noctool/cvsroot/source/graphing.lisp	2008/05/17 17:25:47	1.3
@@ -244,7 +244,7 @@
 
 (defmethod show ((graph fixed-graph-display) sink format
 		 &key (selector :short) (color '(0 255 0)) (base-x 0)
-		 (base-y (1- (image:height sink))) (height (image:height sink))
+		 (base-y (1- (image::height sink))) (height (image::height sink))
 		 (style :plot))
   (let ((data (extract-display-data graph selector)))
     (loop for ix from 0 below 300
@@ -262,7 +262,7 @@
 
 (defmethod show ((graph percentile-graph-display) sink format
 		 &key (selector :short) (color '(0 255 0)) (base-x 0) scale
-		 (base-y (1- (image:height sink))) (height (image:height sink))
+		 (base-y (1- (image::height sink))) (height (image::height sink))
 		 (style :plot))
   (let ((data (extract-display-data graph selector)))
     (let ((tmpdata (sort (copy-seq data) #'<)))