[snow-cvs] r30 - trunk/src/lisp/snow

[Alessio Stalla]

Author: astalla
Date: Fri Nov 27 14:21:34 2009
New Revision: 30

Log:
Fixed misuse of jstatic which broke the showcase on windows.

Modified:
   trunk/src/lisp/snow/start.lisp

Modified: trunk/src/lisp/snow/start.lisp
==============================================================================
--- trunk/src/lisp/snow/start.lisp	(original)
+++ trunk/src/lisp/snow/start.lisp	Fri Nov 27 14:21:34 2009
@@ -50,7 +50,7 @@
 (defun snow-showcase ()
   (unless (find-package '#:snow-showcase)
     ;;loads the showcase file
-    (jstatic "evalResource" "snow.Snow" "/snow/showcase/showcase.lisp"))
+     (jstatic (jmethod "snow.Snow" "evalResource" "java.lang.String") nil "/snow/showcase/showcase.lisp"))
   (funcall (symbol-function (find-symbol (symbol-name '#:showcase)
 					 (find-package '#:snow-showcase)))))