--- 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