summaryrefslogtreecommitdiffstats
path: root/meta/recipes-devtools/perl/perl/debian/fixes/respect_umask.diff
diff options
context:
space:
mode:
Diffstat (limited to 'meta/recipes-devtools/perl/perl/debian/fixes/respect_umask.diff')
-rw-r--r--meta/recipes-devtools/perl/perl/debian/fixes/respect_umask.diff154
1 files changed, 0 insertions, 154 deletions
diff --git a/meta/recipes-devtools/perl/perl/debian/fixes/respect_umask.diff b/meta/recipes-devtools/perl/perl/debian/fixes/respect_umask.diff
deleted file mode 100644
index c8663f5357..0000000000
--- a/meta/recipes-devtools/perl/perl/debian/fixes/respect_umask.diff
+++ /dev/null
@@ -1,154 +0,0 @@
1From d9d535ef97f57af6e9728075944c33f3b0b5372f Mon Sep 17 00:00:00 2001
2From: Brendan O'Dea <bod@debian.org>
3Date: Tue, 8 Mar 2005 19:30:38 +1100
4Subject: Respect umask during installation
5
6This is needed to satisfy Debian policy regarding group-writable
7site directories.
8
9Patch-Name: fixes/respect_umask.diff
10Upstream-Status: Pending
11---
12 cpan/ExtUtils-Install/lib/ExtUtils/Install.pm | 18 +++++++++---------
13 cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm | 18 +++++++++---------
14 2 files changed, 18 insertions(+), 18 deletions(-)
15
16diff --git a/cpan/ExtUtils-Install/lib/ExtUtils/Install.pm b/cpan/ExtUtils-Install/lib/ExtUtils/Install.pm
17index 1e8ac4c..3e79121 100644
18--- a/cpan/ExtUtils-Install/lib/ExtUtils/Install.pm
19+++ b/cpan/ExtUtils-Install/lib/ExtUtils/Install.pm
20@@ -451,7 +451,7 @@ sub _can_write_dir {
21
22 =pod
23
24-=item _mkpath($dir,$show,$mode,$verbose,$dry_run)
25+=item _mkpath($dir,$show,$verbose,$dry_run)
26
27 Wrapper around File::Path::mkpath() to handle errors.
28
29@@ -468,13 +468,13 @@ writable.
30 =cut
31
32 sub _mkpath {
33- my ($dir,$show,$mode,$verbose,$dry_run)=@_;
34+ my ($dir,$show,$verbose,$dry_run)=@_;
35 if ( $verbose && $verbose > 1 && ! -d $dir) {
36 $show= 1;
37- printf "mkpath(%s,%d,%#o)\n", $dir, $show, $mode;
38+ printf "mkpath(%s,%d)\n", $dir, $show;
39 }
40 if (!$dry_run) {
41- if ( ! eval { File::Path::mkpath($dir,$show,$mode); 1 } ) {
42+ if ( ! eval { File::Path::mkpath($dir,$show); 1 } ) {
43 _choke("Can't create '$dir'","$@");
44 }
45
46@@ -783,7 +783,7 @@ sub install { #XXX OS-SPECIFIC
47 _chdir($cwd);
48 }
49 foreach my $targetdir (sort keys %check_dirs) {
50- _mkpath( $targetdir, 0, 0755, $verbose, $dry_run );
51+ _mkpath( $targetdir, 0, $verbose, $dry_run );
52 }
53 foreach my $found (@found_files) {
54 my ($diff, $ffd, $origfile, $mode, $size, $atime, $mtime,
55@@ -797,7 +797,7 @@ sub install { #XXX OS-SPECIFIC
56 $targetfile= _unlink_or_rename( $targetfile, 'tryhard', 'install' )
57 unless $dry_run;
58 } elsif ( ! -d $targetdir ) {
59- _mkpath( $targetdir, 0, 0755, $verbose, $dry_run );
60+ _mkpath( $targetdir, 0, $verbose, $dry_run );
61 }
62 print "Installing $targetfile\n";
63
64@@ -837,7 +837,7 @@ sub install { #XXX OS-SPECIFIC
65
66 if ($pack{'write'}) {
67 $dir = install_rooted_dir(dirname($pack{'write'}));
68- _mkpath( $dir, 0, 0755, $verbose, $dry_run );
69+ _mkpath( $dir, 0, $verbose, $dry_run );
70 print "Writing $pack{'write'}\n" if $verbose;
71 $packlist->write(install_rooted_file($pack{'write'})) unless $dry_run;
72 }
73@@ -1180,7 +1180,7 @@ environment variable will silence this output.
74 sub pm_to_blib {
75 my($fromto,$autodir,$pm_filter) = @_;
76
77- _mkpath($autodir,0,0755);
78+ _mkpath($autodir,0);
79 while(my($from, $to) = each %$fromto) {
80 if( -f $to && -s $from == -s $to && -M $to < -M $from ) {
81 print "Skip $to (unchanged)\n" unless $INSTALL_QUIET;
82@@ -1203,7 +1203,7 @@ sub pm_to_blib {
83 # we wont try hard here. its too likely to mess things up.
84 forceunlink($to);
85 } else {
86- _mkpath(dirname($to),0,0755);
87+ _mkpath(dirname($to),0);
88 }
89 if ($need_filtering) {
90 run_filter($pm_filter, $from, $to);
91diff --git a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm
92index f63145c..197f102 100644
93--- a/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm
94+++ b/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm
95@@ -2118,7 +2118,7 @@ doc__install : doc_site_install
96 $(NOECHO) $(ECHO) INSTALLDIRS not defined, defaulting to INSTALLDIRS=site
97
98 pure_perl_install :: all
99- $(NOECHO) $(MOD_INSTALL) \
100+ $(NOECHO) umask 022; $(MOD_INSTALL) \
101 };
102
103 push @m,
104@@ -2138,7 +2138,7 @@ q{ "$(INST_LIB)" "$(DESTINSTALLPRIVLIB)" \
105
106
107 pure_site_install :: all
108- $(NOECHO) $(MOD_INSTALL) \
109+ $(NOECHO) umask 022; $(MOD_INSTALL) \
110 };
111 push @m,
112 q{ read "}.$self->catfile('$(SITEARCHEXP)','auto','$(FULLEXT)','.packlist').q{" \
113@@ -2156,7 +2156,7 @@ q{ "$(INST_LIB)" "$(DESTINSTALLSITELIB)" \
114 "}.$self->catdir('$(PERL_ARCHLIB)','auto','$(FULLEXT)').q{"
115
116 pure_vendor_install :: all
117- $(NOECHO) $(MOD_INSTALL) \
118+ $(NOECHO) umask 022; $(MOD_INSTALL) \
119 };
120 push @m,
121 q{ read "}.$self->catfile('$(VENDORARCHEXP)','auto','$(FULLEXT)','.packlist').q{" \
122@@ -2188,8 +2188,8 @@ doc_vendor_install :: all
123 push @m, q{
124 doc_perl_install :: all
125 $(NOECHO) $(ECHO) Appending installation info to "$(DESTINSTALLARCHLIB)/perllocal.pod"
126- -$(NOECHO) $(MKPATH) "$(DESTINSTALLARCHLIB)"
127- -$(NOECHO) $(DOC_INSTALL) \
128+ -$(NOECHO) umask 022; $(MKPATH) "$(DESTINSTALLARCHLIB)"
129+ -$(NOECHO) umask 022; $(DOC_INSTALL) \
130 "Module" "$(NAME)" \
131 "installed into" $(INSTALLPRIVLIB) \
132 LINKTYPE "$(LINKTYPE)" \
133@@ -2199,8 +2199,8 @@ doc_perl_install :: all
134
135 doc_site_install :: all
136 $(NOECHO) $(ECHO) Appending installation info to "$(DESTINSTALLARCHLIB)/perllocal.pod"
137- -$(NOECHO) $(MKPATH) "$(DESTINSTALLARCHLIB)"
138- -$(NOECHO) $(DOC_INSTALL) \
139+ -$(NOECHO) umask 022; $(MKPATH) "$(DESTINSTALLARCHLIB)"
140+ -$(NOECHO) umask 022; $(DOC_INSTALL) \
141 "Module" "$(NAME)" \
142 "installed into" $(INSTALLSITELIB) \
143 LINKTYPE "$(LINKTYPE)" \
144@@ -2210,8 +2210,8 @@ doc_site_install :: all
145
146 doc_vendor_install :: all
147 $(NOECHO) $(ECHO) Appending installation info to "$(DESTINSTALLARCHLIB)/perllocal.pod"
148- -$(NOECHO) $(MKPATH) "$(DESTINSTALLARCHLIB)"
149- -$(NOECHO) $(DOC_INSTALL) \
150+ -$(NOECHO) umask 022; $(MKPATH) "$(DESTINSTALLARCHLIB)"
151+ -$(NOECHO) umask 022; $(DOC_INSTALL) \
152 "Module" "$(NAME)" \
153 "installed into" $(INSTALLVENDORLIB) \
154 LINKTYPE "$(LINKTYPE)" \
generated by cgit v1.2.3-54-g00ecf (git 2.39.0) at 2024-06-27 21:17:57 +0000