--- a/ResourcePack.st	Mon Feb 19 22:10:00 1996 +0100
+++ b/ResourcePack.st	Mon Feb 19 23:59:33 1996 +0100
@@ -499,7 +499,7 @@
                     ].
                 ] ifFalse:[
                     skipping ifFalse:[
-                        Object errorSignal handle:[:ex |
+                        ErrorSignal handle:[:ex |
                             ('RESOURCEPACK: error: ''' , ex errorString , '''') errorPrintNL.
                             ('RESOURCEPACK: line ' , lNo printString , ': ''' , lineString , '''') errorPrintNL.
                             ok := false.
@@ -530,6 +530,6 @@
 !ResourcePack class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libview/ResourcePack.st,v 1.24 1995-12-14 14:00:56 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libview/ResourcePack.st,v 1.25 1996-02-19 22:59:08 cg Exp $'
 ! !
 ResourcePack initialize!