From e0f72409f0c5487749f5c11cd00d12b86a9d99e2 Mon Sep 17 00:00:00 2001
From: Donald Buczek <buczek@molgen.mpg.de>
Date: Mon, 7 Apr 2025 09:49:59 +0200
Subject: [PATCH] pbackup: Remove test command implementation

---
 bin/pbackup | 35 -----------------------------------
 1 file changed, 35 deletions(-)

diff --git a/bin/pbackup b/bin/pbackup
index a392d32..5e75549 100755
--- a/bin/pbackup
+++ b/bin/pbackup
@@ -895,41 +895,6 @@ sub cmd_disable {
 }
 
 sub cmd_test {
-    my $files = 0;
-    my $jobs = 0;
-
-my $COUNT_SQL = <<'EOF';
-SELECT
-  stat_job_id AS count_job_id,
-  count(stat_job_id) as count_count
-FROM stat
-GROUP BY stat_job_id
-EOF
-
-    my $keep = time - $DAYS * 24 * 60 * 60;
-    my $sth = $dbh->prepare(<<"EOF");
-SELECT job_name, stat_started, stat_files, path_server, path_path
-FROM job,stat, path, ($COUNT_SQL)
-WHERE stat_job_id = job_id AND job_path_id = path_id
-AND stat_job_id = count_job_id AND count_count > 1
-AND stat_started < ?
-ORDER BY stat_started
-EOF
-    $sth->execute($keep);
-    while (my $row = $sth->fetchrow_arrayref) {
-        my ($job_name, $stat_started, $stat_files, $path_server, $path_path) = @$row;
-        printf " %-21s %s %10s %s:%s\n",
-            $job_name,
-            shortDate($stat_started),
-            $stat_files,
-            $path_server,
-            $path_path;
-        $files += $stat_files;
-        $jobs++;
-    }
-    print "\n";
-    print "(expire time : " . shortDate($keep) . ")\n";
-    print "To do: $files files $jobs jobs\n";
 }
 
 sub move_new {