[backend] move BSSolv from bs_srcserver to BSSrcrep

openSUSE · Apr 13, 2016 · 3959bab · 3959bab
1 parent 10fb445
commit 3959bab
Show file tree

Hide file tree

Showing 2 changed files with 8 additions and 8 deletions.
diff --git a/src/backend/BSSrcrep.pm b/src/backend/BSSrcrep.pm
@@ -27,6 +27,7 @@ use Digest::MD5 ();
 use BSConfiguration;
 use BSUtil;
 use Symbol;
+use BSSolv;
 
 use strict;
 
@@ -38,6 +39,13 @@ my $uploaddir = "$srcrep/:upload";
 
 our $emptysrcmd5 = 'd41d8cd98f00b204e9800998ecf8427e';
 
+if (!defined(&BSSolv::isobscpio)) {
+  *BSSolv::isobscpio = sub {die("installed BSSolv does not support obscpio\n") };
+  *BSSolv::obscpiostat = sub {die("installed BSSolv does not support obscpio\n") };
+  *BSSolv::obscpioopen= sub {die("installed BSSolv does not support obscpio\n") };
+  *BSSolv::expandobscpio = sub {die("installed BSSolv does not support obscpio\n") };
+}
+
 #
 #  Source file handling
 #

diff --git a/src/backend/bs_srcserver b/src/backend/bs_srcserver
@@ -61,8 +61,6 @@ use BSXPathKeys;
 use BSDB;
 use BSDBIndex;
 
-use BSSolv;
-
 $Build::Rpm::unfilteredprereqs = 1 if defined $Build::Rpm::unfilteredprereqs;
 
 use strict;
@@ -113,12 +111,6 @@ my $remote_getrev_todo;
 my %remote_getrev_cache;
 my $frozenlinks_cache;
 
-if (!defined(&BSSolv::isobscpio)) {
-  *BSSolv::isobscpio = sub {die("installed BSSolv does not support obscpio\n") };
-  *BSSolv::obscpiostat = sub {die("installed BSSolv does not support obscpio\n") };
-  *BSSolv::obscpioopen= sub {die("installed BSSolv does not support obscpio\n") };
-  *BSSolv::expandobscpio = sub {die("installed BSSolv does not support obscpio\n") };
-}
 
 sub notify {
   my ($type, $p) = @_;