--- a/ObjFLoader.st	Tue Dec 05 20:17:25 1995 +0100
+++ b/ObjFLoader.st	Tue Dec 05 20:35:02 1995 +0100
@@ -911,10 +911,10 @@
     |handle|
 
     LoadedObjects notNil ifTrue:[
-	handle := LoadedObjects at:aFileName
+	handle := LoadedObjects at:aFileName ifAbsent:nil
     ].
     handle isNil ifTrue:[
-	self error:'this file was not loaded dynamically'.
+	'OBJFLOADER: oops file to be unloaded was not loaded dynamically (', aFileName , ')'.
 	^ self
     ].
 
@@ -2740,6 +2740,6 @@
 !ObjectFileLoader class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libcomp/Attic/ObjFLoader.st,v 1.58 1995-12-05 17:52:15 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libcomp/Attic/ObjFLoader.st,v 1.59 1995-12-05 19:35:02 cg Exp $'
 ! !
 ObjectFileLoader initialize!