r211 - in vdr/vdr-xxv/trunk/debian: . debconf

[Tobias Grimm]

Author: tiber-guest
Date: 2005-02-27 23:08:35 +0100 (Sun, 27 Feb 2005)
New Revision: 211

Modified:
   vdr/vdr-xxv/trunk/debian/changelog
   vdr/vdr-xxv/trunk/debian/debconf/set_config.pl
Log:
fixed port setup helper function

Modified: vdr/vdr-xxv/trunk/debian/changelog
===================================================================
--- vdr/vdr-xxv/trunk/debian/changelog	2005-02-27 20:42:07 UTC (rev 210)
+++ vdr/vdr-xxv/trunk/debian/changelog	2005-02-27 22:08:35 UTC (rev 211)
@@ -1,3 +1,9 @@
+vdr-xxv (0.20-2) unstable; urgency=low
+
+  * Fixed port setup helper function
+
+ -- Debian VDR Team <pkg-vdr-dvb-devel@lists.alioth.debian.org>  Sun, 27 Feb 2005 19:21:25 +0100
+
 vdr-xxv (0.20-1) unstable; urgency=low
 
   * New upstream release

Modified: vdr/vdr-xxv/trunk/debian/debconf/set_config.pl
===================================================================
--- vdr/vdr-xxv/trunk/debian/debconf/set_config.pl	2005-02-27 20:42:07 UTC (rev 210)
+++ vdr/vdr-xxv/trunk/debian/debconf/set_config.pl	2005-02-27 22:08:35 UTC (rev 211)
@@ -21,10 +21,19 @@
     $Config->{General}->{DSN} = "DBI:mysql:database=${dbdatabase};" .
       "host=${dbserver};port=${dbport}";
 }
-elsif ($ARGV[0] eq "--lang")
+elsif ($ARGV[0] eq "--ports")
 {
-    my $language = $ARGV[2];
-    $Config->{General}->{LANGUAGE} = $language;
+    my $porthttp = $ARGV[2];
+    my $porttelnet = $ARGV[3];
+    my $portinterface = $ARGV[4];
+    my $porticecast = $ARGV[5];
+    my $portwap = $ARGV[6];
+
+    $Config->{HTTPD}->{Port} = $porthttp;
+    $Config->{TELNET}->{Port} = $porttelnet;
+    $Config->{INTERFACE}->{Port} = $portinterface;
+    $Config->{MUSIC}->{port} = $porticecast;
+    $Config->{WAPD}->{Port} = $portwap;
 }
 
 $Config->write($ARGV[1]) or die Config::Tiny::errstr;