# HG changeset patch
# User Takahiro SHIMIZU <anatofuz@cr.ie.u-ryukyu.ac.jp>
# Date 1525760698 -32400
# Node ID deed6fa2e4893a8b93cbda50f10f14b9a0a48583
# Parent  b887347d2d2b671b5de84709cd66ac96148a9ed4
fix regex

diff -r b887347d2d2b -r deed6fa2e489 lib/CLI.pm
--- a/lib/CLI.pm	Tue May 08 10:16:46 2018 +0900
+++ b/lib/CLI.pm	Tue May 08 15:24:58 2018 +0900
@@ -82,13 +82,17 @@
     $self->cmd_build($target);
     if($target){
         $target =~ s/\.md$/\.html/;
+    } else {
+       my @targets = $self->_search_recently_day()->children(qr/(?<!pdf)\.html$/);
+       p @targets;
+       $target = pop @targets;
     }
     $self->cmd_open(path($target));
 }
 
 sub cmd_open {
     my($self,$slide) = @_;
-    
+
     my $target;
 
     if ($slide){
@@ -164,10 +168,10 @@
 }
 
 sub cmd_zip {
-    my ($self) = @_;
+    my ($self)     = @_;
     my $recent_day = $self->_search_recently_day();
-    my $t = localtime;
-    my $zip = $recent_day->child('zip.txt')->touch->opena;
+    my $t          = localtime;
+    my $zip        = $recent_day->child('zip.txt')->touch->opena;
 
     $t-= ONE_WEEK;