#!/usr/bin/perl -w

use strict;
use warnings;
use Carp;

use Source::Repository::Mass;
use Source::Repository::Mass::ALTLinuxImport;
use RPM::Source::Convert::Plugins::SuSE2ALT;
use Source::Repository::FindLocalMirror;

my $PATH;
my $ROOT=&Source::Repository::FindLocalMirror::find_local_mirror(['opensuse/tumbleweed/repo']);
$PATH="$ROOT/src-non-oss/suse/src:$ROOT/src-oss/suse/src" if $ROOT;
$ROOT=&Source::Repository::FindLocalMirror::find_local_mirror(['opensuse/packman/openSUSE_Tumbleweed']);
$PATH.=":$ROOT/Essentials/src:$ROOT/Extra/src:$ROOT/Games/src:$ROOT/Multimedia/src" if $ROOT;

$Source::Repository::Mass::ORIGINPATH=$PATH if $PATH;

my $convert=Source::Repository::Mass::ALTLinuxImport->new();
$convert->process();
