diff options
Diffstat (limited to 'meta/recipes-devtools/perl/perl-5.14.2/debian/deprecate-with-apt.diff')
-rw-r--r-- | meta/recipes-devtools/perl/perl-5.14.2/debian/deprecate-with-apt.diff | 406 |
1 files changed, 406 insertions, 0 deletions
diff --git a/meta/recipes-devtools/perl/perl-5.14.2/debian/deprecate-with-apt.diff b/meta/recipes-devtools/perl/perl-5.14.2/debian/deprecate-with-apt.diff new file mode 100644 index 0000000000..65a132db36 --- /dev/null +++ b/meta/recipes-devtools/perl/perl-5.14.2/debian/deprecate-with-apt.diff | |||
@@ -0,0 +1,406 @@ | |||
1 | From c2bd2059cfbba573643c748ace4ff4db4cbf015d Mon Sep 17 00:00:00 2001 | ||
2 | From: Dominic Hargreaves <dom@earth.li> | ||
3 | Date: Mon, 17 May 2010 13:23:07 +0300 | ||
4 | Subject: Point users to Debian packages of deprecated core modules | ||
5 | |||
6 | Bug-Debian: http://bugs.debian.org/580034 | ||
7 | |||
8 | Class::ISA, Switch, Pod::Plainer, and (partially) Shell were | ||
9 | deprecated from the Perl core in 5.12.0. | ||
10 | |||
11 | Class::ISA, Switch, Pod::Plainer were removed from the Perl core in | ||
12 | 5.14.0. | ||
13 | |||
14 | Shell and Devel::DProf, and Perl 4 libraries, were deprecated from the | ||
15 | Perl core in 5.14.0. | ||
16 | |||
17 | To get a clean transition, perl/perl-modules is going to recommend the | ||
18 | separate Debian packages of these for one release cycle so that they will be | ||
19 | pulled in by default on upgrades. | ||
20 | |||
21 | However, on systems configured to ignore recommendations the deprecation | ||
22 | warnings will still be useful, so modify them slightly to point to the | ||
23 | separate packages instead. | ||
24 | |||
25 | Patch-Name: debian/deprecate-with-apt.diff | ||
26 | --- | ||
27 | lib/abbrev.pl | 2 +- | ||
28 | lib/assert.pl | 2 +- | ||
29 | lib/bigfloat.pl | 2 +- | ||
30 | lib/bigint.pl | 2 +- | ||
31 | lib/bigrat.pl | 2 +- | ||
32 | lib/cacheout.pl | 2 +- | ||
33 | lib/complete.pl | 2 +- | ||
34 | lib/ctime.pl | 2 +- | ||
35 | lib/deprecate.pm | 16 +++++++++++++++- | ||
36 | lib/dotsh.pl | 2 +- | ||
37 | lib/exceptions.pl | 2 +- | ||
38 | lib/fastcwd.pl | 2 +- | ||
39 | lib/find.pl | 2 +- | ||
40 | lib/finddepth.pl | 2 +- | ||
41 | lib/flush.pl | 2 +- | ||
42 | lib/getcwd.pl | 2 +- | ||
43 | lib/getopt.pl | 2 +- | ||
44 | lib/getopts.pl | 2 +- | ||
45 | lib/hostname.pl | 2 +- | ||
46 | lib/importenv.pl | 2 +- | ||
47 | lib/look.pl | 2 +- | ||
48 | lib/newgetopt.pl | 2 +- | ||
49 | lib/open2.pl | 2 +- | ||
50 | lib/open3.pl | 2 +- | ||
51 | lib/pwd.pl | 2 +- | ||
52 | lib/shellwords.pl | 2 +- | ||
53 | lib/stat.pl | 2 +- | ||
54 | lib/syslog.pl | 2 +- | ||
55 | lib/tainted.pl | 2 +- | ||
56 | lib/termcap.pl | 2 +- | ||
57 | lib/timelocal.pl | 2 +- | ||
58 | lib/validate.pl | 2 +- | ||
59 | 32 files changed, 46 insertions(+), 32 deletions(-) | ||
60 | |||
61 | diff --git a/lib/abbrev.pl b/lib/abbrev.pl | ||
62 | index d46321f..0168631 100644 | ||
63 | --- a/lib/abbrev.pl | ||
64 | +++ b/lib/abbrev.pl | ||
65 | @@ -1,4 +1,4 @@ | ||
66 | -warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install it from the CPAN distribution Perl4::CoreLibs. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
67 | +warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install the separate libperl4-corelibs-perl package. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
68 | |||
69 | ;# Usage: | ||
70 | ;# %foo = (); | ||
71 | diff --git a/lib/assert.pl b/lib/assert.pl | ||
72 | index d47e006..80593c5 100644 | ||
73 | --- a/lib/assert.pl | ||
74 | +++ b/lib/assert.pl | ||
75 | @@ -1,4 +1,4 @@ | ||
76 | -warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install it from the CPAN distribution Perl4::CoreLibs. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
77 | +warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install the separate libperl4-corelibs-perl package. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
78 | |||
79 | # | ||
80 | # This library is no longer being maintained, and is included for backward | ||
81 | diff --git a/lib/bigfloat.pl b/lib/bigfloat.pl | ||
82 | index 82d0f5c..c21bac6 100644 | ||
83 | --- a/lib/bigfloat.pl | ||
84 | +++ b/lib/bigfloat.pl | ||
85 | @@ -1,4 +1,4 @@ | ||
86 | -warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install it from the CPAN distribution Perl4::CoreLibs. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
87 | +warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install the separate libperl4-corelibs-perl package. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
88 | |||
89 | package bigfloat; | ||
90 | require "bigint.pl"; | ||
91 | diff --git a/lib/bigint.pl b/lib/bigint.pl | ||
92 | index 6de1c53..031e8ad 100644 | ||
93 | --- a/lib/bigint.pl | ||
94 | +++ b/lib/bigint.pl | ||
95 | @@ -1,4 +1,4 @@ | ||
96 | -warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install it from the CPAN distribution Perl4::CoreLibs. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
97 | +warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install the separate libperl4-corelibs-perl package. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
98 | |||
99 | package bigint; | ||
100 | # | ||
101 | diff --git a/lib/bigrat.pl b/lib/bigrat.pl | ||
102 | index aaf1713..146a8f4 100644 | ||
103 | --- a/lib/bigrat.pl | ||
104 | +++ b/lib/bigrat.pl | ||
105 | @@ -1,4 +1,4 @@ | ||
106 | -warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install it from the CPAN distribution Perl4::CoreLibs. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
107 | +warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install the separate libperl4-corelibs-perl package. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
108 | |||
109 | package bigrat; | ||
110 | require "bigint.pl"; | ||
111 | diff --git a/lib/cacheout.pl b/lib/cacheout.pl | ||
112 | index a5da453..937405d 100644 | ||
113 | --- a/lib/cacheout.pl | ||
114 | +++ b/lib/cacheout.pl | ||
115 | @@ -1,4 +1,4 @@ | ||
116 | -warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install it from the CPAN distribution Perl4::CoreLibs. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
117 | +warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install the separate libperl4-corelibs-perl package. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
118 | |||
119 | # | ||
120 | # This library is no longer being maintained, and is included for backward | ||
121 | diff --git a/lib/complete.pl b/lib/complete.pl | ||
122 | index 9ed041c..2ab0c6a 100644 | ||
123 | --- a/lib/complete.pl | ||
124 | +++ b/lib/complete.pl | ||
125 | @@ -1,4 +1,4 @@ | ||
126 | -warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install it from the CPAN distribution Perl4::CoreLibs. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
127 | +warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install the separate libperl4-corelibs-perl package. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
128 | |||
129 | ;# | ||
130 | # | ||
131 | diff --git a/lib/ctime.pl b/lib/ctime.pl | ||
132 | index aa00d00..ac24e71 100644 | ||
133 | --- a/lib/ctime.pl | ||
134 | +++ b/lib/ctime.pl | ||
135 | @@ -1,4 +1,4 @@ | ||
136 | -warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install it from the CPAN distribution Perl4::CoreLibs. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
137 | +warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install the separate libperl4-corelibs-perl package. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
138 | |||
139 | ;# ctime.pl is a simple Perl emulation for the well known ctime(3C) function. | ||
140 | # | ||
141 | diff --git a/lib/deprecate.pm b/lib/deprecate.pm | ||
142 | index 7562c69..fc548b0 100644 | ||
143 | --- a/lib/deprecate.pm | ||
144 | +++ b/lib/deprecate.pm | ||
145 | @@ -7,6 +7,14 @@ our $VERSION = 0.02; | ||
146 | our %Config; | ||
147 | unless (%Config) { require Config; *Config = \%Config::Config; } | ||
148 | |||
149 | +# Debian-specific change: recommend the separate Debian packages of | ||
150 | +# deprecated modules where available | ||
151 | + | ||
152 | +my %DEBIAN_PACKAGES = ( | ||
153 | + "Shell" => "libshell-perl", | ||
154 | + "Devel::DProf" => "libdevel-dprof-perl" | ||
155 | +); | ||
156 | + | ||
157 | # This isn't a public API. It's internal to code maintained by the perl-porters | ||
158 | # If you would like it to be a public API, please send a patch with | ||
159 | # documentation and tests. Until then, it may change without warning. | ||
160 | @@ -58,9 +66,15 @@ EOM | ||
161 | if (defined $callers_bitmask | ||
162 | && (vec($callers_bitmask, $warnings::Offsets{deprecated}, 1) | ||
163 | || vec($callers_bitmask, $warnings::Offsets{all}, 1))) { | ||
164 | - warn <<"EOM"; | ||
165 | + if (my $deb = $DEBIAN_PACKAGES{$package}) { | ||
166 | + warn <<"EOM"; | ||
167 | +$package will be removed from the Perl core distribution in the next major release. Please install the separate $deb package. It is being used at $call_file, line $call_line. | ||
168 | +EOM | ||
169 | + } else { | ||
170 | + warn <<"EOM"; | ||
171 | $package will be removed from the Perl core distribution in the next major release. Please install it from CPAN. It is being used at $call_file, line $call_line. | ||
172 | EOM | ||
173 | + } | ||
174 | } | ||
175 | } | ||
176 | } | ||
177 | diff --git a/lib/dotsh.pl b/lib/dotsh.pl | ||
178 | index 92f1f4c..4085122 100644 | ||
179 | --- a/lib/dotsh.pl | ||
180 | +++ b/lib/dotsh.pl | ||
181 | @@ -1,4 +1,4 @@ | ||
182 | -warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install it from the CPAN distribution Perl4::CoreLibs. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
183 | +warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install the separate libperl4-corelibs-perl package. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
184 | |||
185 | # | ||
186 | # @(#)dotsh.pl 03/19/94 | ||
187 | diff --git a/lib/exceptions.pl b/lib/exceptions.pl | ||
188 | index 8af64c8..b5b1427 100644 | ||
189 | --- a/lib/exceptions.pl | ||
190 | +++ b/lib/exceptions.pl | ||
191 | @@ -1,4 +1,4 @@ | ||
192 | -warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install it from the CPAN distribution Perl4::CoreLibs. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
193 | +warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install the separate libperl4-corelibs-perl package. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
194 | |||
195 | # exceptions.pl | ||
196 | # tchrist@convex.com | ||
197 | diff --git a/lib/fastcwd.pl b/lib/fastcwd.pl | ||
198 | index 70007a1..2c7c42e 100644 | ||
199 | --- a/lib/fastcwd.pl | ||
200 | +++ b/lib/fastcwd.pl | ||
201 | @@ -1,4 +1,4 @@ | ||
202 | -warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install it from the CPAN distribution Perl4::CoreLibs. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
203 | +warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install the separate libperl4-corelibs-perl package. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
204 | |||
205 | # By John Bazik | ||
206 | # | ||
207 | diff --git a/lib/find.pl b/lib/find.pl | ||
208 | index 8e1b42c..7fb2fbf 100644 | ||
209 | --- a/lib/find.pl | ||
210 | +++ b/lib/find.pl | ||
211 | @@ -1,4 +1,4 @@ | ||
212 | -warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install it from the CPAN distribution Perl4::CoreLibs. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
213 | +warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install the separate libperl4-corelibs-perl package. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
214 | |||
215 | # This library is deprecated and unmaintained. It is included for | ||
216 | # compatibility with Perl 4 scripts which may use it, but it will be | ||
217 | diff --git a/lib/finddepth.pl b/lib/finddepth.pl | ||
218 | index 479905f..c07cea5 100644 | ||
219 | --- a/lib/finddepth.pl | ||
220 | +++ b/lib/finddepth.pl | ||
221 | @@ -1,4 +1,4 @@ | ||
222 | -warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install it from the CPAN distribution Perl4::CoreLibs. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
223 | +warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install the separate libperl4-corelibs-perl package. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
224 | |||
225 | # This library is deprecated and unmaintained. It is included for | ||
226 | # compatibility with Perl 4 scripts which may use it, but it will be | ||
227 | diff --git a/lib/flush.pl b/lib/flush.pl | ||
228 | index c427976..e5ed0ae 100644 | ||
229 | --- a/lib/flush.pl | ||
230 | +++ b/lib/flush.pl | ||
231 | @@ -1,4 +1,4 @@ | ||
232 | -warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install it from the CPAN distribution Perl4::CoreLibs. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
233 | +warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install the separate libperl4-corelibs-perl package. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
234 | |||
235 | # | ||
236 | # This library is no longer being maintained, and is included for backward | ||
237 | diff --git a/lib/getcwd.pl b/lib/getcwd.pl | ||
238 | index 77b2442..3810a99 100644 | ||
239 | --- a/lib/getcwd.pl | ||
240 | +++ b/lib/getcwd.pl | ||
241 | @@ -1,4 +1,4 @@ | ||
242 | -warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install it from the CPAN distribution Perl4::CoreLibs. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
243 | +warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install the separate libperl4-corelibs-perl package. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
244 | |||
245 | # By Brandon S. Allbery | ||
246 | # | ||
247 | diff --git a/lib/getopt.pl b/lib/getopt.pl | ||
248 | index 1d4008a..019a165 100644 | ||
249 | --- a/lib/getopt.pl | ||
250 | +++ b/lib/getopt.pl | ||
251 | @@ -1,4 +1,4 @@ | ||
252 | -warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install it from the CPAN distribution Perl4::CoreLibs. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
253 | +warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install the separate libperl4-corelibs-perl package. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
254 | |||
255 | ;# $RCSfile: getopt.pl,v $$Revision: 4.1 $$Date: 92/08/07 18:23:58 $ | ||
256 | # | ||
257 | diff --git a/lib/getopts.pl b/lib/getopts.pl | ||
258 | index 37ecb4a..3d27418 100644 | ||
259 | --- a/lib/getopts.pl | ||
260 | +++ b/lib/getopts.pl | ||
261 | @@ -1,4 +1,4 @@ | ||
262 | -warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install it from the CPAN distribution Perl4::CoreLibs. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
263 | +warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install the separate libperl4-corelibs-perl package. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
264 | |||
265 | ;# getopts.pl - a better getopt.pl | ||
266 | # | ||
267 | diff --git a/lib/hostname.pl b/lib/hostname.pl | ||
268 | index f57375e..b055d30 100644 | ||
269 | --- a/lib/hostname.pl | ||
270 | +++ b/lib/hostname.pl | ||
271 | @@ -1,4 +1,4 @@ | ||
272 | -warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install it from the CPAN distribution Perl4::CoreLibs. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
273 | +warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install the separate libperl4-corelibs-perl package. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
274 | |||
275 | # From: asherman@fmrco.com (Aaron Sherman) | ||
276 | # | ||
277 | diff --git a/lib/importenv.pl b/lib/importenv.pl | ||
278 | index 625edf6..52ee722 100644 | ||
279 | --- a/lib/importenv.pl | ||
280 | +++ b/lib/importenv.pl | ||
281 | @@ -1,4 +1,4 @@ | ||
282 | -warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install it from the CPAN distribution Perl4::CoreLibs. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
283 | +warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install the separate libperl4-corelibs-perl package. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
284 | |||
285 | # This library is no longer being maintained, and is included for backward | ||
286 | # compatibility with Perl 4 programs which may require it. | ||
287 | diff --git a/lib/look.pl b/lib/look.pl | ||
288 | index 7be55b2..12dcace 100644 | ||
289 | --- a/lib/look.pl | ||
290 | +++ b/lib/look.pl | ||
291 | @@ -1,4 +1,4 @@ | ||
292 | -warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install it from the CPAN distribution Perl4::CoreLibs. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
293 | +warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install the separate libperl4-corelibs-perl package. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
294 | |||
295 | ;# Usage: &look(*FILEHANDLE,$key,$dict,$fold) | ||
296 | # | ||
297 | diff --git a/lib/newgetopt.pl b/lib/newgetopt.pl | ||
298 | index 4ac9470..08df6cb 100644 | ||
299 | --- a/lib/newgetopt.pl | ||
300 | +++ b/lib/newgetopt.pl | ||
301 | @@ -1,4 +1,4 @@ | ||
302 | -warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install it from the CPAN distribution Perl4::CoreLibs. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
303 | +warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install the separate libperl4-corelibs-perl package. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
304 | |||
305 | # This library is no longer being maintained, and is included for backward | ||
306 | # compatibility with Perl 4 programs which may require it. | ||
307 | diff --git a/lib/open2.pl b/lib/open2.pl | ||
308 | index ceb5653..a05f2ab 100644 | ||
309 | --- a/lib/open2.pl | ||
310 | +++ b/lib/open2.pl | ||
311 | @@ -1,4 +1,4 @@ | ||
312 | -warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install it from the CPAN distribution Perl4::CoreLibs. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
313 | +warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install the separate libperl4-corelibs-perl package. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
314 | |||
315 | # This legacy library is deprecated and will be removed in a future | ||
316 | # release of perl. | ||
317 | diff --git a/lib/open3.pl b/lib/open3.pl | ||
318 | index 9f4d5a4..27f7ab4 100644 | ||
319 | --- a/lib/open3.pl | ||
320 | +++ b/lib/open3.pl | ||
321 | @@ -1,4 +1,4 @@ | ||
322 | -warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install it from the CPAN distribution Perl4::CoreLibs. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
323 | +warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install the separate libperl4-corelibs-perl package. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
324 | |||
325 | # This legacy library is deprecated and will be removed in a future | ||
326 | # release of perl. | ||
327 | diff --git a/lib/pwd.pl b/lib/pwd.pl | ||
328 | index bd8123b..bdace6e 100644 | ||
329 | --- a/lib/pwd.pl | ||
330 | +++ b/lib/pwd.pl | ||
331 | @@ -1,4 +1,4 @@ | ||
332 | -warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install it from the CPAN distribution Perl4::CoreLibs. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
333 | +warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install the separate libperl4-corelibs-perl package. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
334 | |||
335 | ;# pwd.pl - keeps track of current working directory in PWD environment var | ||
336 | ;# | ||
337 | diff --git a/lib/shellwords.pl b/lib/shellwords.pl | ||
338 | index b562f5f..7f16375 100644 | ||
339 | --- a/lib/shellwords.pl | ||
340 | +++ b/lib/shellwords.pl | ||
341 | @@ -1,4 +1,4 @@ | ||
342 | -warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install it from the CPAN distribution Perl4::CoreLibs. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
343 | +warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install the separate libperl4-corelibs-perl package. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
344 | |||
345 | ;# This legacy library is deprecated and will be removed in a future | ||
346 | ;# release of perl. | ||
347 | diff --git a/lib/stat.pl b/lib/stat.pl | ||
348 | index feda273..910ce1c 100644 | ||
349 | --- a/lib/stat.pl | ||
350 | +++ b/lib/stat.pl | ||
351 | @@ -1,4 +1,4 @@ | ||
352 | -warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install it from the CPAN distribution Perl4::CoreLibs. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
353 | +warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install the separate libperl4-corelibs-perl package. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
354 | |||
355 | ;# This legacy library is deprecated and will be removed in a future | ||
356 | ;# release of perl. | ||
357 | diff --git a/lib/syslog.pl b/lib/syslog.pl | ||
358 | index 7504a5d..4c2b95f 100644 | ||
359 | --- a/lib/syslog.pl | ||
360 | +++ b/lib/syslog.pl | ||
361 | @@ -1,4 +1,4 @@ | ||
362 | -warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install it from the CPAN distribution Perl4::CoreLibs. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
363 | +warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install the separate libperl4-corelibs-perl package. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
364 | |||
365 | # | ||
366 | # syslog.pl | ||
367 | diff --git a/lib/tainted.pl b/lib/tainted.pl | ||
368 | index e88bca1..d58c765 100644 | ||
369 | --- a/lib/tainted.pl | ||
370 | +++ b/lib/tainted.pl | ||
371 | @@ -1,4 +1,4 @@ | ||
372 | -warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install it from the CPAN distribution Perl4::CoreLibs. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
373 | +warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install the separate libperl4-corelibs-perl package. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
374 | |||
375 | # This legacy library is deprecated and will be removed in a future | ||
376 | # release of perl. | ||
377 | diff --git a/lib/termcap.pl b/lib/termcap.pl | ||
378 | index a84cba3..e641f4d 100644 | ||
379 | --- a/lib/termcap.pl | ||
380 | +++ b/lib/termcap.pl | ||
381 | @@ -1,4 +1,4 @@ | ||
382 | -warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install it from the CPAN distribution Perl4::CoreLibs. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
383 | +warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install the separate libperl4-corelibs-perl package. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
384 | |||
385 | ;# $RCSfile: termcap.pl,v $$Revision: 4.1 $$Date: 92/08/07 18:24:16 $ | ||
386 | # | ||
387 | diff --git a/lib/timelocal.pl b/lib/timelocal.pl | ||
388 | index fefb9da..2297888 100644 | ||
389 | --- a/lib/timelocal.pl | ||
390 | +++ b/lib/timelocal.pl | ||
391 | @@ -1,4 +1,4 @@ | ||
392 | -warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install it from the CPAN distribution Perl4::CoreLibs. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
393 | +warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install the separate libperl4-corelibs-perl package. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
394 | |||
395 | ;# timelocal.pl | ||
396 | ;# | ||
397 | diff --git a/lib/validate.pl b/lib/validate.pl | ||
398 | index fc2d16a..1a8aef4 100644 | ||
399 | --- a/lib/validate.pl | ||
400 | +++ b/lib/validate.pl | ||
401 | @@ -1,4 +1,4 @@ | ||
402 | -warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install it from the CPAN distribution Perl4::CoreLibs. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
403 | +warn "Legacy library @{[(caller(0))[6]]} will be removed from the Perl core distribution in the next major release. Please install the separate libperl4-corelibs-perl package. It is being used at @{[(caller)[1]]}, line @{[(caller)[2]]}.\n"; | ||
404 | |||
405 | ;# The validate routine takes a single multiline string consisting of | ||
406 | ;# lines containing a filename plus a file test to try on it. (The | ||