Tools__TagsBrowser.st
changeset 13664 c11682792269
parent 13632 970c41229951
child 13963 b048c8534c2c
equal deleted inserted replaced
13663:497ca003a6dc 13664:c11682792269
  2448 filter:aString
  2448 filter:aString
  2449     list filter:aString.
  2449     list filter:aString.
  2450 !
  2450 !
  2451 
  2451 
  2452 list:aList
  2452 list:aList
  2453     "/ (list isKindOf:Tools::TagList) ifFalse:[self halt].
  2453     (aList isNil or:[aList isKindOf:Tools::TagList]) ifFalse:[self halt].
  2454     super list:aList.
  2454     super list:aList.
       
  2455 !
       
  2456 
       
  2457 newDefaultList
       
  2458     ^ TagList new
  2455 !
  2459 !
  2456 
  2460 
  2457 tagLineNr:lineNr
  2461 tagLineNr:lineNr
  2458     "remember line nr for which a tag should be highlighted.
  2462     "remember line nr for which a tag should be highlighted.
  2459      (will set my selection late, when the taglist is available"
  2463      (will set my selection late, when the taglist is available"
  2564      return true, if a background job for generation has been started"
  2568      return true, if a background job for generation has been started"
  2565 
  2569 
  2566     |tagFile|
  2570     |tagFile|
  2567 
  2571 
  2568     "/ ugly hack to suppress generation if the taglist is externally provided
  2572     "/ ugly hack to suppress generation if the taglist is externally provided
  2569     (list isKindOf:Tools::TagList) ifFalse:[^ false].
  2573     (list isKindOf:Tools::TagList) ifFalse:[
       
  2574         ^ false
       
  2575     ].
  2570 
  2576 
  2571     Tag autoload.
  2577     Tag autoload.
  2572 
  2578 
  2573     self stopGeneratingTags.
  2579     self stopGeneratingTags.
  2574 
  2580 
  2678 ! !
  2684 ! !
  2679 
  2685 
  2680 !TagsBrowser class methodsFor:'documentation'!
  2686 !TagsBrowser class methodsFor:'documentation'!
  2681 
  2687 
  2682 version
  2688 version
  2683     ^ '$Header: /cvs/stx/stx/libtool/Tools__TagsBrowser.st,v 1.42 2013-10-13 17:56:37 cg Exp $'
  2689     ^ '$Header: /cvs/stx/stx/libtool/Tools__TagsBrowser.st,v 1.43 2013-11-06 19:04:48 cg Exp $'
  2684 !
  2690 !
  2685 
  2691 
  2686 version_CVS
  2692 version_CVS
  2687     ^ '$Header: /cvs/stx/stx/libtool/Tools__TagsBrowser.st,v 1.42 2013-10-13 17:56:37 cg Exp $'
  2693     ^ '$Header: /cvs/stx/stx/libtool/Tools__TagsBrowser.st,v 1.43 2013-11-06 19:04:48 cg Exp $'
  2688 !
  2694 !
  2689 
  2695 
  2690 version_SVN
  2696 version_SVN
  2691     ^ '$Id: Tools__TagsBrowser.st,v 1.42 2013-10-13 17:56:37 cg Exp $'
  2697     ^ '$Id: Tools__TagsBrowser.st,v 1.43 2013-11-06 19:04:48 cg Exp $'
  2692 ! !
  2698 ! !
  2693 
  2699