DirectoryContentsBrowser.st
branchjv
changeset 12142 a4c44d6805b6
parent 12128 a7ff7d66ee85
child 12205 f210b6224ef0
--- a/DirectoryContentsBrowser.st	Fri Feb 03 10:54:40 2012 +0000
+++ b/DirectoryContentsBrowser.st	Sat Feb 04 18:07:12 2012 +0000
@@ -180,11 +180,14 @@
     ^#(
       (DataSetColumnSpec
          label: ''
+         labelIsImage: true
          labelButtonType: Group
          width: 22
          minWidth: 22
          height: 16
          model: icon
+         menuFromApplication: false
+         printSelector: icon
          canSelect: false
          showRowSeparator: false
          showColSeparator: false
@@ -470,6 +473,7 @@
     "Do not manually edit this!! If it is corrupted,
      the MenuEditor may not be able to read the specification."
 
+
     "
      MenuEditor new openOnClass:DirectoryContentsBrowser andSelector:#directoryContentsBrowserMenu
      (Menu new fromLiteralArrayEncoding:(DirectoryContentsBrowser directoryContentsBrowserMenu)) startUp
@@ -496,6 +500,15 @@
             label: '-'
           )
          (MenuItem
+            label: 'SourceCodeManagement'
+            translateLabel: true
+            submenuChannel: scmMenuSlice
+            isMenuSlice: true
+          )
+         (MenuItem
+            label: '-'
+          )
+         (MenuItem
             label: 'New'
             translateLabel: true
             submenuChannel: newMenu
@@ -675,8 +688,6 @@
         nil
         nil
       )
-
-    "Modified: / 07-02-2007 / 18:44:44 / cg"
 !
 
 viewBrowserMenu
@@ -3376,7 +3387,7 @@
 !DirectoryContentsBrowser class methodsFor:'documentation'!
 
 version
-    ^ '$Id: DirectoryContentsBrowser.st 7854 2012-01-30 17:49:41Z vranyj1 $'
+    ^ '$Id: DirectoryContentsBrowser.st 7869 2012-02-04 18:07:12Z vranyj1 $'
 !
 
 version_CVS
@@ -3384,5 +3395,5 @@
 !
 
 version_SVN
-    ^ '$Id: DirectoryContentsBrowser.st 7854 2012-01-30 17:49:41Z vranyj1 $'
+    ^ '$Id: DirectoryContentsBrowser.st 7869 2012-02-04 18:07:12Z vranyj1 $'
 ! !