From f9b5fefd15b39f88151bc8738e174e9e6fd261d5 Mon Sep 17 00:00:00 2001
From: Guillem Jover <guillem@debian.org>
Date: Thu, 29 Nov 2007 04:26:51 +0200
Subject: [PATCH] dpkg-gencontrol (spfileslistvalue): Add prototype, move to
 the top of the file

---
 ChangeLog                  |  5 +++++
 scripts/dpkg-gencontrol.pl | 12 +++++++-----
 2 files changed, 12 insertions(+), 5 deletions(-)

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;
-}
-- 
2.39.5