SmallSense__SmalltalkQuickFixer.st
branchcvs_MAIN
changeset 963 edbbe61fe447
parent 876 43f96cd0eee1
child 969 123ea43adc5e
--- a/SmallSense__SmalltalkQuickFixer.st	Fri May 13 14:46:08 2016 +0200
+++ b/SmallSense__SmalltalkQuickFixer.st	Fri May 13 14:46:21 2016 +0200
@@ -1,5 +1,3 @@
-"{ Encoding: utf8 }"
-
 "
 stx:goodies/smallsense - A productivity plugin for Smalltalk/X IDE
 Copyright (C) 2013-2014 Jan Vrany
@@ -79,8 +77,8 @@
 !SmalltalkQuickFixer methodsFor:'adding'!
 
 fix
-    "Create and return new quick fix. Caller MUST set its 
-     rule, label and action"
+    "Create and return new quick fix. 
+     Caller MUST set its rule, label and action"
 
     | fix |
 
@@ -105,13 +103,11 @@
 
 performFix: index
 
-    index <= fixes size ifTrue:[
-        (fixes at: index) performFix.
-    ] ifFalse:[
-        ^ Dialog warn: ('No such fix (%1)' bindWith: index).
-    ]
-
-    "Created: / 16-02-2012 / 14:48:38 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    index > fixes size ifTrue:[
+        Dialog warn: ('No such fix (%1)' bindWith: index).
+        ^ self
+    ].    
+    (fixes at: index) performFix.
 ! !
 
 !SmalltalkQuickFixer methodsFor:'utilities'!