comparison lib/Slideshow/Util.pm @ 34:448db64959d0 fix

close
author Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
date Tue, 01 May 2018 09:34:46 +0900
parents 2eac67c0d7da
children
comparison
equal deleted inserted replaced
33:2eac67c0d7da 34:448db64959d0
31 unless (defined $arg){ 31 unless (defined $arg){
32 return { help => 1}; 32 return { help => 1};
33 } 33 }
34 34
35 if ($arg eq "new") { 35 if ($arg eq "new") {
36 return[\new(set_template('lib/template.md'),"slides")]; 36 return[\&new(\&set_template('lib/template.md'),"slides")];
37 } elsif ( $arg eq "upload") { 37 } elsif ( $arg eq "upload") {
38 return [\upload() ]; 38 return [\&upload() ];
39 } elsif ( $arg eq "build") { 39 } elsif ( $arg eq "build") {
40 return [\build_recently()]; 40 return [\build_recently()];
41 } elsif ( $arg eq "build-open"){ 41 } elsif ( $arg eq "build-open"){
42 return [\build_recently("slides"),\open_slide()]; 42 return [\build_recently("slides"),\open_slide()];
43 } elsif ( $arg eq "open"){ 43 } elsif ( $arg eq "open"){