- File:
-
- 1 edited
Legend:
- Unmodified
- Added
- Removed
-
perl/lib/BarnOwl/Style/Default.pm
rad0dedd r0fe69d2 168 168 ? '@color(cyan)' : ''; 169 169 170 my $chars = $oneline ? qr/[[:cntrl:]]/ : qr/[^[:print:] ]|[\r\cK\f]/;170 my $chars = $oneline ? qr/[[:cntrl:]]/ : qr/[^[:print:]\n]|[\r\cK\f]/; 171 171 172 172 $s =~ s/($chars)/ … … 179 179 180 180 As above, but always be conservative, and replace with a '?' instead 181 of something m more elaborate.181 of something more elaborate. 182 182 183 183 =cut
Note: See TracChangeset
for help on using the changeset viewer.