Code

Added patch from JMG to handle zipped ppds, additionally
[gosa.git] / gosa-si / tests / sqlite-check-server.pl
index 5b153316728fc1b2dd040fb99d8efa76c188769e..d4d51a9f8a517cd2e71e7d4f71cae6c173cc5d01 100755 (executable)
@@ -87,32 +87,5 @@ if (-e $db_name) {
     print $answer."\n";
 }
 
-$db_name = "/var/lib/gosa-si/fai.db";
-if (-e $db_name) {
-    print "\n############################################################\n";
-    my $table_name = "fai_server";
-    print "$db_name\n";
-    print "$table_name\n";
-
-    my $sqlite = GOSA::DBsqlite->new($db_name);
-    my $col_names = $sqlite->get_table_columns($table_name);
-    print join(', ', @{ $col_names } )."\n" ;
-    my $answer = $sqlite->show_table($table_name);
-    print $answer."\n";
-}
-
-$db_name = "/var/lib/gosa-si/fai.db";
-if (-e $db_name) {
-    print "\n############################################################\n";
-    my $table_name = "fai_release";
-    print "$db_name\n";
-    print "$table_name\n";
-
-    my $sqlite = GOSA::DBsqlite->new($db_name);
-    my $col_names = $sqlite->get_table_columns($table_name);
-    print join(', ', @{ $col_names } )."\n" ;
-    my $answer = $sqlite->show_table($table_name);
-    print $answer."\n";
-}
 
 print "\nFINISH\n";