--- a/FileBrowser.st	Wed Feb 20 23:07:17 2019 +0100
+++ b/FileBrowser.st	Thu Feb 21 14:25:40 2019 +0100
@@ -127,6 +127,20 @@
     "
 !
 
+openOnDirectory:aDirectoryPath
+    "start a new FileBrowser in a pathname"
+
+    ^ (self on:aDirectoryPath) open
+
+    "
+     FileBrowser openOn:'/etc'
+     FileBrowser openOn:'..'
+     FileBrowser openOn:'.'
+    "
+
+    "Created: / 21-02-2019 / 14:25:10 / Claus Gittinger"
+!
+
 openOnFileNamed:aFilename
     "start a new FileBrowser on a file"