Revert "Bug 7167: New version for updatedatabase"
[koha_fer] / C4 / Installer.pm
index 759a6be..304698e 100644 (file)
@@ -23,7 +23,6 @@ use strict;
 our $VERSION = 3.07.00.049;
 use C4::Context;
 use C4::Installer::PerlModules;
-use C4::Update::Database;
 
 =head1 NAME
 
@@ -467,15 +466,7 @@ Koha software version.
 
 sub set_version_syspref {
     my $self = shift;
-    # get all updatedatabase, and mark them as passed, as it's a fresh install
-    my $versions = C4::Update::Database::list_versions_available();
-    for my $v ( @$versions ) {
-        my $queries;
-        $queries->{queries} = ["initial setup"];
-        $queries->{comments} = ["initial setup"];
-        C4::Update::Database::set_infos($v,$queries,undef,undef);
-    }
-    # mark the "old" 3.6 version number
+
     my $kohaversion=C4::Context::KOHAVERSION;
     # remove the 3 last . to have a Perl number
     $kohaversion =~ s/(.*\..*)\.(.*)\.(.*)/$1$2$3/;