--- a/FileBrowser.st	Sat Aug 26 12:56:31 2006 +0200
+++ b/FileBrowser.st	Sat Aug 26 12:56:40 2006 +0200
@@ -4457,28 +4457,6 @@
     "opens an about box for this application."
 
     DialogBox aboutClass:self class.
-"/    |rev myClass clsRev msg|
-"/
-"/    rev := ''.
-"/    myClass := self class.
-"/
-"/    (clsRev := myClass revision) notNil ifTrue: [rev := '  (rev: ', clsRev printString, ')'].
-"/
-"/    msg := '\' withCRs , myClass name asBoldText, rev.
-"/
-"/    AboutBox isNil ifTrue:[
-"/        "/ this handles bad installations of ST/X,
-"/        "/ where the AboutBox is missing.
-"/        "/ (May vanish in the future)
-"/        ^ self information:msg
-"/    ].
-"/
-"/    Dialog
-"/        about:(resources string:msg)
-"/        label:(resources string:'About FileBrowser')
-"/        icon:self class defaultIcon
-"/
-"/    "Modified: / 17.11.2001 / 23:07:25 / cg"
 !
 
 openHTMLDocument:relativeDocPath
@@ -7520,5 +7498,5 @@
 !FileBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.612 2006-06-20 13:20:22 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/FileBrowser.st,v 1.613 2006-08-26 10:56:40 cg Exp $'
 ! !