--- a/ExternalLibraryFunction.st Thu Jun 22 18:15:00 2006 +0200
+++ b/ExternalLibraryFunction.st Fri Jun 23 13:06:53 2006 +0200
@@ -240,7 +240,7 @@
self error:'Missing moduleName'.
].
moduleHandle isNil ifTrue:[
- handle := ObjectFileLoader loadDynamicObject:moduleName.
+ handle := ObjectFileLoader loadDynamicObject:(moduleName asString).
handle isNil ifTrue:[
handle := ObjectFileLoader
loadDynamicObject:(Filename currentDirectory construct:moduleName) pathName.
@@ -745,5 +745,5 @@
!ExternalLibraryFunction class methodsFor:'documentation'!
version
- ^ '$Header: /cvs/stx/stx/libbasic/ExternalLibraryFunction.st,v 1.27 2006-06-22 16:15:00 ca Exp $'
+ ^ '$Header: /cvs/stx/stx/libbasic/ExternalLibraryFunction.st,v 1.28 2006-06-23 11:06:53 ca Exp $'
! !