FindFileApplication.st
changeset 14748 e6132b5f9f68
parent 14064 7aa0a1075ee8
child 15092 1684fd8d6a41
equal deleted inserted replaced
14747:f00c8f1bac55 14748:e6132b5f9f68
  1692 doFindFileNamed:namePatterns directories:searchDirectories nameMatch:nameMatch contentsMatch:doesFileMatch in:aDirectory
  1692 doFindFileNamed:namePatterns directories:searchDirectories nameMatch:nameMatch contentsMatch:doesFileMatch in:aDirectory
  1693     |dir subDirs list directoryContents|
  1693     |dir subDirs list directoryContents|
  1694 
  1694 
  1695     dir := aDirectory asFilename.
  1695     dir := aDirectory asFilename.
  1696 
  1696 
  1697     self 
  1697     self window shown ifTrue:[
  1698         changeInformationTo:('%1 found - searching %2' 
  1698         self 
  1699                                 bindWith:resultList size
  1699             changeInformationTo:('%1 found - searching %2' 
  1700                                 with:((dir name) copyFrom:(self searchDirectoryHolder value asString size + 1))) 
  1700                                     bindWith:resultList size
  1701         toTab:false.
  1701                                     with:((dir name) copyFrom:(self searchDirectoryHolder value asString size + 1))) 
  1702 
  1702             toTab:false.
       
  1703     ].
  1703     list := self resultList.
  1704     list := self resultList.
  1704 
  1705 
  1705     subDirs := OrderedCollection new.
  1706     subDirs := OrderedCollection new.
  1706 
  1707 
  1707     [
  1708     [
  1872 ! !
  1873 ! !
  1873 
  1874 
  1874 !FindFileApplication class methodsFor:'documentation'!
  1875 !FindFileApplication class methodsFor:'documentation'!
  1875 
  1876 
  1876 version
  1877 version
  1877     ^ '$Header: /cvs/stx/stx/libtool/FindFileApplication.st,v 1.112 2014-02-26 15:10:37 cg Exp $'
  1878     ^ '$Header: /cvs/stx/stx/libtool/FindFileApplication.st,v 1.113 2014-09-30 09:24:43 cg Exp $'
  1878 !
  1879 !
  1879 
  1880 
  1880 version_CVS
  1881 version_CVS
  1881     ^ '$Header: /cvs/stx/stx/libtool/FindFileApplication.st,v 1.112 2014-02-26 15:10:37 cg Exp $'
  1882     ^ '$Header: /cvs/stx/stx/libtool/FindFileApplication.st,v 1.113 2014-09-30 09:24:43 cg Exp $'
  1882 ! !
  1883 ! !
  1883 
  1884