Skip to content

P
perl
Commit 90c4c2ee authored by Vasily's avatar Vasily Committed by Carsten Munk
Browse files
Options

Fix Mer#345 Update perl to 5.16.1 

Signed-off-by: default avatarVasily <vas.gurevich@gmail.com>
Change-Id: I823482163763c38b7113759e65461b3f9e95d74a

Conflicts:

	perl.changes
	perl.spec
Signed-off-by: default avatarCarsten Munk <carsten.munk@jollamobile.com>
parent 09c5c79c
Hide whitespace changes
Inline Side-by-side
Showing with 2052 additions and 757 deletions
macros.perl
View file @ 90c4c2ee
......@@ -4,6 +4,7 @@
# rpm core; but won't cause a build to fail if they're not present.
#
# Chris Weyl <cweyl@alumni.drew.edu> 2009
# Marcela Mašláňová <mmaslano@redhat.com> 2011
# This macro unsets several common vars used to control how Makefile.PL (et
# al) build and install packages. We also set a couple to help some of the
......@@ -27,7 +28,11 @@ export PERL_MM_USE_DEFAULT=1
# keep track of what "revision" of the filtering we're at. Each time we
# change the filter we should increment this.
%perl_default_filter_revision 2
%perl_default_filter_revision 3
# Perl provides/requeries are generated by external generators.
%global __perl_provides /usr/lib/rpm/perl.prov
%global __perl_requires /usr/lib/rpm/perl.req
# By default, for perl packages we want to filter all files in _docdir from
# req/prov scanning, as well as filtering out any provides caused by private
......@@ -36,14 +41,12 @@ export PERL_MM_USE_DEFAULT=1
# Note that this must be invoked in the spec file, preferably as
# "%{?perl_default_filter}", before any %description block.
%perl_default_filter %{?filter_setup: %{expand: \
%filter_provides_in %{perl_vendorarch}/.*\\.so$ \
%filter_provides_in -P %{perl_archlib}/(?!CORE/libperl).*\\.so$ \
%filter_from_provides /perl(UNIVERSAL)/d; /perl(DB)/d \
%filter_provides_in %{_docdir} \
%filter_requires_in %{_docdir} \
%filter_setup \
}}
%perl_default_filter %{expand: \
%global __provides_exclude_from %{perl_vendorarch}/auto/.*\\\\.so$|%{perl_archlib}/.*\\\\.so$|%{_docdir}
%global __requires_exclude_from %{_docdir}
%global __provides_exclude perl\\\\(VMS|perl\\\\(Win32|perl\\\\(DB\\\\)|perl\\\\(UNIVERSAL\\\\)
%global __requires_exclude perl\\\\(VMS|perl\\\\(Win32
}
#############################################################################
# Macros to assist with generating a "-tests" subpackage in a semi-automatic
......
perl-5.10.0-perlbug-tag.patch deleted 100644 → 0
View file @ 09c5c79c
--- perl-5.10.1/utils/perlbug.PL.fedora 2009-08-12 20:49:24.000000000 +0200
+++ perl-5.10.1/utils/perlbug.PL 2009-11-18 15:56:15.000000000 +0100
@@ -27,8 +27,6 @@ open OUT, ">$file" or die "Can't create
open PATCH_LEVEL, "<" . catfile(updir, "patchlevel.h")
or die "Can't open patchlevel.h: $!";
-my $patchlevel_date = (stat PATCH_LEVEL)[9];
-
while (<PATCH_LEVEL>) {
last if $_ =~ /^\s*static\s+(?:const\s+)?char.*?local_patches\[\]\s*=\s*{\s*$/;
}
@@ -71,9 +69,8 @@ $Config{startperl}
eval 'exec $Config{perlpath} -S \$0 \${1+"\$@"}'
if \$running_under_some_shell;
-my \$config_tag1 = '$extract_version - $Config{cf_time}';
+my \$config_tag1 = '$extract_version';
-my \$patchlevel_date = $patchlevel_date;
my \$patch_tags = '$patch_tags';
my \@patches = (
$patch_desc
@@ -333,17 +330,6 @@ sub Init {
$ok = '';
if ($::opt_o) {
if ($::opt_o eq 'k' or $::opt_o eq 'kay') {
- my $age = time - $patchlevel_date;
- if ($::opt_o eq 'k' and $age > 60 * 24 * 60 * 60 ) {
- my $date = localtime $patchlevel_date;
- print <<"EOF";
-"perlbug -ok" and "perlbug -nok" do not report on Perl versions which
-are more than 60 days old. This Perl version was constructed on
-$date. If you really want to report this, use
-"perlbug -okay" or "perlbug -nokay".
-EOF
- exit();
- }
# force these options
unless ($::opt_n) {
$::opt_S = 1; # don't prompt for send
@@ -730,8 +716,8 @@ EFF
print OUT <<EFF;
---
EFF
- print OUT "This perlbug was built using Perl $config_tag1\n",
- "It is being executed now by Perl $config_tag2.\n\n"
+ print OUT "This perlbug was built using Perl $config_tag1 in the Fedora build system.\n",
+ "It is being executed now by Perl $config_tag2.\n\n"
if $config_tag2 ne $config_tag1;
print OUT <<EOF;
perl-5.12.1-notimestamps.patch
View file @ 90c4c2ee
diff -ru perl-5.12.1/config_h.SH perl-notimestamps/config_h.SH
--- perl-5.12.1/config_h.SH 2010-05-14 00:01:07.000000000 +0200
+++ perl-notimestamps/config_h.SH 2011-08-21 09:06:12.936929316 +0200
@@ -46,9 +46,6 @@
/*
* Package name : $package
diff -Naur perl-5.16.0-orig//config_h.SH perl-5.16.0//config_h.SH
--- perl-5.16.0-orig//config_h.SH 2012-04-25 03:18:30.000000000 +0300
+++ perl-5.16.0//config_h.SH 2012-08-03 05:42:37.000000000 +0300
@@ -42,9 +42,6 @@
/* Package name : $package
* Source directory : $src
- * Configuration time: $cf_time
- * Configured by : $cf_by
......@@ -11,11 +11,10 @@ diff -ru perl-5.12.1/config_h.SH perl-notimestamps/config_h.SH
*/
#ifndef _config_h_
diff -ru perl-5.12.1/Configure perl-notimestamps/Configure
--- perl-5.12.1/Configure 2010-05-14 00:01:07.000000000 +0200
+++ perl-notimestamps/Configure 2011-08-21 11:53:57.552141211 +0200
@@ -22258,9 +22258,6 @@
diff -Naur perl-5.16.0-orig//Configure perl-5.16.0//Configure
--- perl-5.16.0-orig//Configure 2012-04-25 03:18:30.000000000 +0300
+++ perl-5.16.0//Configure 2012-08-03 05:46:17.000000000 +0300
@@ -22739,9 +22739,6 @@
# Package name : $package
# Source directory : $src
......@@ -25,7 +24,7 @@ diff -ru perl-5.12.1/Configure perl-notimestamps/Configure
EOT
: Add in command line options if available
@@ -22319,7 +22316,6 @@
@@ -22800,7 +22797,6 @@
ccversion='$ccversion'
cf_by='$cf_by'
cf_email='$cf_email'
......@@ -33,7 +32,7 @@ diff -ru perl-5.12.1/Configure perl-notimestamps/Configure
charbits='$charbits'
charsize='$charsize'
chgrp='$chgrp'
@@ -23075,7 +23071,6 @@
@@ -23566,7 +23562,6 @@
myarchname='$myarchname'
mydomain='$mydomain'
myhostname='$myhostname'
......@@ -41,24 +40,34 @@ diff -ru perl-5.12.1/Configure perl-notimestamps/Configure
n='$n'
need_va_copy='$need_va_copy'
netdb_hlen_type='$netdb_hlen_type'
diff -ru perl-5.12.1/lib/unicore/mktables perl-notimestamps/lib/unicore/mktables
--- perl-5.12.1/lib/unicore/mktables 2010-05-14 00:01:07.000000000 +0200
+++ perl-notimestamps/lib/unicore/mktables 2011-08-21 12:23:27.770106037 +0200
@@ -13969,7 +13969,7 @@
diff -Naur perl-5.16.0-orig//cpan/podlators/lib/Pod/Man.pm perl-5.16.0//cpan/podlators/lib/Pod/Man.pm
--- perl-5.16.0-orig//cpan/podlators/lib/Pod/Man.pm 2012-02-15 06:44:44.000000000 +0200
+++ perl-5.16.0//cpan/podlators/lib/Pod/Man.pm 2012-08-03 05:58:03.000000000 +0300
@@ -919,7 +919,7 @@
.\\" ========================================================================
.\\"
.IX Title "$index"
-.TH $name $section "$date" "$$self{release}" "$$self{center}"
+.TH $name $section "$$self{release}" "$$self{center}"
.\\" For nroff, turn off justification. Always turn off hyphenation; it makes
.\\" way too many mistakes in technical documents.
.if n .ad l
diff -Naur perl-5.16.0-orig//lib/unicore/mktables perl-5.16.0//lib/unicore/mktables
--- perl-5.16.0-orig//lib/unicore/mktables 2012-04-25 06:04:46.000000000 +0300
+++ perl-5.16.0//lib/unicore/mktables 2012-08-03 05:52:33.000000000 +0300
@@ -16800,7 +16800,7 @@
#
# $file_list -- File list for $0.
#
-# Autogenerated on @{[scalar localtime]}
-# Autogenerated starting on $start_time ($localtime)
+# Autogenerated.
#
# - First section is input files
# ($0 itself is not listed but is automatically considered an input)
diff -ru perl-5.12.1/perl.c perl-notimestamps/perl.c
--- perl-5.12.1/perl.c 2010-05-14 00:01:07.000000000 +0200
+++ perl-notimestamps/perl.c 2011-08-21 09:07:15.366402229 +0200
@@ -1705,7 +1705,7 @@
diff -Naur perl-5.16.0-orig//perl.c perl-5.16.0//perl.c
--- perl-5.16.0-orig//perl.c 2012-04-25 03:18:35.000000000 +0300
+++ perl-5.16.0//perl.c 2012-08-03 05:54:47.000000000 +0300
@@ -1757,7 +1757,7 @@
#ifdef __DATE__
# ifdef __TIME__
PUSHs(Perl_newSVpvn_flags(aTHX_
......@@ -67,18 +76,3 @@ diff -ru perl-5.12.1/perl.c perl-notimestamps/perl.c
SVs_TEMP));
# else
PUSHs(Perl_newSVpvn_flags(aTHX_ STR_WITH_LEN("Compiled on " __DATE__),
diff -ru perl-5.12.1/cpan/podlators/lib/Pod/Man.pm perl-notimestamps/cpan/podlators/lib/Pod/Man.pm
--- perl-5.12.1/cpan/podlators/lib/Pod/Man.pm 2010-04-26 08:09:08.000000000 +0000
+++ perl-notimestamps/cpan/podlators/lib/Pod/Man.pm 2012-01-03 17:34:58.014081446 +0000
@@ -912,7 +912,7 @@
.\\" ========================================================================
.\\"
.IX Title "$index"
-.TH $name $section "$date" "$$self{release}" "$$self{center}"
+.TH $name $section "$$self{release}" "$$self{center}"
.\\" For nroff, turn off justification. Always turn off hyphenation; it makes
.\\" way too many mistakes in technical documents.
.if n .ad l
perl-5.14.1-offtest.patch 0 → 100644
View file @ 90c4c2ee
diff -up perl-5.14.1/cpan/File-Temp/t/fork.t.off perl-5.14.1/cpan/File-Temp/t/fork.t
--- perl-5.14.1/cpan/File-Temp/t/fork.t.off 2011-04-13 13:36:34.000000000 +0200
+++ perl-5.14.1/cpan/File-Temp/t/fork.t 2011-06-20 10:29:31.536282611 +0200
@@ -12,12 +12,8 @@ BEGIN {
$Config::Config{useithreads} and
$Config::Config{ccflags} =~ /-DPERL_IMPLICIT_SYS/
);
- if ( $can_fork ) {
- print "1..8\n";
- } else {
- print "1..0 # Skip No fork available\n";
+ print "1..0 # Skip Koji doesn't work with Perl fork tests\n";
exit;
- }
}
use File::Temp;
perl-5.14.2-find2perl-transtate-question-mark-properly.patch 0 → 100644
View file @ 90c4c2ee
diff -up a/x2p/find2perl.PL b/x2p/find2perl.PL
--- a/x2p/find2perl.PL 2010-12-30 03:07:17.000000000 +0100
+++ b/x2p/find2perl.PL 2012-05-29 10:18:11.697683643 +0200
@@ -681,7 +681,8 @@ sub tab () {
sub fileglob_to_re ($) {
my $x = shift;
$x =~ s#([./^\$()+])#\\$1#g;
- $x =~ s#([?*])#.$1#g;
+ $x =~ s#\*#.*#g;
+ $x =~ s#\?#.#g;
"^$x\\z";
}
perl-5.16.0-fix-broken-atof.patch 0 → 100644
View file @ 90c4c2ee
From 78787052b6a68c0f54cfa983a69c44276de9daa4 Mon Sep 17 00:00:00 2001
From: Jesse Luehrs <doy@tozt.net>
Date: Tue, 26 Jun 2012 00:13:54 -0500
Subject: [PATCH] use a less broken test for locale radix in atof [perl #109318]
---
lib/locale.t | 33 +++++++++++++++++++++++++++++++++
numeric.c | 25 +++++++++++++++----------
2 files changed, 48 insertions(+), 10 deletions(-)
diff --git a/lib/locale.t b/lib/locale.t
index dfc6d2b..26a7bd4 100644
--- a/lib/locale.t
+++ b/lib/locale.t
@@ -1247,6 +1247,39 @@ foreach $Locale (@Locale) {
print "# failed $locales_test_number locale '$Locale' characters @f\n"
}
}
+
+ # [perl #109318]
+ {
+ my @f = ();
+ ++$locales_test_number;
+ $test_names{$locales_test_number} = 'Verify atof with locale radix and negative exponent';
+
+ my $radix = POSIX::localeconv()->{decimal_point};
+ my @nums = (
+ "3.14e+9", "3${radix}14e+9", "3.14e-9", "3${radix}14e-9",
+ "-3.14e+9", "-3${radix}14e+9", "-3.14e-9", "-3${radix}14e-9",
+ );
+
+ if (! $is_utf8_locale) {
+ use locale;
+ for my $num (@nums) {
+ push @f, $num
+ unless sprintf("%g", $num) =~ /3.+14/;
+ }
+ }
+ else {
+ use locale ':not_characters';
+ for my $num (@nums) {
+ push @f, $num
+ unless sprintf("%g", $num) =~ /3.+14/;
+ }
+ }
+
+ tryneoalpha($Locale, $locales_test_number, @f == 0);
+ if (@f) {
+ print "# failed $locales_test_number locale '$Locale' numbers @f\n"
+ }
+ }
}
my $final_locales_test_number = $locales_test_number;
diff --git a/numeric.c b/numeric.c
index be86f3a..3eb8a0e 100644
--- a/numeric.c
+++ b/numeric.c
@@ -847,17 +847,22 @@ Perl_my_atof(pTHX_ const char* s)
PERL_ARGS_ASSERT_MY_ATOF;
- if (PL_numeric_local && IN_SOME_LOCALE_FORM) {
- NV y;
+ if (PL_numeric_local && PL_numeric_radix_sv && IN_SOME_LOCALE_FORM) {
+ char *standard = NULL, *local = NULL;
+ bool use_standard_radix;
- /* Scan the number twice; once using locale and once without;
- * choose the larger result (in absolute value). */
- Perl_atof2(s, x);
- SET_NUMERIC_STANDARD();
- Perl_atof2(s, y);
- SET_NUMERIC_LOCAL();
- if ((y < 0.0 && y < x) || (y > 0.0 && y > x))
- return y;
+ standard = strchr(s, '.');
+ local = strstr(s, SvPV_nolen(PL_numeric_radix_sv));
+
+ use_standard_radix = standard && (!local || standard < local);
+
+ if (use_standard_radix)
+ SET_NUMERIC_STANDARD();
+
+ Perl_atof2(s, x);
+
+ if (use_standard_radix)
+ SET_NUMERIC_LOCAL();
}
else
Perl_atof2(s, x);
--
1.7.4.1
perl-5.10.0-USE_MM_LD_RUN_PATH.patch → perl-USE_MM_LD_RUN_PATH.patch
View file @ 90c4c2ee
diff -up perl-5.12.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/Liblist.pm.runpath perl-5.12.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/Liblist.pm
--- perl-5.12.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/Liblist.pm.runpath 2010-01-18 19:52:49.000000000 +0100
+++ perl-5.12.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/Liblist.pm 2010-04-13 15:56:55.859789425 +0200
diff -up perl-5.14.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/Liblist.pm.usem perl-5.14.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/Liblist.pm
--- perl-5.14.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/Liblist.pm.usem 2011-05-08 05:10:08.000000000 +0200
+++ perl-5.14.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/Liblist.pm 2011-05-17 11:14:22.169115984 +0200
@@ -88,6 +88,11 @@ libraries. LD_RUN_PATH is a colon separ
in LDLOADLIBS. It is passed as an environment variable to the process
that links the shared library.
......@@ -13,10 +13,10 @@ diff -up perl-5.12.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/Liblist.pm.runpath per
=head2 BSLOADLIBS
List of those libraries that are needed but can be linked in
diff -up perl-5.12.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MakeMaker.pm.runpath perl-5.12.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MakeMaker.pm
--- perl-5.12.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MakeMaker.pm.runpath 2010-01-18 19:52:49.000000000 +0100
+++ perl-5.12.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MakeMaker.pm 2010-04-13 16:00:32.941778159 +0200
@@ -262,7 +262,7 @@ sub full_setup {
diff -up perl-5.14.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MakeMaker.pm.usem perl-5.14.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MakeMaker.pm
--- perl-5.14.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MakeMaker.pm.usem 2011-05-08 05:10:08.000000000 +0200
+++ perl-5.14.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MakeMaker.pm 2011-05-17 13:39:26.912586030 +0200
@@ -278,7 +278,7 @@ sub full_setup {
PERL_SRC PERM_DIR PERM_RW PERM_RWX
PL_FILES PM PM_FILTER PMLIBDIRS PMLIBPARENTDIRS POLLUTE PPM_INSTALL_EXEC
PPM_INSTALL_SCRIPT PREREQ_FATAL PREREQ_PM PREREQ_PRINT PRINT_PREREQ
......@@ -25,7 +25,7 @@ diff -up perl-5.12.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MakeMaker.pm.runpath p
XS_VERSION clean depend dist dynamic_lib linkext macro realclean
tool_autosplit
@@ -406,7 +406,27 @@ sub new {
@@ -422,7 +422,27 @@ sub new {
# PRINT_PREREQ is RedHatism.
if ("@ARGV" =~ /\bPRINT_PREREQ\b/) {
$self->_PRINT_PREREQ;
......@@ -53,8 +53,8 @@ diff -up perl-5.12.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MakeMaker.pm.runpath p
+ };
print STDOUT "MakeMaker (v$VERSION)\n" if $Verbose;
if (-f "MANIFEST" && ! -f "Makefile"){
@@ -2320,6 +2340,40 @@ precedence. A typemap in the current di
if (-f "MANIFEST" && ! -f "Makefile" && ! $ENV{PERL_CORE}){
@@ -2352,6 +2372,40 @@ precedence. A typemap in the current di
precedence, even if it isn't listed in TYPEMAPS. The default system
typemap has lowest precedence.
......@@ -95,9 +95,9 @@ diff -up perl-5.12.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MakeMaker.pm.runpath p
=item VENDORPREFIX
Like PERLPREFIX, but only for the vendor install locations.
diff -up perl-5.12.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm.runpath perl-5.12.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm
--- perl-5.12.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm.runpath 2010-01-18 19:52:49.000000000 +0100
+++ perl-5.12.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm 2010-04-13 15:56:10.656775285 +0200
diff -up perl-5.14.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm.usem perl-5.14.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm
--- perl-5.14.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm.usem 2011-05-08 05:10:08.000000000 +0200
+++ perl-5.14.0/cpan/ExtUtils-MakeMaker/lib/ExtUtils/MM_Unix.pm 2011-05-17 11:14:22.172115972 +0200
@@ -944,7 +944,7 @@ $(INST_DYNAMIC): $(OBJECT) $(MYEXTLIB) $
}
......
perl-example.stp 0 → 100644
View file @ 90c4c2ee
/*
Example of the perl systemtap tapset shows a nested view of perl subroutine
calls and returns across the whole system.
To run:
stap perl-example.stp (for all perl processes)
For specific perl process:
stap perl-example.stp -c COMMAND
*/
probe perl.sub.call
{
printf("%s => sub: %s, filename: %s, line: %d\n", thread_indent(1),
sub, filename, lineno)
}
probe perl.sub.return
{
printf("%s <= sub: %s, filename: %s, line: %d\n",
thread_indent(-1), sub, filename, lineno)
}
perl-perlbug-tag.patch 0 → 100644
View file @ 90c4c2ee
diff -up perl-5.16.0-RC2/utils/perlbug.PL.fedora perl-5.16.0-RC2/utils/perlbug.PL
--- perl-5.16.0-RC2/utils/perlbug.PL.fedora 2012-05-16 16:15:51.000000000 +0200
+++ perl-5.16.0-RC2/utils/perlbug.PL 2012-05-16 16:18:36.018894464 +0200
@@ -271,17 +271,6 @@ sub Init {
$ok = '';
if ($opt{o}) {
if ($opt{o} eq 'k' or $opt{o} eq 'kay') {
- my $age = time - $patchlevel_date;
- if ($opt{o} eq 'k' and $age > 60 * 24 * 60 * 60 ) {
- my $date = localtime $patchlevel_date;
- print <<"EOF";
-"perlbug -ok" and "perlbug -nok" do not report on Perl versions which
-are more than 60 days old. This Perl version was constructed on
-$date. If you really want to report this, use
-"perlbug -okay" or "perlbug -nokay".
-EOF
- exit();
- }
# force these options
unless ($opt{n}) {
$opt{S} = 1; # don't prompt for send
perl.changes
View file @ 90c4c2ee
* Tue Apr 25 2013 Carsten Munk <carsten.munk@jollamobile.com> - 5.16.1
- Rebase Vasily's upgrade
* Fri Mar 01 2013 Carsten Munk <carsten.munk@jollamobile.com> - 5.12.1
- Stop perl from rebuilding constantly, again.
......@@ -7,6 +10,10 @@
* Tue Jan 22 2013 Oleg Girko <ol+mer@infoserver.ru> - 5.12.1
- Disable multilib for 64-bit architectures.
* Wed Aug 22 2012 Vasily Gurevich <vas.gurevich@gmail.com> - 5.16.1
- Upgrade to 5.16.1 from fc18
MER#345
* Wed Jan 4 2012 David Greaves <david@dgreaves.com> - 5.12.1
- Change Pod/Simple to remove datestamps in the man pages.
MER#66
......
perl.spec
View file @ 90c4c2ee
This source diff could not be displayed because it is too large. You can view the blob instead.
perl.stp 0 → 100644
View file @ 90c4c2ee
/*
This probe will fire when the perl script enters a subroutine.
*/
probe perl.sub.call = process("LIBRARY_PATH").mark("sub__entry")
{
sub = user_string($arg1)
filename = user_string($arg2)
lineno = $arg3
}
/*
This probe will fire when the return from a subroutine has been
hit.
*/
probe perl.sub.return = process("LIBRARY_PATH").mark("sub__return")
{
sub = user_string($arg1)
filename = user_string($arg2)
lineno = $arg3
}
porting-podcheck-regen.patch 0 → 100644
View file @ 90c4c2ee
diff -up perl-5.16.0-RC2/t/porting/known_pod_issues.dat.pody perl-5.16.0-RC2/t/porting/known_pod_issues.dat
--- perl-5.16.0-RC2/t/porting/known_pod_issues.dat.pody 2012-05-14 21:49:22.000000000 +0200
+++ perl-5.16.0-RC2/t/porting/known_pod_issues.dat 2012-05-16 14:21:00.000000000 +0200
@@ -1,4 +1,4 @@
-# This file is the data file for porting/podcheck.t.
+# This file is the data file for t/porting/podcheck.t.
# There are three types of lines.
# Comment lines are white-space only or begin with a '#', like this one. Any
# changes you make to the comment lines will be lost when the file is
@@ -217,6 +217,7 @@ pod/perlbook.pod Verbatim line length in
pod/perlcall.pod Verbatim line length including indents exceeds 79 by 2
pod/perlce.pod Verbatim line length including indents exceeds 79 by 2
pod/perlclib.pod Verbatim line length including indents exceeds 79 by 3
+pod/perlcn.pod Verbatim line length including indents exceeds 79 by 1
pod/perlcygwin.pod Verbatim line length including indents exceeds 79 by 25
pod/perldbmfilter.pod Verbatim line length including indents exceeds 79 by 1
pod/perldebguts.pod Verbatim line length including indents exceeds 79 by 68
@@ -248,6 +249,8 @@ pod/perliol.pod Verbatim line length inc
pod/perlipc.pod Apparent broken link 1
pod/perlipc.pod Verbatim line length including indents exceeds 79 by 19
pod/perlirix.pod Verbatim line length including indents exceeds 79 by 4
+pod/perljp.pod Verbatim line length including indents exceeds 79 by 1
+pod/perlko.pod Verbatim line length including indents exceeds 79 by 22
pod/perllol.pod Verbatim line length including indents exceeds 79 by 4
pod/perlmacosx.pod Verbatim line length including indents exceeds 79 by 3
pod/perlmod.pod Verbatim line length including indents exceeds 79 by 2
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment