Use underlines and bold in NAOdash CLI
authorMarius Gavrilescu <marius@ieval.ro>
Mon, 17 Aug 2015 19:49:19 +0000 (22:49 +0300)
committerMarius Gavrilescu <marius@ieval.ro>
Mon, 17 Aug 2015 19:49:19 +0000 (22:49 +0300)
lib/App/NAOdash.pm

index 78428a3..f80a0fd 100644 (file)
@@ -85,9 +85,10 @@ EOF
 
        my $rst = RESET;
        for my $check (@order) {
-               my $color = (grep { $_ eq $check } @checks) ? GREEN '✓' : RED '✗';
+               my $color = (grep { $_ eq $check } @checks) ? GREEN UNDERLINE : RED;
                $base =~ s/#([a-zA-Z-]+)/$color$1$rst/;
        }
+       $base =~ s/([A-Z ]+)\n=*/BOLD($1).RESET/ge;
 
        $base
 }
This page took 0.011483 seconds and 4 git commands to generate.