--- a/DirectoryTreeBrowser.st	Tue Jan 03 14:49:44 2017 +0100
+++ b/DirectoryTreeBrowser.st	Tue Jan 03 14:50:11 2017 +0100
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
  COPYRIGHT (c) 2002 by eXept Software AG
               All Rights Reserved
@@ -91,7 +89,7 @@
 
     |instance|
 
-    instance := DirectoryTreeBrowser new.
+    instance := self new.
     instance open.
     instance viewFilesInDirectoryTree value:aBoolean.
     instance currentFileNameHolder value:(OrderedCollection with:aFileName).
@@ -1407,10 +1405,10 @@
 !DirectoryTreeBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/DirectoryTreeBrowser.st,v 1.131 2015-04-22 17:54:49 stefan Exp $'
+    ^ '$Header$'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/DirectoryTreeBrowser.st,v 1.131 2015-04-22 17:54:49 stefan Exp $'
+    ^ '$Header$'
 ! !