FileBrowserV2.st
changeset 4451 6f06f760a64b
parent 4390 e9e2343d5569
child 4454 c85336c15975
equal deleted inserted replaced
4450:1a32891be764 4451:6f06f760a64b
  1144 !
  1144 !
  1145 
  1145 
  1146 selectedImage
  1146 selectedImage
  1147     |files selectedFile mime img|
  1147     |files selectedFile mime img|
  1148 
  1148 
  1149     files := self currentFileNameHolder value.
  1149     files := self currentSelectedFiles.
  1150     files size >= 1 ifFalse:[
  1150     files size >= 1 ifFalse:[
  1151         ^ nil
  1151         ^ nil
  1152     ].
  1152     ].
  1153     selectedFile := files last.    
  1153     selectedFile := files last.    
  1154 
  1154 
  1508 ! !
  1508 ! !
  1509 
  1509 
  1510 !FileBrowserV2 class methodsFor:'documentation'!
  1510 !FileBrowserV2 class methodsFor:'documentation'!
  1511 
  1511 
  1512 version
  1512 version
  1513     ^ '$Header: /cvs/stx/stx/libtool/FileBrowserV2.st,v 1.59 2002-12-18 10:27:50 penk Exp $'
  1513     ^ '$Header: /cvs/stx/stx/libtool/FileBrowserV2.st,v 1.60 2003-01-20 08:38:29 penk Exp $'
  1514 ! !
  1514 ! !
  1515 
  1515 
  1516 FileBrowserV2 initialize!
  1516 FileBrowserV2 initialize!