Mercurial Mercurial > hg > stx-libtool2 / changeset
summary | shortlog | changelog | graph | tags | bookmarks | branches | files | changeset | raw | zip | gz | bz2 | help
Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
about menu items moved into the Help-menu
authorClaus Gittinger <cg@exept.de>
Wed, 10 Oct 2001 11:44:41 +0200
changeset 1499 0c57ab09156b
parent 1498 817cce99fc96
child 1500 36c0b4b268b8
about menu items moved into the Help-menu
DataSetBuilder.st file | annotate | diff | comparison | revisions
HierarchicalListEditor.st file | annotate | diff | comparison | revisions
ImageEditor.st file | annotate | diff | comparison | revisions
MenuEditor.st file | annotate | diff | comparison | revisions
UIPainter.st file | annotate | diff | comparison | revisions 
--- a/DataSetBuilder.st	Fri Sep 28 17:19:17 2001 +0200
+++ b/DataSetBuilder.st	Wed Oct 10 11:44:41 2001 +0200
@@ -1659,13 +1659,6 @@
           
            #(
              #(#MenuItem
-                #label: 'About'
-                #translateLabel: true
-                #accessCharacterPosition: 1
-                #labelImage: #(#ResourceRetriever nil #menuIcon)
-                #submenuChannel: #menuAbout
-            )
-             #(#MenuItem
                 #label: 'File'
                 #translateLabel: true
                 #activeHelpKey: #file
--- a/HierarchicalListEditor.st	Fri Sep 28 17:19:17 2001 +0200
+++ b/HierarchicalListEditor.st	Wed Oct 10 11:44:41 2001 +0200
@@ -13,6 +13,8 @@
 
 
 
+"{ Package: 'stx:libtool2' }"
+
 ResourceSpecEditor subclass:#HierarchicalListEditor
 	instanceVariableNames:'treeView'
 	classVariableNames:''
@@ -139,7 +141,8 @@
 
     ^Icon
         constantNamed:#'HierarchicalListEditor createChildIcon'
