DirectoryTreeBrowser.st
changeset 17539 e0e5ab9149d0
parent 17205 5f737b63fa71
child 17825 83273b82d3a3
equal deleted inserted replaced
17538:d29a8ed1cc7f 17539:e0e5ab9149d0
  1024     ].
  1024     ].
  1025     string := stream contents.
  1025     string := stream contents.
  1026     stream close.
  1026     stream close.
  1027 
  1027 
  1028     fnName := 'ui_menuitem.xpm'.
  1028     fnName := 'ui_menuitem.xpm'.
  1029     ^ Array with:(LabelAndIcon icon:(Image fromFile:fnName)
  1029     ^ Array with:(LabelAndIcon icon:(Image fromFile:fnName) string:(string allBold))
  1030                              string:(Text string:string emphasis:#bold)
  1030 
  1031                  )
  1031     "Modified (format): / 20-06-2017 / 08:17:36 / cg"
  1032 !
  1032 !
  1033 
  1033 
  1034 removeExpandItemTimedBlock
  1034 removeExpandItemTimedBlock
  1035     |b|
  1035     |b|
  1036 
  1036