Tools__BreakpointBrowser.st
changeset 12585 add379de2916
parent 12564 11b2d9fb6554
child 12626 7ae48abfedac
child 12938 626cbab0ce93
equal deleted inserted replaced
12584:6797149a2942 12585:add379de2916
  1854     ].
  1854     ].
  1855     ^ className startsWith:aClassNamePattern
  1855     ^ className startsWith:aClassNamePattern
  1856 !
  1856 !
  1857 
  1857 
  1858 relatedToPackage:aPackagePattern
  1858 relatedToPackage:aPackagePattern
  1859     |package|
  1859     |mthd package|
  1860 
  1860 
  1861     package := self method package.
  1861     (mthd := self method) isNil ifTrue:[^ false].
       
  1862     package := mthd package.
  1862     (aPackagePattern includesMatchCharacters) ifTrue:[
  1863     (aPackagePattern includesMatchCharacters) ifTrue:[
  1863          ^ aPackagePattern match: package
  1864          ^ aPackagePattern match: package
  1864     ].
  1865     ].
  1865     ^ package startsWith:aPackagePattern
  1866     ^ package startsWith:aPackagePattern
  1866 ! !
  1867 ! !
  1969 ! !
  1970 ! !
  1970 
  1971 
  1971 !BreakpointBrowser class methodsFor:'documentation'!
  1972 !BreakpointBrowser class methodsFor:'documentation'!
  1972 
  1973 
  1973 version
  1974 version
  1974     ^ '$Header: /cvs/stx/stx/libtool/Tools__BreakpointBrowser.st,v 1.43 2013-03-28 15:26:43 cg Exp $'
  1975     ^ '$Header: /cvs/stx/stx/libtool/Tools__BreakpointBrowser.st,v 1.44 2013-03-30 15:57:52 cg Exp $'
  1975 !
  1976 !
  1976 
  1977 
  1977 version_CVS
  1978 version_CVS
  1978     ^ '$Header: /cvs/stx/stx/libtool/Tools__BreakpointBrowser.st,v 1.43 2013-03-28 15:26:43 cg Exp $'
  1979     ^ '$Header: /cvs/stx/stx/libtool/Tools__BreakpointBrowser.st,v 1.44 2013-03-30 15:57:52 cg Exp $'
  1979 ! !
  1980 ! !
  1980 
  1981 
  1981 
  1982 
  1982 BreakpointBrowser initialize!
  1983 BreakpointBrowser initialize!