Smalltalk.st
changeset 22650 580198cee5f9
parent 22636 7607be4b8c15
child 22679 be7996acb8aa
equal deleted inserted replaced
22649:ad0f62637e91 22650:580198cee5f9
       
     1 "{ Encoding: utf8 }"
       
     2 
     1 "
     3 "
     2  COPYRIGHT (c) 1988 by Claus Gittinger
     4  COPYRIGHT (c) 1988 by Claus Gittinger
     3 	      All Rights Reserved
     5 	      All Rights Reserved
     4 
     6 
     5  This software is furnished under a license and may be used
     7  This software is furnished under a license and may be used
  3285     |cls sym nonMeta idx prefix rest namespace nsNameSymbol|
  3287     |cls sym nonMeta idx prefix rest namespace nsNameSymbol|
  3286 
  3288 
  3287     "Quick try - if everything is loaded, this will succeed.
  3289     "Quick try - if everything is loaded, this will succeed.
  3288      But be careful, to not invent new symbols ..."
  3290      But be careful, to not invent new symbols ..."
  3289     sym := aString asSymbolIfInterned.
  3291     sym := aString asSymbolIfInterned.
  3290     sym notNil ifTrue:[
  3292     sym isSymbol ifTrue:[
  3291         cls := self at:sym ifAbsent:nil.
  3293         cls := self at:sym ifAbsent:nil.
  3292         cls isBehavior ifTrue:[^ cls].
  3294         cls isBehavior ifTrue:[^ cls].
  3293     ].
  3295     ].
  3294 
  3296 
  3295     (aString endsWith:' class') ifTrue:[
  3297     (aString endsWith:' class') ifTrue:[
  8779     bit := 'bit'.
  8781     bit := 'bit'.
  8780 
  8782 
  8781     (lang == #de) ifTrue:[
  8783     (lang == #de) ifTrue:[
  8782         proto := 'Willkommen bei %1 (%4Version %2 von %3)'. bit := 'Bit'.
  8784         proto := 'Willkommen bei %1 (%4Version %2 von %3)'. bit := 'Bit'.
  8783     ] ifFalse:[ (lang == #fr) ifTrue:[
  8785     ] ifFalse:[ (lang == #fr) ifTrue:[
  8784         proto := 'Salut, Bienvenue à %1 (%4version %2 de %3)'
  8786         proto := 'Salut, Bienvenue à %1 (%4version %2 de %3)'
  8785     ] ifFalse:[ (lang == #it) ifTrue:[
  8787     ] ifFalse:[ (lang == #it) ifTrue:[
  8786         proto := 'Ciao, benvenuto al %1 (%4versione %2 di %3)'
  8788         proto := 'Ciao, benvenuto al %1 (%4versione %2 di %3)'
  8787     ] ifFalse:[ (lang == #es) ifTrue:[
  8789     ] ifFalse:[ (lang == #es) ifTrue:[
  8788         proto := 'Hola, bienvenida a %1 (%4version %2 de %3)'
  8790         proto := 'Hola, bienvenida a %1 (%4version %2 de %3)'
  8789     ] ifFalse:[ (lang == #pt) ifTrue:[
  8791     ] ifFalse:[ (lang == #pt) ifTrue:[
  8790         proto := 'Olá!!, mem-vindo a %1 (%4version %2 de %3)'
  8792         proto := 'Olá!!, mem-vindo a %1 (%4version %2 de %3)'
  8791     ] ifFalse:[ (lang == #no) ifTrue:[
  8793     ] ifFalse:[ (lang == #no) ifTrue:[
  8792         proto := 'Hei, verdenmottakelse til %1 (%4versjon %2 av %3)'
  8794         proto := 'Hei, verdenmottakelse til %1 (%4versjon %2 av %3)'
  8793     ]]]]]].
  8795     ]]]]]].
  8794 
  8796 
  8795     "/ ... more needed here ...
  8797     "/ ... more needed here ...