UISpecificationTool.st
changeset 3214 eceb5d2c5526
parent 3107 985c4b07da6a
child 3221 0bd301f4d1e1
equal deleted inserted replaced
3213:33e1f779fa15 3214:eceb5d2c5526
     9  other person.  No title to or ownership of the software is
     9  other person.  No title to or ownership of the software is
    10  hereby transferred.
    10  hereby transferred.
    11 "
    11 "
    12 "{ Package: 'stx:libtool2' }"
    12 "{ Package: 'stx:libtool2' }"
    13 
    13 
       
    14 "{ NameSpace: Smalltalk }"
       
    15 
    14 ApplicationModel subclass:#UISpecificationTool
    16 ApplicationModel subclass:#UISpecificationTool
    15 	instanceVariableNames:'modifiedHolder aspects specification selection specChannel
    17 	instanceVariableNames:'modifiedHolder aspects specification selection specChannel
    16 		buildInView listOfSpecViews'
    18 		buildInView listOfSpecViews'
    17 	classVariableNames:''
    19 	classVariableNames:''
    18 	poolDictionaries:''
    20 	poolDictionaries:''
    74 
    76 
    75     <resource: #help>
    77     <resource: #help>
    76 
    78 
    77     ^ super helpSpec addPairsFrom:#(
    79     ^ super helpSpec addPairsFrom:#(
    78 
    80 
       
    81 #addTabAction
       
    82 ''
       
    83 
    79 #allowNilColor
    84 #allowNilColor
    80 'Add an option to allow a nil-Color to be choosen'
    85 'Add an option to allow a nil-Color to be choosen'
    81 
    86 
    82 #allowSymbolicColors
    87 #allowSymbolicColors
    83 'ColorMenu is allowed to return a symbolic color name'
    88 'ColorMenu is allowed to return a symbolic color name'
   102 
   107 
   103 #showUseDefaultToggle
   108 #showUseDefaultToggle
   104 'Add a toggle to choose the "default" color (resulting color will be nil)'
   109 'Add a toggle to choose the "default" color (resulting color will be nil)'
   105 
   110 
   106 )
   111 )
   107 
       
   108     "Modified: / 09-08-2012 / 09:37:58 / cg"
       
   109 ! !
   112 ! !
   110 
   113 
   111 !UISpecificationTool class methodsFor:'image specs'!
   114 !UISpecificationTool class methodsFor:'image specs'!
   112 
   115 
   113 browseActionImage
   116 browseActionImage