line |
true |
false |
branch |
314
|
3 |
12 |
if ($_ < 128) { } |
316
|
0 |
3 |
if $c < 0 |
320
|
0 |
12 |
if $c > 255 |
340
|
0 |
0 |
unless platformPermitted() |
358
|
1 |
0 |
if (@_) |
378
|
1 |
0 |
if ($input =~ /rgb\((\d+),(\d+),(\d+)\)/) |
402
|
2 |
0 |
if ($rawfont =~ s/^([^,]+),//) |
406
|
0 |
2 |
if ($rawfont =~ s/^([^\d]+)//) |
412
|
2 |
0 |
if ($rawfont =~ s/^(\d+)//) |
434
|
1 |
1 |
unless defined $remove |
437
|
2 |
0 |
if (-e $file) |
438
|
0 |
2 |
unless (open XDEF, "<$file") |
439
|
0 |
0 |
if $verbose |
444
|
49 |
15 |
if ($inside) { } |
445
|
1 |
48 |
if ($l eq $marker) |
449
|
1 |
14 |
if ($l eq $marker) { } |
452
|
0 |
1 |
unless $remove |
460
|
1 |
1 |
unless ($found) |
463
|
0 |
2 |
unless (open XDEFO, ">$file") |
464
|
0 |
0 |
if $verbose |
510
|
0 |
0 |
unless platformPermitted() |
511
|
0 |
0 |
if $no_gtk |
512
|
0 |
0 |
if (open OFILE, ">", $out_file) |
516
|
0 |
0 |
if $delete_output |
531
|
0 |
1 |
if $no_gtk |
532
|
0 |
1 |
unless platformPermitted() |
537
|
3 |
1 |
unless $_ eq "main" |
548
|
1 |
33 |
unless defined $val |
549
|
13 |
21 |
if ($name eq 'main') { } |
573
|
0 |
7 |
unless (defined $group) |
574
|
0 |
0 |
if $verbose |
577
|
0 |
7 |
unless defined $members |
578
|
0 |
7 |
unless defined $options |
579
|
0 |
7 |
if (exists $groups{$group}) { } |
582
|
0 |
0 |
if $verbose |
612
|
2 |
0 |
if (groupExists($group)) |
613
|
1 |
1 |
if ($group eq "main") |
614
|
0 |
1 |
if $verbose |
634
|
0 |
41 |
unless (defined $group) |
635
|
0 |
0 |
if $verbose |
638
|
1 |
40 |
unless (exists $groups{$group}) |
639
|
0 |
1 |
if $verbose |
658
|
2 |
0 |
if (groupExists($group)) |
659
|
0 |
2 |
if ($group eq "main") |
680
|
1 |
0 |
if (groupExists($group)) |
681
|
0 |
1 |
if ($group eq "main") |
702
|
1 |
0 |
if (groupExists($group)) |
703
|
0 |
1 |
if ($group eq "main") |
725
|
29 |
0 |
if (groupExists($group)) |
727
|
0 |
29 |
unless (defined $option) |
728
|
0 |
0 |
if $verbose |
731
|
27 |
2 |
if (@_) |
751
|
2 |
0 |
if (groupExists($group)) |
769
|
1 |
0 |
if (groupExists($group)) |
771
|
0 |
1 |
unless (defined $option) |
772
|
0 |
0 |
if $verbose |
791
|
0 |
45 |
if $no_gtk |
792
|
5 |
40 |
if defined $val |
793
|
43 |
2 |
if (exists $gtksettings{$key}) { } |
796
|
0 |
2 |
if $verbose |
812
|
0 |
0 |
if $no_gtk |
828
|
0 |
1 |
if $no_gtk |
829
|
1 |
0 |
if (exists $gtksettings{$key}) { } |
832
|
0 |
0 |
if $verbose |
847
|
0 |
2 |
unless platformPermitted() |
899
|
5 |
14 |
if (length $hex < 2) |
914
|
0 |
2 |
unless platformPermitted() |
917
|
2 |
0 |
if (open OFILE, '<', $cf) { } |
920
|
140 |
0 |
if ($line =~ s/\@define-color\s//) |
921
|
140 |
0 |
if ($line =~ /([^\s]+)\s([^;]+);/) |
924
|
0 |
140 |
if $color =~ /^rgb\(/ |
932
|
0 |
0 |
if $verbose |
936
|
2 |
0 |
if (open OFILE, '<', $sf) { } |
939
|
22 |
2 |
if ($line =~ /([^=]+)=([^\n]+)/) |
944
|
2 |
0 |
if (exists $gtksettings{'gtk-font-name'}) |
949
|
0 |
0 |
if $verbose |
966
|
0 |
7 |
if $Tk::GtkSettings::Config{'osname'} eq "MSWin32" or $Tk::GtkSettings::Config{'osname'} eq "darwin" |
1024
|
0 |
0 |
unless platformPermitted() |
1025
|
0 |
0 |
if $no_gtk |
1026
|
0 |
0 |
if (open OFILE, ">", $out_file) |
1030
|
0 |
0 |
if $delete_output |
1074
|
140 |
3594 |
if (substr($name, 0, length $key) eq $key) |