Tools__TagList.st
branchjv
changeset 16571 cf319f2e56d0
parent 16285 7009be618265
parent 16509 df40466ef30d
child 17136 cb908d2ba02e
equal deleted inserted replaced
16570:dc5e958a20dc 16571:cf319f2e56d0
  3411 
  3411 
  3412         rest := (l copyFrom:4) withoutSeparators.
  3412         rest := (l copyFrom:4) withoutSeparators.
  3413         rest isEmpty ifTrue:[^ nil].
  3413         rest isEmpty ifTrue:[^ nil].
  3414         (rest conform:[:ch | ch == $;]) ifTrue:[^ nil].
  3414         (rest conform:[:ch | ch == $;]) ifTrue:[^ nil].
  3415         ^ Tag::TDocumentation 
  3415         ^ Tag::TDocumentation 
  3416                         label:(rest colorizeAllWith:(Color blue "grey")) 
  3416                         label:(rest withColor:(Color blue "grey")) 
  3417                         pattern:nil
  3417                         pattern:nil
  3418                         type:nil
  3418                         type:nil
  3419                         lineNumber:lineNr.
  3419                         lineNumber:lineNr.
  3420     ].
  3420     ].
  3421 
  3421