[cello-cvs] CVS cello/cellodemo

[ktilton]

Update of /project/cello/cvsroot/cello/cellodemo
In directory clnet:/tmp/cvs-serv32009/cellodemo

Modified Files:
	light-panel.lisp 
Log Message:


--- /project/cello/cvsroot/cello/cellodemo/light-panel.lisp	2006/06/26 17:05:20	1.5
+++ /project/cello/cvsroot/cello/cellodemo/light-panel.lisp	2006/11/03 13:38:24	1.6
@@ -139,7 +139,7 @@
         :lighting :on
         :mat-ambi-diffuse (c? (md-value (fm-other :hedro-color)))
         :mat-specular (c? (md-value (fm-other :hedro-specular)))
-        :mat-shiny (c? (md-value (fm-other :hedro-shiny)))
+        :mat-shiny (c? (v2-h (md-value (fm-other :hedro-shiny))))
         :mat-emission (c? (when (md-value (fm-other :lights-on))
                             (md-value (fm-other :hedro-emission))))
         :backdrop (c? (assert (not *ogl-listing-p*))