diff -r c97a56c2b862 -r 20eee34c4c8b Tools__ObjectModuleInformation.st
--- a/Tools__ObjectModuleInformation.st	Wed May 21 19:30:50 2008 +0200
+++ b/Tools__ObjectModuleInformation.st	Wed May 21 21:28:56 2008 +0200
@@ -664,7 +664,7 @@
     module := self selectedModule.
 
     self canBrowseSelectedModule value:(info notNil and:[info ~~ #VM and:[module notNil]]).
-    self canUnloadSelectedModule value:(self readOnly not and:[info ~~ #VM and:[module notNil and:[module dynamic]]]).
+    self canUnloadSelectedModule value:(self readOnly not and:[info ~~ #VM and:[info notNil and:[info dynamic]]]).
 
     classNamesShown := nil.
     classInfoShown := nil.