--- a/ResourcePack.st Fri Sep 30 18:31:16 2005 +0200
+++ b/ResourcePack.st Fri Sep 30 18:34:26 2005 +0200
@@ -291,7 +291,6 @@
file := Smalltalk getResourceFileName:'resources.rs' forPackage:package.
file isNil ifTrue:[^ nil].
rsrcDir := file asFilename directory.
- self halt.
] ifFalse:[
rsrcDir := rsrcDir asFilename construct:'resources'.
rsrcDir exists ifFalse:[^ nil].
@@ -1099,7 +1098,7 @@
!ResourcePack class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libview/ResourcePack.st,v 1.102 2005-09-30 16:31:16 cg Exp $'
+ ^ '$Header: /cvs/stx/stx/libview/ResourcePack.st,v 1.103 2005-09-30 16:34:26 cg Exp $'
! !
ResourcePack initialize!