--- a/VersionDiffBrowser.st	Wed Jun 07 17:47:22 2006 +0200
+++ b/VersionDiffBrowser.st	Mon Jun 12 11:44:22 2006 +0200
@@ -1183,10 +1183,12 @@
     cls := aChange changeClass.
     sel := aChange changeSelector.
     (cls compiledMethodAt:sel) isNil ifTrue:[
-        self information:'Method does not exist.'
-    ].
-
-    UserPreferences systemBrowserClass openInClass:cls selector:sel.
+        (self confirm:'Method does not exist.\\Browse Class ?' withCRs) ifTrue:[
+            UserPreferences systemBrowserClass openInClass:cls
+        ].
+    ] ifFalse:[
+        UserPreferences systemBrowserClass openInClass:cls selector:sel.
+    ]
 !
 
 browseClassInA
@@ -1996,5 +1998,5 @@
 !VersionDiffBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/VersionDiffBrowser.st,v 1.71 2006-03-06 08:53:18 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/VersionDiffBrowser.st,v 1.72 2006-06-12 09:44:22 cg Exp $'
 ! !