[squeak-dev] Re: Shout

Andreas Raab andreas.raab at gmx.de
Sat Aug 15 19:40:10 UTC 2009


Ian Trudel wrote:
> Q: How customizable Shout is in term of colours and formatting?

Plenty:

defaultStyleTable
   "color can be a valid argument to Color class>>colorFrom: , or nil to
   use the editor text color.
   Multiple emphases can be specified using an array e.g. #(bold italic).
   If emphasis is not specified, #normal will be used.
   if pixel height is not specified , then the editor font size will be 
used.
   "

^#(
   "(symbol  color    [emphasisSymbolOrArray    [textStyleName 
[pixelHeight]]])"
   (default                 black     )
   (invalid                 red       )
   (excessCode                 red       )
   (comment                 (green muchDarker)     )
   (unfinishedComment           (red muchDarker)   italic)
   (#'$'                  (red muchDarker)   )
   (character                (red muchDarker)   )
   (integer                  (red muchDarker)   )
   (number                (red muchDarker)   )
   (#-                    (red muchDarker)   )
   (symbol                  (blue muchDarker)      )
   (stringSymbol              (blue muchDarker)      )
   (literalArray              (blue muchDarker)      )
   (string                  (magenta muchDarker)  normal      'Accuny')
   (unfinishedString            red      normal      'Accuny')
   (assignment                nil      bold      'Accuny')
   (ansiAssignment             nil      bold)
   (literal                  nil      italic)
   (keyword                (blue muchDarker)      )
   (binary                 (blue muchDarker)      )
   (unary                  (blue muchDarker)      )
   (incompleteKeyword            (gray muchDarker)      underlined)
   (incompleteBinary             (gray muchDarker)      underlined)
   (incompleteUnary            (gray muchDarker)      underlined)
   (undefinedKeyword            red      )
   (undefinedBinary             red      )
   (undefinedUnary            red      )
   (patternKeyword             nil      )
   (patternBinary               nil      )
   (patternUnary              nil      )
   (#self                   (red muchDarker)  )
   (#super                  (red muchDarker)  )
   (#true                   (red muchDarker)  )
   (#false                   (red muchDarker)  )
   (#nil                   (red muchDarker)  )
   (#thisContext               (red muchDarker)  )
   (#return                (red muchDarker)  )
   (patternArg               (blue muchDarker)      )
   (methodArg                 (blue muchDarker)      )
   (blockPatternArg             (blue muchDarker)      )
   (blockArg                 (blue muchDarker)      )
   (argument                 (blue muchDarker)      )
   (blockArgColon              black    )
   (leftParenthesis              black    )
   (rightParenthesis            black    )
   (leftParenthesis1            (green muchDarker)    )
   (rightParenthesis1            (green muchDarker)    )
   (leftParenthesis2            (magenta muchDarker)    )
   (rightParenthesis2            (magenta muchDarker)    )
   (leftParenthesis3            (red muchDarker)    )
   (rightParenthesis3            (red muchDarker)    )
   (leftParenthesis4            (green darker)    )
   (rightParenthesis4            (green darker)    )
   (leftParenthesis5            (orange darker)    )
   (rightParenthesis5            (orange darker)    )
   (leftParenthesis6            (magenta darker)    )
   (rightParenthesis6            (magenta darker)    )
   (leftParenthesis7            blue    )
   (rightParenthesis7            blue    )
   (blockStart                 black    )
   (blockEnd                 black    )
   (blockStart1                (green muchDarker)      )
   (blockEnd1                (green muchDarker)      )
   (blockStart2                (magenta muchDarker)    )
   (blockEnd2                (magenta muchDarker)    )
   (blockStart3                (red muchDarker)    )
   (blockEnd3                (red muchDarker)    )
   (blockStart4                (green darker)    )
   (blockEnd4                (green darker)    )
   (blockStart5                (orange darker)    )
   (blockEnd5                (orange darker)    )
   (blockStart6                (magenta darker)    )
   (blockEnd6                (magenta darker)    )
   (blockStart7                blue    )
   (blockEnd7                blue    ) 

   (arrayStart                black    )
   (arrayEnd                black    )
   (arrayStart1              black    )
   (arrayEnd1                black    )
   (leftBrace                 black    )
   (rightBrace                 black    )
   (cascadeSeparator             black    )
   (statementSeparator             black    )
   (externalCallType             black    )
   (externalCallTypePointerIndicator     black    )
   (primitiveOrExternalCallStart       black    )
   (primitiveOrExternalCallEnd        black    )
   (methodTempBar              gray    )
   (blockTempBar               gray    )
   (blockArgsBar              gray    )
   (primitive                (green muchDarker)    bold)
   (externalFunctionCallingConvention    (green muchDarker)    bold)
   (module                  (green muchDarker)    bold)
   (blockTempVar               gray    )
   (blockPatternTempVar          gray    )
   (instVar                 black    )
   (workspaceVar              black    bold)
   (undefinedIdentifier            red      )
   (incompleteIdentifier          (gray darker)   (italic underlined))
   (tempVar                (gray darker)  )
   (patternTempVar            (gray darker)  )
   (poolConstant              (gray muchDarker)  )
   (classVar                (gray muchDarker)  )
   (globalVar                black    bold) )




More information about the Squeak-dev mailing list