From 03df37f308ef61f18b1eaa328becec700502911c Mon Sep 17 00:00:00 2001 From: Wichert Akkerman Date: Sat, 22 Jun 2002 22:47:56 +0000 Subject: [PATCH] Add ~ to the list of legal characters in a package filename --- ChangeLog | 5 +++++ debian/changelog | 2 ++ scripts/dpkg-genchanges.pl | 2 +- 3 files changed, 8 insertions(+), 1 deletion(-) diff --git a/ChangeLog b/ChangeLog index b274f807..f2ff7653 100644 --- a/ChangeLog +++ b/ChangeLog @@ -1,3 +1,8 @@ +Sun Jun 23 00:45:19 CEST 2002 Wichert Akkerman + + * 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 * scripts/dpkg-checkbuilddeps.pl: remove forced check for build-essential, diff --git a/debian/changelog b/debian/changelog index 7606dc80..0e964182 100644 --- 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 Sat, 22 Jun 2002 14:02:59 +0200 diff --git a/scripts/dpkg-genchanges.pl b/scripts/dpkg-genchanges.pl index 5650e371..2e8b46b6 100755 --- 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); -- 2.39.5