On 10/23/2010 10:11 AM, Mariano Martinez Peck wrote:
Exactly.

Can you or Simon provide a script to set back the original colors?? So
that we can apply this for next PharoDev images?  (or at least for my
own images)

Thanks

Mariano

I just went back in the package history and found the point where Damien changed the colors and grabbed the previous version. I have a ConfigurationOfDevelopment class that loads all my local packages, so I just added a method to it to reload the old colors. Here it is...

setColors
        SHTextStylerST80 styleTable:
        #(
        "(symbol   color           [emphasisSymbolOrArray          [textStyleName 
[pixelHeight]]])"           
        (default                                                                
black           )
        (invalid                                                                
red                     )
        (excessCode                                                             
red                     )
        (comment                                                                
(green muchDarker)              italic)
        (unfinishedComment                                      (red 
muchDarker)        italic)
        (#'$'                                                                   
(red muchDarker)        )
        (character                                                              
(red muchDarker)        )
        (integer                                                                
        (red muchDarker)        )
        (number                                                         (red 
muchDarker)        )       
        (#-                                                                     
        (red muchDarker)        )
        (symbol                                                                 
(blue muchDarker)                       bold)   
        (stringSymbol                                                   (blue 
muchDarker)                       bold)   
        (literalArray                                                   (blue 
muchDarker)                       bold)
        (string                                                                 
(magenta muchDarker)    normal)
        (unfinishedString                                               red     
                normal          )
        (assignment                                                             
nil                     bold                    )
        (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     
                bold)
        (patternBinary                                                  nil     
                bold)
        (patternUnary                                                   nil     
                bold)   
        (#self                                                                  
(red muchDarker)        bold)
        (#super                                                                 
(red muchDarker)        bold)
        (#true                                                                  
(red muchDarker)        bold)
        (#false                                                                 
        (red muchDarker)        bold)
        (#nil                                                                   
(red muchDarker)        bold)
        (#thisContext                                                   (red 
muchDarker)        bold)
        (#return                                                                
(red muchDarker)        bold)
        (patternArg                                                     (blue 
muchDarker)                       italic) 
        (methodArg                                                              
(blue muchDarker)                       italic)
        (blockPatternArg                                                (blue 
muchDarker)                       italic)
        (blockArg                                                               
(blue muchDarker)                       italic)
        (argument                                                               
(blue muchDarker)                       italic)
        (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   bold    )
        (primitiveOrExternalCallEnd                             black   bold    
)
        (methodTempBar                                                  gray    
        )
        (blockTempBar                                                   gray    
        )
        (blockArgsBar                                                   gray    
        )
        (primitive                                                              
(green muchDarker)              bold)
        (pragmaKeyword                                          (green 
muchDarker)              bold)
        (pragmaUnary                                                    (green 
muchDarker)              bold)
        (pragmaBinary                                                   (green 
muchDarker)              bold)                                                  
                 
        (externalFunctionCallingConvention              (green muchDarker)      
        bold)
        (module                                                                 
(green muchDarker)              bold)
        (blockTempVar                                                   gray    
        italic)
        (blockPatternTempVar                                    gray            
italic)
        (instVar                                                                
black           bold)
        (workspaceVar                                                   black   
        bold)
        (undefinedIdentifier                                            red     
                bold)
        (incompleteIdentifier                                   (gray darker)   
(italic underlined))
        (tempVar                                                                
(gray darker)   italic)
        (patternTempVar                                         (gray darker)   
italic)
        (poolConstant                                                   (gray 
darker)   italic)
        (classVar                                                               
(gray darker)   bold)
        (globalVar                                                              
black           bold) )

--
Ramon Leon
http://onsmalltalk.com

_______________________________________________
Pharo-project mailing list
[email protected]
http://lists.gforge.inria.fr/cgi-bin/mailman/listinfo/pharo-project

Reply via email to