fixed: didn't find the last full backup
authorHeiko Schlittermann (CTQ) <hs@schlittermann.de>
Tue, 02 Aug 2011 11:21:32 +0200
changeset 124 6c90a6e8646c
parent 123 0c6e454093df
child 125 2e00ff442e15
fixed: didn't find the last full backup
bin/ftbackup
--- a/bin/ftbackup	Mon Aug 01 15:52:37 2011 +0200
+++ b/bin/ftbackup	Tue Aug 02 11:21:32 2011 +0200
@@ -208,10 +208,11 @@
             foreach (reverse sort $ftp->ls) {
 		next if /\.tmp-\d+$/;
                 next if not /^(?<date>.*)\.(?<level>\d+)$/;
-		next if not $ftp->size(0) and str2time($+{date}) < $^T;
+		next if not $ftp->size($_) and str2time($+{date}) < $^T;
                 $last[$+{level}] = str2time $+{date};
             }
         }
+	### @last
 
     # for safety we check if there is really a full dump not older than xxx days
         if ($dev->{level} > 0) {