# HG changeset patch
# User Stefan Vogel <sv@exept.de>
# Date 1273572215 -7200
# Node ID 6d59e67bcd8ae7e1cde4f1cfb642b2cb006d8f75
# Parent  eb16ea45aa9280c5bf7970a11fa3b7a58ad4c1e9
Fix dll unloading

diff -r eb16ea45aa92 -r 6d59e67bcd8a Tools__ObjectModuleInformation.st
--- a/Tools__ObjectModuleInformation.st	Fri May 07 14:28:18 2010 +0200
+++ b/Tools__ObjectModuleInformation.st	Tue May 11 12:03:35 2010 +0200
@@ -1339,7 +1339,7 @@
 Continue ?') 
                 ifFalse:[ ^ self ].
     ].
-    handle := objectHandles at:self selectedModuleIndex ifAbsent:nil.
+    handle := module handle.
     handle notNil ifTrue:[
         self 
             withWaitCursorDo:[