Add ~ to the list of legal characters in a package filename

diff --git a/ChangeLog b/ChangeLog
index b274f807504fca8e8d1f23aeb95f69b0582d5353..f2ff7653fcc425c662336a5dbf95bf17c9aaffa5 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,8 @@
+Sun Jun 23 00:45:19 CEST 2002 Wichert Akkerman <wichert@deephackmode.org>
+
+  * scripts/dpkg-genchanges.pl: Add ~ to the list of legal characters
+    in a package filename
+
 Sat Jun 22 16:13:42 CEST 2002 Wichert Akkerman <wichert@deephackmode.org>
 
   * scripts/dpkg-checkbuilddeps.pl: remove forced check for build-essential,

diff --git a/debian/changelog b/debian/changelog
index 7606dc801b0a663344f61d3f3127b4be3b55f5f3..0e9641829fa0f10a542c1de5404a31b1797ea992 100644 (file)
--- a/debian/changelog
+++ b/debian/changelog
@@ -4,6 +4,8 @@ dpkg (1.11) unstable; urgency=low
   * Improve long package descriptions
   * Improve formatting of dpkg manpage
   * dpkg-checkbuilddeps no longer checks for build-essential
+  * Make dpkg-genchanges accept ~ as part of a package filename.
+    Closes: Bug#150739
 
  -- Wichert Akkerman <wakkerma@debian.org>  Sat, 22 Jun 2002 14:02:59 +0200
 

diff --git a/scripts/dpkg-genchanges.pl b/scripts/dpkg-genchanges.pl
index 5650e371086360ebf5e7abc780587a5c24a04227..2e8b46b6bac54af3e6200b86a62cbc1046d23739 100755 (executable)
--- a/scripts/dpkg-genchanges.pl
+++ b/scripts/dpkg-genchanges.pl
@@ -276,7 +276,7 @@ if (!$binaryonly) {
     $files= $fi{'S Files'};
     for $file (split(/\n /,$files)) {
         next if $file eq '';
-        $file =~ m/^([0-9a-f]{32})[ \t]+\d+[ \t]+([0-9a-zA-Z][-+:.,=0-9a-zA-Z_]+)$/
+        $file =~ m/^([0-9a-f]{32})[ \t]+\d+[ \t]+([0-9a-zA-Z][-+:.,=0-9a-zA-Z_~]+)$/
             || &error("Files field contains bad line \`$file'");
         ($md5sum{$2},$file) = ($1,$2);
         push(@sourcefiles,$file);