From: Guillem Jover <guillem@debian.org>
Date: Thu, 29 Nov 2007 02:26:51 +0000 (+0200)
Subject: dpkg-gencontrol (spfileslistvalue): Add prototype, move to the top of the file
X-Git-Url: https://err.no/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=f9b5fefd15b39f88151bc8738e174e9e6fd261d5;p=dpkg

dpkg-gencontrol (spfileslistvalue): Add prototype, move to the top of the file
---

diff --git a/ChangeLog b/ChangeLog
index 74142581..ba8fba4d 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+2007-11-29  Guillem Jover  <guillem@debian.org>
+
+	* scripts/dpkg-gencontrol.pl (spfileslistvalue): Add prototype. Move
+	to the top of the file with the other functions.
+
 2007-11-29  Guillem Jover  <guillem@debian.org>
 
 	* src/main.c (log_file): Move definition to ...
diff --git a/scripts/dpkg-gencontrol.pl b/scripts/dpkg-gencontrol.pl
index d7493604..85799507 100755
--- a/scripts/dpkg-gencontrol.pl
+++ b/scripts/dpkg-gencontrol.pl
@@ -84,6 +84,13 @@ Options:
 "), $progname;
 }
 
+sub spfileslistvalue($)
+{
+    my $r = $spvalue{$_[0]};
+    $r = '-' if !defined($r);
+    return $r;
+}
+
 
 while (@ARGV) {
     $_=shift(@ARGV);
@@ -381,8 +388,3 @@ if (!$stdout) {
         syserr(_g("cannot install output control file \`%s'"), $cf);
 }
 
-sub spfileslistvalue {
-    my $r = $spvalue{$_[0]};
-    $r = '-' if !defined($r);
-    return $r;
-}