changed #languageTextAccepted
authorClaus Gittinger <cg@exept.de>
Fri, 10 Oct 2008 14:10:30 +0200
changeset 2416 98dbabd36558
parent 2415 a2067d950208
child 2417 cc89133cc041
changed #languageTextAccepted
Tools__InternationalLanguageTranslationEditor.st
--- a/Tools__InternationalLanguageTranslationEditor.st	Fri Oct 10 13:44:39 2008 +0200
+++ b/Tools__InternationalLanguageTranslationEditor.st	Fri Oct 10 14:10:30 2008 +0200
@@ -2767,12 +2767,16 @@
 !
 
 languageTextAccepted                                   
-    |nextRowIndex|
-    keyStringsToLanguageMappings size = self selectedKeyRow value
-        ifTrue:[ self updateLanguageTextModification.]
-        ifFalse:[ 
-            nextRowIndex := self selectedKeyRow value + 1.
-            self selectedKeyRow value: nextRowIndex].
+    |nextRowIndex selRow|
+
+    selRow := self selectedKeyRow value.
+    selRow notNil ifTrue:[
+        keyStringsToLanguageMappings size = selRow
+            ifTrue:[ self updateLanguageTextModification.]
+            ifFalse:[ 
+                nextRowIndex := selRow + 1.
+                self selectedKeyRow value: nextRowIndex]
+    ].
 !
 
 pasteOriginalInLanguageText