Tools__LintRuleSettingsApplication.st
branchjv
changeset 16664 ef51c9c52b52
parent 16573 2f5cd8950dcf
parent 16659 481d4f348b3c
child 18532 cccb41254edf
equal deleted inserted replaced
16646:a5f135955d71 16664:ef51c9c52b52
       
     1 "{ Encoding: utf8 }"
       
     2 
     1 "
     3 "
     2  COPYRIGHT (c) 2006 by eXept Software AG
     4  COPYRIGHT (c) 2006 by eXept Software AG
     3               All Rights Reserved
     5               All Rights Reserved
     4 
     6 
     5  This software is furnished under a license and may be used
     7  This software is furnished under a license and may be used
   570         smallLintRulesetDefault 
   572         smallLintRulesetDefault 
   571             onChangeEvaluate:[
   573             onChangeEvaluate:[
   572                 self updateModifiedChannel.
   574                 self updateModifiedChannel.
   573                 self defaultInBrowserRuleNameHolder 
   575                 self defaultInBrowserRuleNameHolder 
   574                     value:(smallLintRulesetDefault value isNil
   576                     value:(smallLintRulesetDefault value isNil
   575                             ifTrue:[ RBBuiltinRuleSet rulesetBuiltinDefault]
   577                             ifTrue:[ RBBuiltinRuleSet notNil 
       
   578                                         ifTrue:[RBBuiltinRuleSet rulesetBuiltinDefault]
       
   579                                         ifFalse:[nil]]    
   576                             ifFalse:[ smallLintRulesetDefault value name ])
   580                             ifFalse:[ smallLintRulesetDefault value name ])
   577             ].
   581             ].
   578     ].
   582     ].
   579     ^ smallLintRulesetDefault
   583     ^ smallLintRulesetDefault
   580 !
   584 !