line |
true |
false |
branch |
71
|
0 |
0 |
ref $_[0] ? : |
75
|
0 |
0 |
if ($self->sample) { } |
|
0 |
0 |
elsif ($self->run) { } |
|
0 |
0 |
elsif ($self->clean) { } |
|
0 |
0 |
elsif ($self->compile) { } |
|
0 |
0 |
elsif ($self->start) { } |
|
0 |
0 |
elsif ($self->html) { } |
|
0 |
0 |
elsif ($self->text) { } |
|
0 |
0 |
elsif ($self->ghpublish) { } |
|
0 |
0 |
elsif ($self->help) { } |
111
|
0 |
0 |
if cwd() eq "File::HomeDir"->my_home |
118
|
0 |
0 |
unless my $cmd = shift @ARGV |
119
|
0 |
0 |
unless $cmd =~ s/
^-{0,2}(
help |
new |
vroom |
compile |
run |
html |
text |
clean |
ghpublish
)$
/$1/x |
132
|
0 |
0 |
if $cmd eq "vroom" |
133
|
0 |
0 |
if $cmd eq "new" |
139
|
0 |
0 |
unless &GetOptions("input=s", \$self->{'input'}, "skip=i", \$self->{'skip'}) |
141
|
0 |
0 |
unless defined $self->{$_} |
168
|
0 |
0 |
if ($slide =~ /\.pl$/) |
174
|
0 |
0 |
if ($slide =~ /\.py$/) { } |
|
0 |
0 |
elsif ($slide =~ /\.rb$/) { } |
|
0 |
0 |
elsif ($slide =~ /\.php$/) { } |
|
0 |
0 |
elsif ($slide =~ /\.js$/) { } |
|
0 |
0 |
elsif ($slide =~ /\.hs$/) { } |
|
0 |
0 |
elsif ($slide =~ /\.yaml$/) { } |
|
0 |
0 |
elsif ($slide =~ /\.sh$/) { } |
227
|
0 |
0 |
unless $slide =~ /^(\d+)(\.\S+)?$/ |
230
|
0 |
0 |
-e "${num}z$ext" ? : |
248
|
0 |
0 |
$i > 0 ? : |
249
|
0 |
0 |
$i + 1 < @slides ? : |
267
|
0 |
0 |
if $slide =~ /^\d+[a-z]/ |
380
|
0 |
0 |
unless my(@stream) = io($self->input)->slurp |
383
|
0 |
0 |
/^----\s+include\s+(\S+)/ ? : |
399
|
0 |
0 |
if $split[0] =~ /\n/ |
406
|
0 |
0 |
if $slide =~ /$SLIDE_MARKER/ |
412
|
0 |
0 |
if $self->has_notes |
416
|
0 |
0 |
if $config->{'skip'} |
423
|
0 |
0 |
unless $raw_slide = $self->applyOptions($raw_slide, $config) |
428
|
0 |
0 |
if ($self->config->{'skip'} or $self->skip) |
429
|
0 |
0 |
if $self->config->{'skip'} |
430
|
0 |
0 |
if $self->{'skip'} |
434
|
0 |
0 |
if $self->has_notes |
442
|
0 |
0 |
if $config->{'replace'} |
444
|
0 |
0 |
if ($self->config->{'script'}) |
449
|
0 |
0 |
if $config->{'replace'} |
461
|
0 |
0 |
if ($slide =~ s/^\ *!(.*\n)//m) |
465
|
0 |
0 |
if ($config->{'undent'}) |
471
|
0 |
0 |
$i == @slides ? : |
|
0 |
0 |
$suf eq 'a' ? : |
478
|
0 |
0 |
if (my $script = shift @scripts) |
492
|
0 |
0 |
$_[0] =~ s/$TITLE_MARKER// ? : |
493
|
0 |
0 |
$_[0] =~ s/$SLIDE_MARKER(.*)\s*\Z//s ? : |
500
|
0 |
0 |
if ($num_notes_transitions < $num_slide_transitions) { } |
|
0 |
0 |
elsif ($num_notes_transitions > $num_slide_transitions) { } |
524
|
0 |
0 |
$number == 1 ? : |
531
|
0 |
0 |
unless -r $self->notesfile |
543
|
0 |
0 |
if ($_ % 2) { } |
546
|
0 |
0 |
unless defined $title |
568
|
0 |
0 |
unless defined $note |
573
|
0 |
0 |
ref $_ ? : |
635
|
0 |
0 |
if $option =~ /^cd/ |
637
|
0 |
0 |
if $option =~ /^(config|skip|center|replace|$type_list)$/ |
639
|
0 |
0 |
if $option =~ /^(\.\w+)$/ |
641
|
0 |
0 |
if $option =~ /i(\d+)/ |
643
|
0 |
0 |
if $option =~ /i-(\d+)/ |
658
|
0 |
0 |
if ($config->{'config'}) |
664
|
0 |
0 |
if ($config->{'auto_size'}) |
676
|
0 |
0 |
if ($config->{'center'}) { } |
|
0 |
0 |
elsif (defined $config->{'indent'}) { } |
|
0 |
0 |
elsif ($slide =~ /^\+?\*/m) { } |
691
|
0 |
0 |
if (my $e = $types->{$key}) { } |
|
0 |
0 |
elsif ($key =~ s/^cd//) { } |
|
0 |
0 |
elsif ($key =~ s/^\.(\w+)//) { } |
696
|
0 |
0 |
if (my $e = $types->{$key}) |
720
|
0 |
0 |
if ($self->config->{'top'}) |
721
|
0 |
0 |
if $before > 3 |
722
|
0 |
0 |
if $before < 1 |
741
|
0 |
0 |
-e $home_vimrc ? : |
744
|
0 |
0 |
$self->config->{'script'} ? : |
746
|
0 |
0 |
$self->config->{'script'} ? : |
767
|
0 |
0 |
if -e ".vimrc" and not io(".vimrc")->getline =~ /Vroom-\d\.\d\d/ |
805
|
0 |
0 |
if ($self->config->{'vim'} =~ /\bgvim\b/) |
807
|
0 |
0 |
-e $home_gvimrc ? : |
821
|
0 |
0 |
unless $self->config->{'script'} |
856
|
0 |
0 |
if -e $file |
948
|
0 |
0 |
unless -f $input |
950
|
0 |
0 |
unless -d ".git" |
952
|
0 |
0 |
unless -d "/tmp" and -w "/tmp" |
954
|
0 |
0 |
unless `git branch` =~ /\bgh-pages\b/ |