#! /usr/bin/perl
-# vim: ts=4 sw=4 nowrap
+# vim: ts=8 sw=8 nowrap
+
+use strict;
+use warnings;
+package bugcfg;
+our ($spooldir,$maintainerlist,$debian_ftproot,$debian_sources,$pseudolist);
+
+use Debbugs::Config qw(:config);
# General configuration stuff
-$host=`hostname`;
-chomp $host;
-if ($host eq "master" or $host eq "spohr" or $host eq 'rietz') {
- $spooldir = "/org/bugs.debian.org/debbugs/spool/db-h";
- $maintainerlist = "/etc/debbugs/Maintainers";
- $debian_ftproot = "/org/bugs.debian.org/etc/indices/ftp/testing";
- $nonUS_ftproot = "/org/bugs.debian.org/etc/indices/nonus/testing";
- $debian_sources = "/etc/debbugs/indices/ftp.sources";
- $nonUS_sources = "/etc/debbugs/indices/nonus.sources";
- $pseudolist = "/org/bugs.debian.org/etc/pseudo-packages.description";
- $nonuslist = "/debian/home/maor/masterfiles/Packages.non-US";
-} elsif ($host eq "lightning") {
- $spooldir = "/debian/home/iwj/debian-bugs/spool/db";
- $maintainerlist = "/debian/debian/indices/Maintainers";
- $ftproot = "/debian/debian/dists/potato/";
- $pseudolist = "/debian/home/maor/masterfiles/pseudo-packages.description";
- $nonuslist = "/debian/home/maor/masterfiles/Packages.non-US";
-} else {
- die "Unknown machine, please configure paths in bugcfg.pm\n";
-}
-
-$btsURL = "http://www.debian.org/Bugs/";
-@architectures = ( "i386", "m68k", "alpha", "sparc", "powerpc", "arm", "hppa", "ia64", "mips", "mipsel", "s390" );
-@sections = ( "main", "contrib", "non-free" );
-@priorities = ( "serious", "grave", "critical" );
-@skiptags = ( "wontfix", "fixed" );
+$spooldir = $config{spool_dir}.'/db-h';
+$maintainerlist = $config{maintainer_file};
+$debian_ftproot = $config{package_source};
+$debian_sources = $config{package_source};
+$pseudolist = $config{pseudo_desc_file};
+
+$debian_sources = "/etc/debbugs/indices/ftp.sources";
+
+$debian_ftproot = "/org/bugs.debian.org/etc/indices/ftp/testing";
+
+
+# alpha excluded to RM request
+our @architectures = ( "i386", "amd64", "sparc", "powerpc", "armel", "hppa", "ia64", "mips", "mipsel", "s390" );
+our @sections = ( "main", "contrib", "non-free" );
+our @priorities = @{$config{strong_severities}};
+our @skiptags = ( );
1;