--- a/ResourcePack.st	Thu Nov 27 01:12:23 2014 +0100
+++ b/ResourcePack.st	Thu Nov 27 02:46:22 2014 +0100
@@ -591,7 +591,8 @@
             (value == #Error) ifTrue:[
                 hasError := true.
                 printError value:('error in: "self ' , rest , '"').
-            ]
+            ].
+            "/ 'self ' print. rest print. ' -> ' print. value printCR.
         ]
     ] ifFalse:[
         lineStream peek == $' ifTrue:[
@@ -601,13 +602,16 @@
                                     printError value:('invalid line <' , lineString , '>').
                                     nil
                                 ].
+            "/ ' -> ' print. value printCR.
         ] ifFalse:[
             rest := lineStream upToEnd.
             [
                 value := Compiler evaluate:rest compile:"true" false.
             ] on:Error do:[
-                value := rest
+                printError value:('invalid line <' , rest , '>').
+                "/ value := rest
             ].
+            "/ rest print. ' -> ' print. value printCR.
         ].
         (value == #Error) ifTrue:[
             hasError := true.
@@ -1474,11 +1478,11 @@
 !ResourcePack class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/ResourcePack.st,v 1.157 2014-07-10 12:24:00 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/ResourcePack.st,v 1.158 2014-11-27 01:46:22 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libview/ResourcePack.st,v 1.157 2014-07-10 12:24:00 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/ResourcePack.st,v 1.158 2014-11-27 01:46:22 cg Exp $'
 ! !