Merged 172822a63cff and 9e5790683f85
authorJan Vrany <jan.vrany@fit.cvut.cz>
Wed, 09 Jul 2014 08:12:29 +0100
changeset 247 5b0a13159028
parent 245 172822a63cff (current diff)
parent 246 9e5790683f85 (diff)
child 248 22630ae00743
Merged 172822a63cff and 9e5790683f85
SmallSense__SmalltalkEditSupport.st
--- a/SmallSense__SmalltalkEditSupport.st	Tue Jun 24 11:42:58 2014 +0100
+++ b/SmallSense__SmalltalkEditSupport.st	Wed Jul 09 08:12:29 2014 +0100
@@ -394,7 +394,7 @@
     "/ ']', then remeber it.
     closingBracketIndex := 0.
     line size > textView cursorCol ifTrue: [
-        line size downTo: textView cursorCol - 1 do:[:i |
+        line size downTo: ((textView cursorCol - 1) max: 1) do:[:i |
             (c :=line at:i) == Character space ifFalse:[
                 (c == $] and:[closingBracketIndex == 0]) ifTrue:[
                     closingBracketIndex := i.
@@ -485,7 +485,7 @@
     ^ false.
 
     "Created: / 25-07-2013 / 00:02:56 / Jan Vrany <jan.vrany@fit.cvut.cz>"
-    "Modified: / 22-01-2014 / 21:44:38 / Jan Vrany <jan.vrany@fit.cvut.cz>"
+    "Modified: / 23-06-2014 / 20:22:56 / Jan Vrany <jan.vrany@fit.cvut.cz>"
 !
 
 keyPressReturnToken