Tools__InternationalLanguageTranslationEditor.st
changeset 2416 98dbabd36558
parent 2413 655f1c52504c
child 2419 e71445e7174c
equal deleted inserted replaced
2415:a2067d950208 2416:98dbabd36558
  2765 
  2765 
  2766    self updateExampleLanguageText.
  2766    self updateExampleLanguageText.
  2767 !
  2767 !
  2768 
  2768 
  2769 languageTextAccepted                                   
  2769 languageTextAccepted                                   
  2770     |nextRowIndex|
  2770     |nextRowIndex selRow|
  2771     keyStringsToLanguageMappings size = self selectedKeyRow value
  2771 
  2772         ifTrue:[ self updateLanguageTextModification.]
  2772     selRow := self selectedKeyRow value.
  2773         ifFalse:[ 
  2773     selRow notNil ifTrue:[
  2774             nextRowIndex := self selectedKeyRow value + 1.
  2774         keyStringsToLanguageMappings size = selRow
  2775             self selectedKeyRow value: nextRowIndex].
  2775             ifTrue:[ self updateLanguageTextModification.]
       
  2776             ifFalse:[ 
       
  2777                 nextRowIndex := selRow + 1.
       
  2778                 self selectedKeyRow value: nextRowIndex]
       
  2779     ].
  2776 !
  2780 !
  2777 
  2781 
  2778 pasteOriginalInLanguageText
  2782 pasteOriginalInLanguageText
  2779     <resource: #uiCallback>
  2783     <resource: #uiCallback>
  2780 
  2784