# HG changeset patch
# User Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
# Date 1516886320 -32400
# Node ID 46b1a85d810bcc3d6c6685ff98e9012d27559344
# Parent  805ada9caa5db58270dad11b43b8159f0914a5e6
auto-Update generated slides by script

diff -r 805ada9caa5d -r 46b1a85d810b slide-cr.pl
--- /dev/null	Thu Jan 01 00:00:00 1970 +0000
+++ b/slide-cr.pl	Thu Jan 25 22:18:40 2018 +0900
@@ -0,0 +1,30 @@
+#!/usr/bin/env perl
+use strict;
+use warnings;
+use utf8;
+
+use lib "lib","lib/Slideshow/local/lib/perl5";
+
+use Slideshow::Util;
+use feature 'say';
+
+my $flags = getopts(@ARGV);
+
+help() if $flags->{help};
+
+
+if ($flags->{new}){
+    new(set_template('lib/template.md'),"slides");
+} elsif ($flags->{build}) {
+   build_recently("slides");
+} else {
+    build_pinpoint($flags->{build_point});
+}
+
+
+sub help {
+    say 'slider [%options]';
+}
+
+
+__END__
\ No newline at end of file
diff -r 805ada9caa5d -r 46b1a85d810b slide_cr.pl
--- a/slide_cr.pl	Thu Jan 25 18:49:07 2018 +0900
+++ /dev/null	Thu Jan 01 00:00:00 1970 +0000
@@ -1,30 +0,0 @@
-#!/usr/bin/env perl
-use strict;
-use warnings;
-use utf8;
-
-use lib "lib","lib/Slideshow/local/lib/perl5";
-
-use Slideshow::Util;
-use feature 'say';
-
-my $flags = getopts(@ARGV);
-
-help() if $flags->{help};
-
-
-if ($flags->{new}){
-    new(set_template('lib/template.md'),"slides");
-} elsif ($flags->{build}) {
-   build_recently("slides");
-} else {
-    build_pinpoint($flags->{build_point});
-}
-
-
-sub help {
-    say 'slider [%options]';
-}
-
-
-__END__
\ No newline at end of file