AbstractFileBrowser.st
branchjv
changeset 16093 a0705d7461fd
parent 15982 159a73773eb4
parent 16084 8632ae52e598
child 16104 ecc764285f6f
equal deleted inserted replaced
16081:f36d893e95d2 16093:a0705d7461fd
  6476     |textHolder dialog template dummyClass dummyInstance|
  6476     |textHolder dialog template dummyClass dummyInstance|
  6477 
  6477 
  6478     template :=
  6478     template :=
  6479 '"/ Smalltalk script:
  6479 '"/ Smalltalk script:
  6480 
  6480 
  6481 "/ the following variables are accessable:
  6481 "/ the following variables are accessible:
  6482 "/      directory       (= ' , (self theSingleSelectedDirectoryOrNil ? Filename homeDirectory) pathName , ')
  6482 "/      directory       (= ' , (self theSingleSelectedDirectoryOrNil ? Filename homeDirectory) pathName , ')
  6483 "/      selectedFiles   (= ...)
  6483 "/      selectedFiles   (= ...)
  6484 "/
  6484 "/
  6485 "/ Beginner warning: Smalltalk know-how is useful here ;-).
  6485 "/ Beginner warning: Smalltalk know-how is useful here ;-).
  6486 "/
  6486 "/