build

1 files changed, 16 insertions, 1 deletions

diff --git a/latest.pl b/latest.pl
index f1d1aa9..33bfb73 100644
--- a/latest.pl
+++ b/latest.pl
@@ -23,6 +23,20 @@ sub process($){
   }
   closedir DIR;
 
+  my $sampz = $path . "samples/";
+  return 0 unless -e $sampz;
+  my $c = 0;
+  opendir DIR, $sampz or die $!;
+  while (readdir DIR) {
+    next unless /wav$/;
+    $c += 1;
+    last;
+  }
+  closedir DIR;
+  if ($c == 0) {
+    return 0;
+  }
+
   my @epoch = split("-", $ep);
   $name .= "-" . $epoch[0];
 
@@ -37,13 +51,14 @@ sub process($){
     return 1;
   }
 
-  print $name . "\n";
   if (!$opt_l) {
     return 0;
   }
   print "\n";
   print "_______________________________________________________________\n";
   print "\n";
+  print $name . ", $c samples\n";
+  print "\n";
   system('/bin/bash', 'mix.sh', $path, $name);
   return 0;
 }