summaryrefslogtreecommitdiff
path: root/package/perl-gd/0001-getoptions.patch
blob: 74f055bead61cafef99997204957cb322afb22d1 (plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
fix option handling in Makefile.PL

the call to GetOptions() must be unique.

Signed-off-by: Francois Perrad <francois.perrad@gadz.org>
see https://github.com/lstein/Perl-GD/pull/6

Index: b/Makefile.PL
===================================================================
--- a/Makefile.PL
+++ b/Makefile.PL
@@ -24,7 +24,15 @@
 my ($options,$lib_gd_path,$lib_ft_path,$lib_png_path,$lib_jpeg_path,$lib_xpm_path,$lib_zlib_path,$force);
 
 use Getopt::Long;
-GetOptions("ignore_missing_gd" => \$force);
+my $result = GetOptions("options=s"         => \$options,
+			"lib_gd_path=s"     => \$lib_gd_path,
+			"lib_ft_path=s"     => \$lib_ft_path,
+			"lib_png_path=s"    => \$lib_png_path,
+			"lib_jpeg_path=s"   => \$lib_jpeg_path,
+			"lib_xpm_path=s"    => \$lib_xpm_path,
+			"lib_zlib_path=s"   => \$lib_zlib_path,
+			"ignore_missing_gd" => \$force,
+		       );
 
 unless (try_to_autoconfigure(\$options,\$lib_gd_path,\@INC,\@LIBPATH,\@LIBS) || $force) {
     die <<END;
@@ -47,14 +55,6 @@
 #############################################################################################
 # Build options passed in to script to support reproducible builds via Makefiles
 #############################################################################################
-my $result = GetOptions("options=s"       => \$options,
-			"lib_gd_path=s"   => \$lib_gd_path,
-			"lib_ft_path=s"   => \$lib_ft_path,
-			"lib_png_path=s"  => \$lib_png_path,
-			"lib_jpeg_path=s" => \$lib_jpeg_path,
-			"lib_xpm_path=s"  => \$lib_xpm_path,
-			"lib_zlib_path=s" => \$lib_zlib_path,
-		       );
 unless ($result) {
   print STDERR <<END;
 Usage: perl Makefile.PL [options]