--- a/Tools__ProjectLoader.st	Wed Jul 31 12:27:45 2013 +0200
+++ b/Tools__ProjectLoader.st	Wed Jul 31 12:28:41 2013 +0200
@@ -69,15 +69,15 @@
 initialize
 
     | item |
-    item := (MenuItem label:'Load project')
+    item := (MenuItem label:'Load Project...')
                 nameKey:'LoadProject';
                 value:[(Smalltalk at: self fullName asSymbol) open].
 
     NewLauncher
         addMenuItem: item
         from: nil
-        in: 'menu'
-        position: #after
+        in: 'menu.file'
+        position: #(#after #fileBrowser)
         space: true.
 
     "
@@ -417,12 +417,16 @@
 
 !ProjectLoader class methodsFor:'documentation'!
 
+version
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__ProjectLoader.st,v 1.4 2013-07-31 10:28:41 cg Exp $'
+!
+
 version_CVS
-    ^ '$Header: /cvs/stx/stx/libtool/Tools__ProjectLoader.st,v 1.3 2013-07-31 10:26:07 cg Exp $'
+    ^ '$Header: /cvs/stx/stx/libtool/Tools__ProjectLoader.st,v 1.4 2013-07-31 10:28:41 cg Exp $'
 !
 
 version_SVN
-    ^ '$Id: Tools__ProjectLoader.st,v 1.3 2013-07-31 10:26:07 cg Exp $'
+    ^ '$Id: Tools__ProjectLoader.st,v 1.4 2013-07-31 10:28:41 cg Exp $'
 ! !