X-Git-Url: https://git.deb.at/?p=deb%2Fpackages.git;a=blobdiff_plain;f=lib%2FPackages%2FConfig.pm;h=b4ab33216bfda73aad3c66b38d073f838dd6ec4d;hp=96f8b679ccc8c76ec5446abd1f51ee5096a5427b;hb=70f1a38b1411b55f7690bdd42800038c27040dd5;hpb=92a6b3d4b5bcd96dfe05ee814722e5e0e47e1d3f diff --git a/lib/Packages/Config.pm b/lib/Packages/Config.pm index 96f8b67..b4ab332 100644 --- a/lib/Packages/Config.pm +++ b/lib/Packages/Config.pm @@ -9,11 +9,11 @@ use Packages::CGI qw( :DEFAULT error ); our @ISA = qw( Exporter ); our ( $TOPDIR, $DBDIR, $TEMPLATEDIR, $CACHEDIR, $ROOT, - @LANGUAGES, @DDTP_LANGUAGES, $LOCALES, + @LANGUAGES, @DDTP_LANGUAGES, @SUITES, @SECTIONS, @ARCHIVES, @ARCHITECTURES, @PRIORITIES, %FTP_SITES ); our @EXPORT_OK = qw( $TOPDIR $DBDIR $TEMPLATEDIR $CACHEDIR $ROOT - @LANGUAGES @DDTP_LANGUAGES $LOCALES + @LANGUAGES @DDTP_LANGUAGES @SUITES @SECTIONS @ARCHIVES @ARCHITECTURES @PRIORITIES %FTP_SITES ); our %EXPORT_TAGS = ( all => [ @EXPORT_OK ] ); @@ -35,7 +35,6 @@ sub init { $TEMPLATEDIR = $1 if /^\s*templatedir="?([^\"]*)"?\s*$/o; $CACHEDIR = $1 if /^\s*cachedir="?([^\"]*)"?\s*$/o; $ROOT = $1 if /^\s*root="?([^\"]*)"?\s*$/o; - $LOCALES = $1 if /^\s*localedir="?([^\"]*)"?\s*$/o; $FTP_SITES{us} = $1 if /^\s*ftpsite="?([^\"]*)"?\s*$/o; $FTP_SITES{$1} = $2 if /^\s*(\w+)_ftpsite="?([^\"]*)"?\s*$/o; @LANGUAGES = split(/\s+/, $1) if /^\s*polangs="?([^\"]*)"?\s*$/o; @@ -46,7 +45,7 @@ sub init { @ARCHITECTURES = split(/\s+/, $1) if /^\s*architectures="?([^\"]*)"?\s*$/o; @PRIORITIES = split(/\s+/, $1) if /^\s*priorities="?([^\"]*)"?\s*$/o; } - foreach (($TEMPLATEDIR, $CACHEDIR, $LOCALES)) { + foreach (($TEMPLATEDIR, $CACHEDIR)) { s/\$\{?topdir\}?/$TOPDIR/g; } close (C);