--- a/AbstractFileBrowser.st	Tue Apr 15 11:31:01 2014 +0200
+++ b/AbstractFileBrowser.st	Wed Apr 16 14:30:23 2014 +0200
@@ -2276,6 +2276,16 @@
             itemValue: installAllAsAutoloadedRecursive
           )
          (MenuItem
+            enabled: hasJavaVM
+            label: 'Add Directory to Java Source Path (stx:libjava)'
+            itemValue: addDirToJavaSourcePath
+          )
+         (MenuItem
+            enabled: hasJavaVM
+            label: 'Add Selected Files to Java Source Path (stx:libjava)'
+            itemValue: fileAddToJavaSourcePath
+          )
+         (MenuItem
             label: '-'
           )
          (MenuItem
@@ -2325,7 +2335,7 @@
                   itemValue: openCBrowser
                   isVisible: hasCBrowser
                 )
-               (MenuItem   
+               (MenuItem
                   enabled: canOpenMonticelloBrowser
                   label: 'Monticello Browser'
                   itemValue: doOpenMonticelloBrowser
@@ -2490,9 +2500,9 @@
                   itemValue: fileFindFile
                 )
                (MenuItem
+                  enabled: hasFileSelection
                   label: 'Same Contents as Selected...'
                   itemValue: fileFindDuplicateFile
-                  enabled: hasFileSelection
                 )
                (MenuItem
                   label: 'Duplicate Files'
@@ -5455,6 +5465,16 @@
 
 !AbstractFileBrowser methodsFor:'menu actions-file'!
 
+addDirToJavaSourcePath
+    "add the current path to java's sourcePath
+     (only available with ST/J System"
+
+    Java addToSourcePath:self currentDirectory pathName
+
+    "Modified: 14.12.1996 / 15:37:47 / cg"
+    "Created: 2.8.1997 / 14:11:19 / cg"
+!
+
 copyFiles
     self 
         withSelectedFilesOrDirectoriesDo:[:filesOrDirs | self copyFilesToClipBoard:filesOrDirs]
@@ -5475,6 +5495,18 @@
         withSelectedFilesOrDirectoriesDo:[:filesOrDirs | self eraseFiles:filesOrDirs]
 !
 
+fileAddToJavaSourcePath
+    "add the current path to java's sourcePath
+     (only available with ST/J System"
+
+    self currentSelectedObjects do:[:each |
+        Java addToSourcePath:(each pathName)
+    ].
+
+    "Created: / 9.11.1998 / 05:41:34 / cg"
+    "Modified: / 9.11.1998 / 05:56:00 / cg"
+!
+
 openSettingsDialog
     |dialog|
 
@@ -9410,10 +9442,10 @@
 !AbstractFileBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.550 2014-03-06 16:20:00 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.551 2014-04-16 12:30:23 cg Exp $'
 !
 
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.550 2014-03-06 16:20:00 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/AbstractFileBrowser.st,v 1.551 2014-04-16 12:30:23 cg Exp $'
 ! !