AbstractLauncherApplication.st
changeset 7484 d8ff12aafbaa
parent 7455 9003f35c3458
child 7558 497fa89b8a20
equal deleted inserted replaced
7483:d7000d278831 7484:d8ff12aafbaa
  4823     listUpdater := [
  4823     listUpdater := [
  4824         |listOfStyles lastSelection|
  4824         |listOfStyles lastSelection|
  4825 
  4825 
  4826         lastSelection := list selection.
  4826         lastSelection := list selection.
  4827         listOfStyles := dir select:[:aFileName | aFileName asFilename hasSuffix:'style'].
  4827         listOfStyles := dir select:[:aFileName | aFileName asFilename hasSuffix:'style'].
  4828         listOfStyles := listOfStyles collect:[:aFileName | aFileName asFilename withoutSuffix name].
  4828         listOfStyles := listOfStyles collect:[:aFileName | aFileName asFilename nameWithoutSuffix].
  4829         Filename isCaseSensitive ifFalse:[
  4829         Filename isCaseSensitive ifFalse:[
  4830             listOfStyles := listOfStyles collect:[:aStyleName | aStyleName asLowercase].
  4830             listOfStyles := listOfStyles collect:[:aStyleName | aStyleName asLowercase].
  4831         ].
  4831         ].
  4832         listOfStyles remove:'generic' ifAbsent:nil; remove:'mswindows3' ifAbsent:nil.
  4832         listOfStyles remove:'generic' ifAbsent:nil; remove:'mswindows3' ifAbsent:nil.
  4833         showStandardStylesOnly value ifTrue:[
  4833         showStandardStylesOnly value ifTrue:[
  4898 
  4898 
  4899     "
  4899     "
  4900      self viewStyleSettingsFor:nil
  4900      self viewStyleSettingsFor:nil
  4901     "
  4901     "
  4902 
  4902 
  4903     "Modified: / 14.9.1998 / 20:33:59 / cg"
  4903     "Modified: / 07-11-2006 / 13:58:06 / cg"
  4904 ! !
  4904 ! !
  4905 
  4905 
  4906 !AbstractLauncherApplication::LauncherDialogs class methodsFor:'dialogs-file'!
  4906 !AbstractLauncherApplication::LauncherDialogs class methodsFor:'dialogs-file'!
  4907 
  4907 
  4908 objectModuleDialog
  4908 objectModuleDialog
  6552 ! !
  6552 ! !
  6553 
  6553 
  6554 !AbstractLauncherApplication class methodsFor:'documentation'!
  6554 !AbstractLauncherApplication class methodsFor:'documentation'!
  6555 
  6555 
  6556 version
  6556 version
  6557     ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.340 2006-10-23 18:38:03 cg Exp $'
  6557     ^ '$Header: /cvs/stx/stx/libtool/AbstractLauncherApplication.st,v 1.341 2006-11-07 12:59:24 cg Exp $'
  6558 ! !
  6558 ! !