--- a/ExternalLibraryFunction.st	Tue Jun 20 21:45:00 2006 +0200
+++ b/ExternalLibraryFunction.st	Thu Jun 22 16:47:58 2006 +0200
@@ -234,7 +234,7 @@
     "link this function to the external module.
      I.e. retrieve the module handle and the code pointer."
 
-    |handle|
+    |handle functionName|
 
     moduleName isNil ifTrue:[
         self error:'Missing moduleName'.
@@ -252,16 +252,19 @@
     ].
     name isNumber ifFalse:[
         (moduleHandle getFunctionAddress:name into:self) isNil ifTrue:[
+            moduleHandle := nil.    
             self error:'Missing function: ', name, ' in module: ', moduleName.
         ]
     ].
+
+    "Modified: / 22-06-2006 / 16:47:49 / cg"
 !
 
 prepareInvoke
     self hasCode ifFalse:[
-	moduleHandle isNil ifTrue:[
-	    self linkToModule.
-	].
+        moduleHandle isNil ifTrue:[
+            self linkToModule.
+        ].
     ].
 ! !
 
@@ -741,5 +744,5 @@
 !ExternalLibraryFunction class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/ExternalLibraryFunction.st,v 1.23 2006-06-20 15:26:29 ca Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/ExternalLibraryFunction.st,v 1.24 2006-06-22 14:47:58 cg Exp $'
 ! !