equal
deleted
inserted
replaced
247 |
247 |
248 rule := self ruleHolder value. |
248 rule := self ruleHolder value. |
249 rule isNil ifTrue:[^ self]. |
249 rule isNil ifTrue:[^ self]. |
250 |
250 |
251 RBBuiltinRuleSet rulesetBuiltinDefault rejectRules:[:r | r class == rule class]. |
251 RBBuiltinRuleSet rulesetBuiltinDefault rejectRules:[:r | r class == rule class]. |
|
252 "/ how do I disable the rule in the current smalllint checker service? |
252 self close. |
253 self close. |
253 ! |
254 ! |
254 |
255 |
255 doQuickFix: quickFixNo |
256 doQuickFix: quickFixNo |
256 self closeDownViews. |
257 self closeDownViews. |
490 ! ! |
491 ! ! |
491 |
492 |
492 !CriticsWindow class methodsFor:'documentation'! |
493 !CriticsWindow class methodsFor:'documentation'! |
493 |
494 |
494 version |
495 version |
495 ^ '$Header: /cvs/stx/stx/goodies/smallsense/SmallSense__CriticsWindow.st,v 1.6 2015-03-19 11:17:17 cg Exp $' |
496 ^ '$Header: /cvs/stx/stx/goodies/smallsense/SmallSense__CriticsWindow.st,v 1.7 2015-03-27 11:34:51 cg Exp $' |
496 ! |
497 ! |
497 |
498 |
498 version_CVS |
499 version_CVS |
499 ^ '$Header: /cvs/stx/stx/goodies/smallsense/SmallSense__CriticsWindow.st,v 1.6 2015-03-19 11:17:17 cg Exp $' |
500 ^ '$Header: /cvs/stx/stx/goodies/smallsense/SmallSense__CriticsWindow.st,v 1.7 2015-03-27 11:34:51 cg Exp $' |
500 ! |
501 ! |
501 |
502 |
502 version_HG |
503 version_HG |
503 |
504 |
504 ^ '$Changeset: <not expanded> $' |
505 ^ '$Changeset: <not expanded> $' |
505 ! |
506 ! |
506 |
507 |
507 version_SVN |
508 version_SVN |
508 ^ '$Id: SmallSense__CriticsWindow.st,v 1.6 2015-03-19 11:17:17 cg Exp $' |
509 ^ '$Id: SmallSense__CriticsWindow.st,v 1.7 2015-03-27 11:34:51 cg Exp $' |
509 ! ! |
510 ! ! |
510 |
511 |