| line | stmt | bran | cond | sub | pod | time | code | 
| 1 |  |  |  |  |  |  | package Bot::Cobalt::IRC::Event::Topic; | 
| 2 |  |  |  |  |  |  | $Bot::Cobalt::IRC::Event::Topic::VERSION = '0.021001'; | 
| 3 | 6 |  |  | 6 |  | 14280 | use strictures 2; | 
|  | 6 |  |  |  |  | 1214 |  | 
|  | 6 |  |  |  |  | 178 |  | 
| 4 | 6 |  |  | 6 |  | 1182 | use Bot::Cobalt::Common qw/:types :string/; | 
|  | 6 |  |  |  |  | 7 |  | 
|  | 6 |  |  |  |  | 46 |  | 
| 5 |  |  |  |  |  |  |  | 
| 6 | 6 |  |  | 6 |  | 450 | use Moo; | 
|  | 6 |  |  |  |  | 5875 |  | 
|  | 6 |  |  |  |  | 23 |  | 
| 7 |  |  |  |  |  |  | extends 'Bot::Cobalt::IRC::Event::Channel'; | 
| 8 |  |  |  |  |  |  |  | 
| 9 |  |  |  |  |  |  | has topic => ( | 
| 10 |  |  |  |  |  |  | required  => 1, | 
| 11 |  |  |  |  |  |  | is        => 'rw', | 
| 12 |  |  |  |  |  |  | isa       => Str, | 
| 13 |  |  |  |  |  |  | ); | 
| 14 |  |  |  |  |  |  |  | 
| 15 |  |  |  |  |  |  | has stripped => ( | 
| 16 |  |  |  |  |  |  | lazy      => 1, | 
| 17 |  |  |  |  |  |  | is        => 'ro', | 
| 18 |  |  |  |  |  |  | isa       => Str, | 
| 19 |  |  |  |  |  |  | default   => sub { | 
| 20 |  |  |  |  |  |  | strip_color( strip_formatting( $_[0]->topic ) ) | 
| 21 |  |  |  |  |  |  | }, | 
| 22 |  |  |  |  |  |  | ); | 
| 23 |  |  |  |  |  |  |  | 
| 24 |  |  |  |  |  |  | 1; | 
| 25 |  |  |  |  |  |  | __END__ |