X-Git-Url: https://git.deb.at/?a=blobdiff_plain;f=lib%2FPackages%2FConfig.pm;h=1b9dbf52ad57df2b8a8f428765935d95be9f4240;hb=24d90ece880a98242a02dcae6d4d8d076b7cdf95;hp=8252a1b132271d8f1c49159d4a0c7ec914c15140;hpb=2ec757bb58907b15c43548be5601d4f2b8c7caac;p=deb%2Fpackages.git

diff --git a/lib/Packages/Config.pm b/lib/Packages/Config.pm
index 8252a1b..1b9dbf5 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, $LOCALES,
+      @LANGUAGES, @DDTP_LANGUAGES,
       @SUITES, @SECTIONS, @ARCHIVES, @ARCHITECTURES,
       @PRIORITIES, %FTP_SITES );
 our @EXPORT_OK = qw( $TOPDIR $DBDIR $TEMPLATEDIR $CACHEDIR $ROOT
-		     @LANGUAGES $LOCALES
+		     @LANGUAGES @DDTP_LANGUAGES
 		     @SUITES @SECTIONS @ARCHIVES @ARCHITECTURES
 		     @PRIORITIES %FTP_SITES  );
 our %EXPORT_TAGS = ( all => [ @EXPORT_OK ] );
@@ -35,17 +35,17 @@ 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;
+	    @DDTP_LANGUAGES = split(/\s+/, $1) if /^\s*ddtplangs="?([^\"]*)"?\s*$/o;
 	    @SUITES = split(/\s+/, $1) if /^\s*suites="?([^\"]*)"?\s*$/o;
 	    @SECTIONS = split(/\s+/, $1) if /^\s*sections="?([^\"]*)"?\s*$/o;
 	    @ARCHIVES = split(/\s+/, $1) if /^\s*archives="?([^\"]*)"?\s*$/o;
 	    @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);
@@ -54,6 +54,7 @@ sub init {
     }
     $DBDIR = "$TOPDIR/files/db";
     unshift @LANGUAGES, 'en';
+    unshift @DDTP_LANGUAGES, 'en';
 }
 
 1;