Mercurial > hg > Members > anatofuz > slides
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"){ |