Smalltalk.st
changeset 11690 b48d486944fc
parent 11689 d08d5db473c5
child 11808 14b417cf2b51
child 17711 39faaaf888b4
--- a/Smalltalk.st	Mon May 11 17:27:35 2009 +0200
+++ b/Smalltalk.st	Mon May 11 17:37:48 2009 +0200
@@ -4983,7 +4983,7 @@
              the sharedLib extension (.dll / .so / .sl) is added here, to
              make the caller independent of the underlying operatingSystem."
 
-    |path baseName handle libraryFilename packagePath|
+    |baseName handle libraryFilename packagePath|
 
     ObjectFileLoader isNil ifTrue:[^ false].
 
@@ -5000,7 +5000,7 @@
     libraryFilename := packagePath / baseName.
     libraryFilename exists ifFalse:[
         "in windows (with Borland compiler, DLLs in development environment are under objbc"
-        libraryFilename := path / 'objbc' / baseName.
+        libraryFilename := packagePath / 'objbc' / baseName.
     ].
     libraryFilename exists ifFalse:[^ false].
 
@@ -7155,5 +7155,5 @@
 !Smalltalk class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.879 2009-05-11 15:27:35 stefan Exp $'
+    ^ '$Header: /cvs/stx/stx/libbasic/Smalltalk.st,v 1.880 2009-05-11 15:37:48 stefan Exp $'
 ! !