-        ifAbsentPut:[(Depth2Image new) width: 22; height: 22; photometric:(#palette); bitsPerSample:(#(2 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'@@@@@@@@AUUUUP@@A????2@@A????2 @A????0@@A?????8@A?????8@A?????8@A?????8@A?????8@A?????8@A?????8@A?????8@A?????8@A<3L308@A33L33H@A30L33H@A33L33H@A<3L008@A?????8@C*****(@@@@@@@@@') ; colorMapFromArray:#[0 0 0 255 255 255 127 127 127 170 170 170]; mask:((Depth1Image new) width: 22; height: 22; photometric:(#blackIs0); bitsPerSample:(#(1 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'_?>@_??@_?? _??0_??8_??8_??8_??8_??8_??8_??8_??8_??8_??8_??8_??8_??8_??8_??8_??8_??8_??8') ; yourself); yourself]!
+        ifAbsentPut:[(Depth2Image new) width: 22; height: 22; photometric:(#palette); bitsPerSample:(#(2 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'@@@@@@@@AUUUUP@@A????2@@A????2 @A????0@@A?????8@A?????8@A?????8@A?????8@A?????8@A?????8@A?????8@A?????8@A?????8@A<3L308@A33L33H@A30L33H@A33L33H@A<3L008@A?????8@C*****(@@@@@@@@@') ; colorMapFromArray:#[0 0 0 255 255 255 127 127 127 170 170 170]; mask:((Depth1Image new) width: 22; height: 22; photometric:(#blackIs0); bitsPerSample:(#(1 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'_?>@_??@_?? _??0_??8_??8_??8_??8_??8_??8_??8_??8_??8_??8_??8_??8_??8_??8_??8_??8_??8_??8') ; yourself); yourself]
+!
 
 createSisterIcon
     "This resource specification was automatically generated
@@ -156,7 +159,8 @@
 
     ^Icon
         constantNamed:#'HierarchicalListEditor createSisterIcon'
-        ifAbsentPut:[(Depth2Image new) width: 22; height: 22; photometric:(#palette); bitsPerSample:(#(2 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'@@@@@@@@AUUUUP@@A????2@@A????2 @A????0@@A?????8@A?????8@A?????8@A<L<O?8@A3<3??8@A<<<<C8@A?L?O?8@A0<0??8@A?????8@A0LCC?8@A<<?L?8@A<<CC?8@A<<?L?8@A<<CL?8@A?????8@C*****(@@@@@@@@@') ; colorMapFromArray:#[0 0 0 255 255 255 127 127 127 170 170 170]; mask:((Depth1Image new) width: 22; height: 22; photometric:(#blackIs0); bitsPerSample:(#(1 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'_?>@_??@_?? _??0_??8_??8_??8_??8_??8_??8_??8_??8_??8_??8_??8_??8_??8_??8_??8_??8_??8_??8') ; yourself); yourself]! !
+        ifAbsentPut:[(Depth2Image new) width: 22; height: 22; photometric:(#palette); bitsPerSample:(#(2 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'@@@@@@@@AUUUUP@@A????2@@A????2 @A????0@@A?????8@A?????8@A?????8@A<L<O?8@A3<3??8@A<<<<C8@A?L?O?8@A0<0??8@A?????8@A0LCC?8@A<<?L?8@A<<CC?8@A<<?L?8@A<<CL?8@A?????8@C*****(@@@@@@@@@') ; colorMapFromArray:#[0 0 0 255 255 255 127 127 127 170 170 170]; mask:((Depth1Image new) width: 22; height: 22; photometric:(#blackIs0); bitsPerSample:(#(1 )); samplesPerPixel:(1); bits:(ByteArray fromPackedString:'_?>@_??@_?? _??0_??8_??8_??8_??8_??8_??8_??8_??8_??8_??8_??8_??8_??8_??8_??8_??8_??8_??8') ; yourself); yourself]
+! !
 
 !HierarchicalListEditor class methodsFor:'interface specs'!
 
@@ -302,11 +306,6 @@
           
            #(
              #(#MenuItem
-                #label: 'About'
-                #labelImage: #(#ResourceRetriever nil #menuIcon)
-                #submenuChannel: #menuAbout
-            )
-             #(#MenuItem
                 #label: 'File'
                 #submenu: 
                  #(#Menu
--- a/ImageEditor.st	Fri Sep 28 17:19:17 2001 +0200
+++ b/ImageEditor.st	Wed Oct 10 11:44:41 2001 +0200
@@ -1015,13 +1015,6 @@
      #(#Menu
         #(
          #(#MenuItem
-            #label: 'About'
-            #translateLabel: true
-            #activeHelpKey: #about
-            #labelImage: #(#ResourceRetriever nil #menuIcon)
-            #submenuChannel: #menuAbout
-          )
-         #(#MenuItem
             #label: '&File'
             #translateLabel: true
             #activeHelpKey: #file
@@ -2266,10 +2259,15 @@
     |depth img cMap newColorMap newImage oldCListSize newMode|
 
     img := self image.
+    img isNil ifTrue:[
+        self warn:'No Image.'.
+        ^ self
+    ].
+
     depth := img depth.
     cMap := img colorMap.
     cMap isNil ifTrue:[
-        self warn:'Image has no colormap\change colorMap mode first.' withCRs.
+        self warn:'Image has no colormap.\Change colorMap mode first.' withCRs.
         ^ self
     ].
 
--- a/MenuEditor.st	Fri Sep 28 17:19:17 2001 +0200
+++ b/MenuEditor.st	Wed Oct 10 11:44:41 2001 +0200
@@ -1416,12 +1416,6 @@
           
            #(
              #(#MenuItem
-                #label: 'About'
-                #translateLabel: true
-                #labelImage: #(#ResourceRetriever nil #menuIcon)
-                #submenuChannel: #menuAbout
-            )
-             #(#MenuItem
                 #label: '&File'
                 #activeHelpKey: #file
                 #translateLabel: true
@@ -1563,6 +1557,16 @@
                           #activeHelpKey: #helpShowHelp
                           #indication: #showingHelp:
                       )
+                       #(#MenuItem
+                          #label: '-'
+                      )
+                       #(#MenuItem
+                          #label: 'About MenuEditor...'
+                          #translateLabel: true
+                          #value: #openAboutThisApplication
+                          #activeHelpKey: #aboutThisAppliaction
+                      )
+
                     ) nil
                     nil
                 )
--- a/UIPainter.st	Fri Sep 28 17:19:17 2001 +0200
+++ b/UIPainter.st	Wed Oct 10 11:44:41 2001 +0200
@@ -893,13 +893,6 @@
           
            #(
              #(#MenuItem
-                #label: 'About'
-                #translateLabel: true
-                #activeHelpKey: #about
-                #labelImage: #(#ResourceRetriever nil #menuIcon)
-                #submenuChannel: #menuAbout
-            )
-             #(#MenuItem
                 #label: '&File'
                 #translateLabel: true
                 #activeHelpKey: #file
@@ -1206,6 +1199,15 @@
                           #activeHelpKey: #helpShowHelp
                           #indication: #showingHelp:
                       )
+             #(#MenuItem
+                #label: '-'
+            )
+             #(#MenuItem
+                #label: 'About this Application...'
+                #translateLabel: true
+                #value: #openAboutThisApplication
+                #activeHelpKey: #aboutThisAppliaction
+            )
                     ) nil
                     nil
                 )
hg/stx-libtool2