--- a/VersionDiffBrowser.st	Wed Oct 20 11:04:28 2010 +0200
+++ b/VersionDiffBrowser.st	Fri Oct 22 12:36:38 2010 +0200
@@ -1612,7 +1612,7 @@
         selectorString := aChange selector.
         m := aChange changeMethod.
         m notNil ifTrue:[
-            m isWrapped ifTrue:[ m := m originalMethod ].
+            m := m originalMethodIfWrapped.
             selectorString := m printStringForBrowserWithSelector:aChange selector inClass:aChange changeClass.    
         ].
         selectorString := ' ',selectorString 
@@ -1622,6 +1622,8 @@
         ^ changeClassName,selectorString, ' (category)'
     ].
     ^ changeClassName,selectorString
+
+    "Modified: / 22-10-2010 / 12:36:34 / cg"
 !
 
 resetSelectionHolders
@@ -2228,9 +2230,9 @@
 !VersionDiffBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/VersionDiffBrowser.st,v 1.94 2010-08-15 19:56:10 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/VersionDiffBrowser.st,v 1.95 2010-10-22 10:36:38 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/VersionDiffBrowser.st,v 1.94 2010-08-15 19:56:10 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/VersionDiffBrowser.st,v 1.95 2010-10-22 10:36:38 cg Exp $'
 ! !