Fixed bug in the way the suffix was being printed (added zero padding)

[videoscripts/.git] / merge_videos_by_day

diff --git a/merge_videos_by_day b/merge_videos_by_day
index 52164d4689824615a25c3a206f81528c926e8347..f8a5a9eccd7d19e5a94ddc91f55195150979222c 100755 (executable)
--- a/merge_videos_by_day
+++ b/merge_videos_by_day
@@ -121,7 +121,7 @@ foreach $file (sort `$find_cmd`) {
     $newfile = $dstfile . "." . $video_suffix;
     if(-e "$newfile.$ext") {
        foreach $i ($video_suffix+1 .. '999') {
-           $newfile = $dstfile . "." . $i;
+           $newfile = $dstfile . "." . sprintf("%03d",$i);
            if(! -e "$newfile.$ext") { last; }
        }
        $dstfile = $newfile;
@@ -141,6 +141,7 @@ foreach $video (sort keys %videos) {
        print "   merging \"$srcfile\" into \"$video\"\n";
     }
 }
+print "\n";
 
 # Now actually do the merging
 foreach $video (sort keys %videos) {