summaryrefslogtreecommitdiff
path: root/gnu
diff options
context:
space:
mode:
authorTobias Geerinckx-Rice <me@tobias.gr>2019-04-15 07:48:41 +0200
committerTobias Geerinckx-Rice <me@tobias.gr>2019-04-15 11:00:13 +0200
commiteea75c435ab7d7b4f44b1aa4e900e2abf5ba430f (patch)
treef58f6ce0155716d5f5a71af59271a8fcd1e0df5b /gnu
parentd2f477ba82923301e4a7a65c7cc77d8c41a98b90 (diff)
gnu: quilt: Update to 0.66.
* gnu/packages/patchutils.scm (quilt): Update to 0.66. [source]: Remove all patches. * gnu/packages/patches/quilt-test-fix-regex.patch, gnu/packages/patches/quilt-getopt-nondigit-param.patch, gnu/packages/patches/quilt-getopt-second-separator.patch: Delete files. * gnu/local.mk (dist_patch_DATA): Remove them.
Diffstat (limited to 'gnu')
-rw-r--r--gnu/local.mk3
-rw-r--r--gnu/packages/patches/quilt-getopt-nondigit-param.patch45
-rw-r--r--gnu/packages/patches/quilt-getopt-second-separator.patch58
-rw-r--r--gnu/packages/patches/quilt-test-fix-regex.patch41
-rw-r--r--gnu/packages/patchutils.scm16
5 files changed, 6 insertions, 157 deletions
diff --git a/gnu/local.mk b/gnu/local.mk
index 70ad61af5b9..df96b98f072 100644
--- a/gnu/local.mk
+++ b/gnu/local.mk
@@ -1220,9 +1220,6 @@ dist_patch_DATA = \
1220 %D%/packages/patches/qtscript-disable-tests.patch \ 1220 %D%/packages/patches/qtscript-disable-tests.patch \
1221 %D%/packages/patches/quagga-reproducible-build.patch \ 1221 %D%/packages/patches/quagga-reproducible-build.patch \
1222 %D%/packages/patches/quickswitch-fix-dmenu-check.patch \ 1222 %D%/packages/patches/quickswitch-fix-dmenu-check.patch \
1223 %D%/packages/patches/quilt-test-fix-regex.patch \
1224 %D%/packages/patches/quilt-getopt-nondigit-param.patch \
1225 %D%/packages/patches/quilt-getopt-second-separator.patch \
1226 %D%/packages/patches/qtwebkit-pbutils-include.patch \ 1223 %D%/packages/patches/qtwebkit-pbutils-include.patch \
1227 %D%/packages/patches/randomjungle-disable-static-build.patch \ 1224 %D%/packages/patches/randomjungle-disable-static-build.patch \
1228 %D%/packages/patches/rapicorn-isnan.patch \ 1225 %D%/packages/patches/rapicorn-isnan.patch \
diff --git a/gnu/packages/patches/quilt-getopt-nondigit-param.patch b/gnu/packages/patches/quilt-getopt-nondigit-param.patch
deleted file mode 100644
index 6bbec67e75f..00000000000
--- a/gnu/packages/patches/quilt-getopt-nondigit-param.patch
+++ /dev/null
@@ -1,45 +0,0 @@
1From: Jean Delvare <jdelvare@suse.de>
2Subject: compat/getopt: Allow non-digit parameter embedded in short option
3
4The compatibility getopt script allows only digit parameters to be
5embedded in short options. Util-linux's getopt implementation does
6not have such a restriction and allows any parameter to be embedded
7in short options. As a consequence, using the compatibility getopt
8script would choke for example on "-pab", which is a legal option
9of the "quilt refresh" command.
10
11Remove the limitation on digits so that the compatibility getopt
12script allows what util-linux allows. This fixes the second half
13of bug #54772:
14https://savannah.nongnu.org/bugs/index.php?54772
15
16As a side note, this feature of the compatibility script was broken
17anyway, as it would output the digits in reverse order.
18
19Signed-off-by: Jean Delvare <jdelvare@suse.de>
20---
21 compat/getopt.in | 13 ++++---------
22 1 file changed, 4 insertions(+), 9 deletions(-)
23
24--- quilt.orig/compat/getopt.in 2018-10-03 16:05:56.818667040 +0200
25+++ quilt/compat/getopt.in 2018-10-03 16:12:17.624841732 +0200
26@@ -108,15 +108,10 @@ foreach my $word (@words) {
27 if (scalar(@letters) == 0) {
28 $need_param = $letter;
29 } else {
30- # short options can have numerical args
31- # embedded in the short option list: -UO
32- die "unexpected character after option $letter"
33- if ($letters[$#letters] !~ /[0-9]/);
34- my @digits;
35- while (scalar(@letters) && ($letters[$#letters] =~ /[0-9]/)) {
36- push @digits, pop @letters;
37- }
38- push @options, quote_word(join('', reverse @digits));
39+ # short options can have args
40+ # embedded in the short option list
41+ push @options, quote_word(join('', reverse @letters));
42+ @letters = ();
43 }
44 }
45 }
diff --git a/gnu/packages/patches/quilt-getopt-second-separator.patch b/gnu/packages/patches/quilt-getopt-second-separator.patch
deleted file mode 100644
index cde2c8d41c7..00000000000
--- a/gnu/packages/patches/quilt-getopt-second-separator.patch
+++ /dev/null
@@ -1,58 +0,0 @@
1From: Jean Delvare <jdelvare@suse.de>
2Subject: compat/getopt: Handle a second separator
3
4getopt can be passed 2 '--' separators. The first one tells that
5getopt options are over and target program options start. The second
6one tells that the target program's options are over and following
7arguments should be treated as non-options even if they look like
8options.
9
10This second separator was not handled, causing the compatibility
11getopt script to treat the following arguments as options, eventually
12failing one way or another.
13
14Properly detect and handle the second separator. This fixes the first
15half of bug #54772:
16https://savannah.nongnu.org/bugs/index.php?54772
17
18Signed-off-by: Jean Delvare <jdelvare@suse.de>
19---
20 compat/getopt.in | 13 ++++++++++---
21 1 file changed, 10 insertions(+), 3 deletions(-)
22
23--- quilt.orig/compat/getopt.in 2018-10-03 15:23:21.147620172 +0200
24+++ quilt/compat/getopt.in 2018-10-03 16:05:56.818667040 +0200
25@@ -8,12 +8,12 @@
26
27 use strict;
28
29-my $opts;
30+my $opts = '';
31 my @words;
32 my $found_sep = 0;
33
34 foreach my $arg (@ARGV) {
35- if ($arg eq '--') {
36+ if (!$found_sep && $arg eq '--') {
37 $found_sep = 1;
38 }
39 else {
40@@ -62,10 +62,17 @@ sub quote_word
41 return "'$word'";
42 }
43
44+# there can be a second separator, to inhibit processing following arguments
45+# as options
46+$found_sep = 0;
47 foreach my $word (@words) {
48+ if ($word eq '--') {
49+ $found_sep = 1;
50+ next;
51+ }
52
53 # allow '-' to be an option value
54- if (!$need_param && $word !~ /^-./) {
55+ if ($found_sep || (!$need_param && $word !~ /^-./)) {
56 push @barewords, quote_word($word);
57 next;
58 }
diff --git a/gnu/packages/patches/quilt-test-fix-regex.patch b/gnu/packages/patches/quilt-test-fix-regex.patch
deleted file mode 100644
index 2e249ac55b2..00000000000
--- a/gnu/packages/patches/quilt-test-fix-regex.patch
+++ /dev/null
@@ -1,41 +0,0 @@
1From 5193b137b5a9034ce79946edd40760df2f63a82a Mon Sep 17 00:00:00 2001
2From: Jean Delvare <jdelvare@suse.de>
3Date: Tue, 25 Apr 2017 15:17:53 +0200
4Subject: test: Escape curly braces in regex
5
6Curly braces in perl regex are supposed to be escaped, recent
7versions of perl complain when they aren't:
8
9Unescaped left brace in regex is deprecated, passed through in regex; marked by <-- HERE in m/%{ <-- HERE (\w+)}/ at ./run line 114.
10Unescaped left brace in regex is deprecated, passed through in regex; marked by <-- HERE in m/%{ <-- HERE \?}/ at ./run line 290.
11
12Signed-off-by: Jean Delvare <jdelvare@suse.de>
13---
14 test/run | 4 ++--
15 1 file changed, 2 insertions(+), 2 deletions(-)
16
17diff --git a/test/run b/test/run
18index 942014e..03afc7a 100755
19--- a/test/run
20+++ b/test/run
21@@ -112,7 +112,7 @@ sub flush_output()
22 sub substitute_vars($)
23 {
24 my ($line) = @_;
25- $line =~ s[%{(\w+)}][defined $ENV{$1} ? $ENV{$1} : ""]eg;
26+ $line =~ s[%\{(\w+)\}][defined $ENV{$1} ? $ENV{$1} : ""]eg;
27 return $line;
28 }
29
30@@ -288,7 +288,7 @@ while (defined(my $line = <SOURCE>)) {
31 # Parse the next command
32 if ($line =~ s/^\s*\$ ?//) {
33 # Substitute %{?} with the last command's status
34- $line =~ s[%{\?}][$last_status]eg;
35+ $line =~ s[%\{\?\}][$last_status]eg;
36
37 chomp($prog = substitute_vars($line));
38 $prog_line = $lineno;
39--
40cgit v1.0-41-gc330
41
diff --git a/gnu/packages/patchutils.scm b/gnu/packages/patchutils.scm
index 8859030129c..f6197b98eea 100644
--- a/gnu/packages/patchutils.scm
+++ b/gnu/packages/patchutils.scm
@@ -98,18 +98,14 @@ listing the files modified by a patch.")
98(define-public quilt 98(define-public quilt
99 (package 99 (package
100 (name "quilt") 100 (name "quilt")
101 (version "0.65") 101 (version "0.66")
102 (source 102 (source
103 (origin 103 (origin
104 (method url-fetch) 104 (method url-fetch)
105 (uri (string-append "mirror://savannah/quilt/" 105 (uri (string-append "mirror://savannah/quilt/"
106 "quilt-" version ".tar.gz")) 106 "quilt-" version ".tar.gz"))
107 (sha256 107 (sha256
108 (base32 108 (base32 "01vfvk4pqigahx82fhaaffg921ivd3k7rylz1yfvy4zbdyd32jri"))))
109 "06b816m2gz9jfif7k9v2hrm7fz76zjg5pavf7hd3ifybwn4cgjzn"))
110 (patches (search-patches "quilt-test-fix-regex.patch"
111 "quilt-getopt-second-separator.patch"
112 "quilt-getopt-nondigit-param.patch"))))
113 (build-system gnu-build-system) 109 (build-system gnu-build-system)
114 (native-inputs 110 (native-inputs
115 `(("gettext" ,gnu-gettext))) 111 `(("gettext" ,gnu-gettext)))