Change 30243 by [EMAIL PROTECTED] on 2007/02/12 21:33:38
Integrate:
[ 27393]
Update David Dyck's e-mail address.
[ 27400]
Make report on bad filenames easier to read
[ 27464]
gozer took over from gsar (some time ago).
[ 27494]
threads and threads::shared are now dual-lived modules
[ 28033]
Add a --percentage option to checkAUTHORS.pl to show rankings as
percentages.
[ 28068]
cumulative totals and list reverse for checkAUTHORS.pl
[ 28103]
Teach checkAUTHORS.pl about Sarathy's new email address.
[ 28118]
Tie::RefHash is now dual life, maintained by Yuval Kogman.
[ 28506]
Update Audrey Tang's email throughout various files.
[ 28596]
Additional reason for ssh passphrase failures.
[ 28707]
Update Porting/Maintainers.pl w.r.t. #28695, #28703 and #28706.
[ 28711]
New authors
[ 28724]
Actually, Richard Clamp doesn't maintain Module::CoreList anymore.
[ 28796]
Add Exporter in the dual-lived module list
[ 28810]
Update Porting/Maintainers.pl w.r.t. #28809
[ 28812]
Update Porting/Maintainers.pl w.r.t. #28811
[ 28845]
MakeMaker is being split in new sub-distributions on CPAN
[ 28895]
Saddest patch I ever had to apply.
[ 28932]
Text::Soundex is now dual-lived.
[ 29114]
Add Term::UI and Object::Accessor to the list of dual-life modules
[ 29292]
Update checkcfgvars.pl: config.ce is in win32/ in 5.9.x
Leave wince/config.ce in the list as well, though, because that still
exists in 5.8.x
[ 29362]
Tune configure.com checking to ignore trailing comments.
[ 29370]
Even better configure.com handling for checkcfgvar.pl
[ 29579]
ExtUtils::Command is now maintained separately from MakeMaker
[ 29841]
Typo fix, by Robin Barker
[ 29844]
Subject: [PATCH] Re: Dual-lived AutoLoader
From: Steffen Mueller <[EMAIL PROTECTED]>
Date: Tue, 16 Jan 2007 15:29:44 +0100
Message-ID: <[EMAIL PROTECTED]>
[ 30025]
Change Tels' contact address
Affected files ...
... //depot/maint-5.8/perl/AUTHORS#42 integrate
... //depot/maint-5.8/perl/Porting/Maintainers.pl#26 integrate
... //depot/maint-5.8/perl/Porting/check83.pl#4 integrate
... //depot/maint-5.8/perl/Porting/checkAUTHORS.pl#8 integrate
... //depot/maint-5.8/perl/Porting/checkcfgvar.pl#3 integrate
... //depot/maint-5.8/perl/Porting/repository.pod#7 integrate
Differences ...
==== //depot/maint-5.8/perl/AUTHORS#42 (text) ====
Index: perl/AUTHORS
--- perl/AUTHORS#41~30131~ 2007-02-05 09:13:40.000000000 -0800
+++ perl/AUTHORS 2007-02-12 13:33:38.000000000 -0800
@@ -23,6 +23,7 @@
Adam Milner <[EMAIL PROTECTED]>
Adam Spiers
Adrian M. Enache <[EMAIL PROTECTED]>
+Adriano Ferreira <[EMAIL PROTECTED]>
Akim Demaille <[EMAIL PROTECTED]>
Alan Burlison <[EMAIL PROTECTED]>
Alan Champion <[EMAIL PROTECTED]>
@@ -33,12 +34,15 @@
Albert Dvornik <[EMAIL PROTECTED]>
Alessandro Forghieri <[EMAIL PROTECTED]>
Alexei Alexandrov <[EMAIL PROTECTED]>
+Alex Davies <[EMAIL PROTECTED]>
Alex Gough <[EMAIL PROTECTED]>
Alex Vandiver <[EMAIL PROTECTED]>
+Alex Waugh <[EMAIL PROTECTED]>
Alexander Gough <[EMAIL PROTECTED]>
Alexander Klimov <[EMAIL PROTECTED]>
Alexander Smishlajev <[EMAIL PROTECTED]>
Alexey Mahotkin <[EMAIL PROTECTED]>
+Alexey Toptygin <[EMAIL PROTECTED]>
Alexey Tourbin <[EMAIL PROTECTED]>
Alexey V. Barantsev <[EMAIL PROTECTED]>
Allen Smith <[EMAIL PROTECTED]>
@@ -73,10 +77,12 @@
Art Haas <[EMAIL PROTECTED]>
Artiom Morozov <[EMAIL PROTECTED]>
Artur Bergman <[EMAIL PROTECTED]>
-Audrey Tang <[EMAIL PROTECTED]>
+Ash Berlin <[EMAIL PROTECTED]>
+Audrey Tang <[EMAIL PROTECTED]>
Axel Boldt
Barrie Slaymaker <[EMAIL PROTECTED]>
Barry Friedman
+Bas van Sisseren <[EMAIL PROTECTED]>
Beau Cox
Ben Tilly <[EMAIL PROTECTED]>
Benjamin Goldberg <[EMAIL PROTECTED]>
@@ -175,6 +181,7 @@
Dan Sugalski <[EMAIL PROTECTED]>
Daniel Berger <[EMAIL PROTECTED]>
Daniel Chetlin <[EMAIL PROTECTED]>
+Daniel Frederick Crisman <[EMAIL PROTECTED]>
Daniel Grisinger <[EMAIL PROTECTED]>
Daniel Lieberman <[EMAIL PROTECTED]>
Daniel Muiño <[EMAIL PROTECTED]>
@@ -199,7 +206,7 @@
David Couture
David D. Kilzer <[email protected]>
David Denholm <[EMAIL PROTECTED]>
-David Dyck <[EMAIL PROTECTED]>
+David Dyck <[EMAIL PROTECTED]>
David Cannings <[EMAIL PROTECTED]>
David F. Haertig <[EMAIL PROTECTED]>
David Favor <[EMAIL PROTECTED]>
@@ -209,6 +216,8 @@
David Hammen <[EMAIL PROTECTED]>
David J. Fiander <[EMAIL PROTECTED]>
David Kerry <[EMAIL PROTECTED]>
+David Landgren <[EMAIL PROTECTED]>
+David Manura <[EMAIL PROTECTED]>
David Mitchell <[EMAIL PROTECTED]>
David Muir Sharnoff <[EMAIL PROTECTED]>
david nicol <[EMAIL PROTECTED]>
@@ -232,6 +241,7 @@
Douglas Lankshear <[EMAIL PROTECTED]>
Douglas Wilson <[EMAIL PROTECTED]>
Dov Grobgeld <[EMAIL PROTECTED]>
+Dr.Ruud <[EMAIL PROTECTED]>
Drago Goricanec <[EMAIL PROTECTED]>
Duncan Findlay <[EMAIL PROTECTED]>
Ed Mooring <[EMAIL PROTECTED]>
@@ -265,6 +275,7 @@
Fréderic Chauveau <[EMAIL PROTECTED]>
G. Del Merritt <[EMAIL PROTECTED]>
Gabe Schaffer
+Gabor Szabo <[EMAIL PROTECTED]>
Garry T. Williams <[EMAIL PROTECTED]>
Gary Clark <[EMAIL PROTECTED]>
Gary L. Armstrong
@@ -381,6 +392,7 @@
Jeremy Madea <[EMAIL PROTECTED]>
Jerome Abela <[EMAIL PROTECTED]>
Jerrad Pierce <[EMAIL PROTECTED]>
+Jerry Hedden <[EMAIL PROTECTED]>
Jesús Quiroga <[EMAIL PROTECTED]>
Jim Anderson <[EMAIL PROTECTED]>
Jim Avera <[EMAIL PROTECTED]>
@@ -701,6 +713,7 @@
Robert Millan <[EMAIL PROTECTED]>
Robert Partington <[EMAIL PROTECTED]>
Robert Sanders <[EMAIL PROTECTED]>
+Robert Sebastian Gerus <[EMAIL PROTECTED]>
Robert Spier <[EMAIL PROTECTED]>
Robin Barker <[EMAIL PROTECTED]>
Robin Houston <[EMAIL PROTECTED]>
@@ -735,6 +748,7 @@
Sebastian Wittmeier <[EMAIL PROTECTED]>
Sébastien Aperghis-Tramoni <[EMAIL PROTECTED]>
Sebastien Barre <[EMAIL PROTECTED]>
+Sherm Pendley <[EMAIL PROTECTED]>
Shigeya Suzuki <[EMAIL PROTECTED]>
Shimpei Yamashita <[EMAIL PROTECTED]>
Shinya Hayakawa <[EMAIL PROTECTED]>
@@ -766,6 +780,7 @@
Steve Nielsen <[EMAIL PROTECTED]>
Steve Pearlmutter
Steve Peters <[EMAIL PROTECTED]>
+Steve Purkis <[EMAIL PROTECTED]>
Steve Vinoski
Steven Hirsch <[EMAIL PROTECTED]>
Steven Knight <[EMAIL PROTECTED]>
@@ -827,7 +842,7 @@
Tye McQueen <[EMAIL PROTECTED]>
Ulrich Kunitz <[EMAIL PROTECTED]>
Ulrich Pfeifer <[EMAIL PROTECTED]>
-Vadim Konovalov <[EMAIL PROTECTED]>
+Vadim Konovalov <[EMAIL PROTECTED]>
Valeriy E. Ushakov <[EMAIL PROTECTED]>
Ville Skyttä <[EMAIL PROTECTED]>
Vishal Bhatia <[EMAIL PROTECTED]>
==== //depot/maint-5.8/perl/Porting/Maintainers.pl#26 (text) ====
Index: perl/Porting/Maintainers.pl
--- perl/Porting/Maintainers.pl#25~30207~ 2007-02-10 15:17:30.000000000
-0800
+++ perl/Porting/Maintainers.pl 2007-02-12 13:33:38.000000000 -0800
@@ -14,7 +14,7 @@
'ams' => 'Abhijit Menon-Sen <[EMAIL PROTECTED]>',
'andk' => 'Andreas J. Koenig <[EMAIL PROTECTED]>',
'arandal' => 'Allison Randal <[EMAIL PROTECTED]>',
- 'autrijus' => 'Audrey Tang <[EMAIL PROTECTED]>',
+ 'audreyt' => 'Audrey Tang <[EMAIL PROTECTED]>',
'bbb' => 'Rob Brown <[EMAIL PROTECTED]>',
'craig' => 'Craig Berry <[EMAIL PROTECTED]>',
'dankogai' => 'Dan Kogai <[EMAIL PROTECTED]>',
@@ -22,12 +22,14 @@
'dmanura' => 'David Manura <[EMAIL PROTECTED]>',
'drolsky' => 'Dave Rolsky <[EMAIL PROTECTED]>',
'elizabeth' => 'Elizabeth Mattijsen <[EMAIL PROTECTED]>',
+ 'ferreira' => 'Adriano Ferreira <[EMAIL PROTECTED]>',
'gbarr' => 'Graham Barr <[EMAIL PROTECTED]>',
'gaas' => 'Gisle Aas <[EMAIL PROTECTED]>',
'gsar' => 'Gurusamy Sarathy <[EMAIL PROTECTED]>',
'ilyam' => 'Ilya Martynov <[EMAIL PROTECTED]>',
'ilyaz' => 'Ilya Zakharevich <[EMAIL PROTECTED]>',
'jand' => 'Jan Dubois <[EMAIL PROTECTED]>',
+ 'jdhedden' => 'Jerry D. Hedden <[EMAIL PROTECTED]>',
'jhi' => 'Jarkko Hietaniemi <[EMAIL PROTECTED]>',
'jstowe' => 'Jonathan Stowe <[EMAIL PROTECTED]>',
'jv' => 'Johan Vromans <[EMAIL PROTECTED]>',
@@ -36,11 +38,14 @@
'laun' => 'Wolfgang Laun <[EMAIL PROTECTED]>',
'lstein' => 'Lincoln D. Stein <[EMAIL PROTECTED]>',
'marekr' => 'Marek Rouchal <[EMAIL PROTECTED]>',
+ 'markm' => 'Mark Mielke <[EMAIL PROTECTED]>',
'mhx' => 'Marcus Holland-Moritz <[EMAIL PROTECTED]>',
'mjd' => 'Mark-Jason Dominus <[EMAIL PROTECTED]>',
+ 'msergeant' => 'Matt Sergeant <[EMAIL PROTECTED]>',
+ 'mshelor' => 'Mark Shelor <[EMAIL PROTECTED]>',
'muir' => 'David Muir Sharnoff <[EMAIL PROTECTED]>',
'neilb' => 'Neil Bowers <[EMAIL PROTECTED]>',
- 'ni-s' => 'Nick Ing-Simmons <[EMAIL PROTECTED]>',
+ 'nuffin' => 'Yuval Kogman <[EMAIL PROTECTED]>',
'p5p' => 'perl5-porters <[email protected]>',
'perlfaq' => 'perlfaq-workers <[email protected]>',
'petdance' => 'Andy Lester <[EMAIL PROTECTED]>',
@@ -48,6 +53,7 @@
'pvhp' => 'Peter Prymmer <[EMAIL PROTECTED]>',
'rclamp' => 'Richard Clamp <[EMAIL PROTECTED]>',
'rgarcia' => 'Rafael Garcia-Suarez <[EMAIL PROTECTED]>',
+ 'rkobes' => 'Randy Kobes <[EMAIL PROTECTED]>',
'rmbarker' => 'Robin Barker <[EMAIL PROTECTED]>',
'rra' => 'Russ Allbery <[EMAIL PROTECTED]>',
'sadahiro' => 'SADAHIRO Tomoyuki <[EMAIL PROTECTED]>',
@@ -56,7 +62,8 @@
'sburke' => 'Sean Burke <[EMAIL PROTECTED]>',
'mschwern' => 'Michael Schwern <[EMAIL PROTECTED]>',
'smccam' => 'Stephen McCamant <[EMAIL PROTECTED]>',
- 'tels' => 'perl_dummy a-t bloodgate.com',
+ 'smueller' => 'Steffen Mueller <[EMAIL PROTECTED]>',
+ 'tels' => 'Tels <[EMAIL PROTECTED]>',
'tomhughes' => 'Tom Hughes <[EMAIL PROTECTED]>',
'tjenness' => 'Tim Jenness <[EMAIL PROTECTED]>',
'tyemq' => 'Tye McQueen <[EMAIL PROTECTED]>',
@@ -76,6 +83,13 @@
'CPAN' => 1,
},
+ 'AutoLoader' =>
+ {
+ 'MAINTAINER' => 'smueller',
+ 'FILES' => q[lib/AutoLoader.pm lib/AutoLoader.t],
+ 'CPAN' => 1,
+ },
+
'assertions' =>
{
'MAINTAINER' => 'salva',
@@ -189,6 +203,13 @@
'CPAN' => 1,
},
+ 'Digest::SHA' =>
+ {
+ 'MAINTAINER' => 'mshelor',
+ 'FILES' => q[ext/Digest/SHA],
+ 'CPAN' => 1,
+ },
+
'Encode' =>
{
'MAINTAINER' => 'dankogai',
@@ -198,7 +219,7 @@
'encoding::warnings' =>
{
- 'MAINTAINER' => 'autrijus',
+ 'MAINTAINER' => 'audreyt',
'FILES' => q[lib/encoding/warnings.pm
lib/encoding/warnings],
'CPAN' => 1,
},
@@ -210,6 +231,13 @@
'CPAN' => 0,
},
+ 'Exporter' =>
+ {
+ 'MAINTAINER' => 'ferreira',
+ 'FILES' => q[lib/Exporter.pm lib/Exporter.t
lib/Exporter/Heavy.pm],
+ 'CPAN' => 1,
+ },
+
'ExtUtils::CBuilder' =>
{
'MAINTAINER' => 'kwilliams',
@@ -217,14 +245,36 @@
'CPAN' => 1,
},
+ 'ExtUtils::Command' =>
+ {
+ 'MAINTAINER' => 'rkobes',
+ 'FILES' => q[lib/ExtUtils/Command.pm],
+ 'CPAN' => 1,
+ },
+
+ 'ExtUtils::Install' =>
+
+ {
+ 'MAINTAINER' => 'yves',
+ 'FILES' => q[lib/ExtUtils/{Install,Installed,Packlist}.pm],
+ 'CPAN' => 1,
+ },
+
'ExtUtils::MakeMaker' =>
{
'MAINTAINER' => 'mschwern',
- 'FILES' =>
q[lib/ExtUtils/{Command,Install,Installed,Liblist,MakeMaker,Manifest,Mkbootstrap,Mksymlists,MM*,MY,Packlist,testlib}.pm
lib/ExtUtils/{Command,Liblist,MakeMaker,MANIFEST.SKIP}
+ 'FILES' =>
q[lib/ExtUtils/{Liblist,MakeMaker,Mkbootstrap,Mksymlists,MM*,MY,testlib}.pm
lib/ExtUtils/{Command,Liblist,MakeMaker}
lib/ExtUtils/t t/lib/MakeMaker
t/lib/TieIn.pm t/lib/TieOut.pm],
'CPAN' => 1,
},
+ 'ExtUtils::Manifest' =>
+ {
+ 'MAINTAINER' => 'rkobes',
+ 'FILES' => q[lib/ExtUtils/{Manifest.pm,MANIFEST.SKIP}
lib/ExtUtils/t/Manifest.t],
+ 'CPAN' => 1,
+ },
+
'ExtUtils::ParseXS' =>
{
'MAINTAINER' => 'kwilliams',
@@ -329,7 +379,14 @@
'Locale::Maketext' =>
{
'MAINTAINER' => 'petdance',
- 'FILES' => q[lib/Locale/Maketext.pm
lib/Locale/Maketext],
+ 'FILES' => q[lib/Locale/Maketext.pm
lib/Locale/Maketext.pod lib/Locale/Maketext/ChangeLog
lib/Locale/Maketext/{Guts,GutsLoader}.pm lib/Locale/Maketext/README
lib/Locale/Maketext/TPJ13.pod lib/Locale/Maketext/t],
+ 'CPAN' => 1,
+ },
+
+ 'Locale::Maketext::Simple' =>
+ {
+ 'MAINTAINER' => 'audreyt',
+ 'FILES' => q[lib/Locale/Maketext/Simple.pm
lib/Locale/Maketext/Simple],
'CPAN' => 1,
},
@@ -378,11 +435,25 @@
'Module::CoreList' =>
{
- 'MAINTAINER' => 'rclamp',
+ 'MAINTAINER' => 'rgarcia',
'FILES' => q[lib/Module/CoreList
lib/Module/CoreList.pm],
'CPAN' => 1,
},
+ 'Module::Load' =>
+ {
+ 'MAINTAINER' => 'kane',
+ 'FILES' => q[lib/Module/Load lib/Module/Load.pm],
+ 'CPAN' => 1,
+ },
+
+ 'Module::Loaded' =>
+ {
+ 'MAINTAINER' => 'kane',
+ 'FILES' => q[lib/Module/Loaded lib/Module/Loaded.pm],
+ 'CPAN' => 1,
+ },
+
'Net::Ping' =>
{
'MAINTAINER' => 'bbb',
@@ -397,6 +468,27 @@
'CPAN' => 1,
},
+ 'Object::Accessor' =>
+ {
+ 'MAINTAINER' => 'kane',
+ 'FILES' => q[lib/Object/Accessor.pm
lib/Object/Accessor],
+ 'CPAN' => 1,
+ },
+
+ 'Package::Constants' =>
+ {
+ 'MAINTAINER' => 'kane',
+ 'FILES' => q[lib/Package/Constants
lib/Package/Constants.pm],
+ 'CPAN' => 1,
+ },
+
+ 'Params::Check' =>
+ {
+ 'MAINTAINER' => 'kane',
+ 'FILES' => q[lib/Params/Check lib/Params/Check.pm],
+ 'CPAN' => 1,
+ },
+
'perlebcdic' =>
{
'MAINTAINER' => 'pvhp',
@@ -411,15 +503,6 @@
'CPAN' => 0,
},
- 'perlio-doc' =>
- {
- 'MAINTAINER' => 'ni-s',
- 'FILES' => q[pod/perlapio.pod
- pod/perliol.pod
- lib/PerlIO.pm],
- 'CPAN' => 0,
- },
-
'PerlIO::via::QuotedPrint' =>
{
'MAINTAINER' => 'elizabeth',
@@ -540,6 +623,13 @@
'CPAN' => 1,
},
+ 'Text::Soundex' =>
+ {
+ 'MAINTAINER' => 'markm',
+ 'FILES' => q[ext/Text/Soundex],
+ 'CPAN' => 1,
+ },
+
'Term::ANSIColor' =>
{
'MAINTAINER' => 'rra',
@@ -547,6 +637,13 @@
'CPAN' => 1,
},
+ 'Term::UI' =>
+ {
+ 'MAINTAINER' => 'kane',
+ 'FILES' => q[lib/Term/UI.pm lib/Term/UI],
+ 'CPAN' => 1,
+ },
+
'Test' =>
{
'MAINTAINER' => 'sburke',
@@ -593,9 +690,17 @@
'threads' =>
{
- 'MAINTAINER' => 'abergman',
- 'FILES' => q[ext/threads],
- 'CPAN' => 0,
+ 'MAINTAINER' => 'jdhedden',
+ 'FILES' => q[ext/threads/hints ext/threads/t
+ ext/threads/threads.{pm,xs}
ext/threads/typemap],
+ 'CPAN' => 1,
+ },
+
+ 'threads::shared' =>
+ {
+ 'MAINTAINER' => 'jdhedden',
+ 'FILES' => q[ext/threads/shared],
+ 'CPAN' => 1,
},
'Tie::File' =>
@@ -605,6 +710,13 @@
'CPAN' => 1,
},
+ 'Tie::RefHash' =>
+ {
+ 'MAINTAINER' => 'nuffin',
+ 'FILES' => q[lib/Tie/RefHash.pm lib/Tie/RefHash],
+ 'CPAN' => 1,
+ },
+
'Time::HiRes' =>
{
'MAINTAINER' => 'jhi',
@@ -619,6 +731,13 @@
'CPAN' => 1,
},
+ 'Time::Piece' =>
+ {
+ 'MAINTAINER' => 'msergeant',
+ 'FILES' => q[ext/Time/Piece],
+ 'CPAN' => 1,
+ },
+
'Unicode::Collate' =>
{
'MAINTAINER' => 'sadahiro',
==== //depot/maint-5.8/perl/Porting/check83.pl#4 (text) ====
Index: perl/Porting/check83.pl
--- perl/Porting/check83.pl#3~26588~ 2006-01-02 14:07:04.000000000 -0800
+++ perl/Porting/check83.pl 2007-02-12 13:33:38.000000000 -0800
@@ -63,9 +63,9 @@
for my $dir (sort keys %dir) {
for my $edt (keys %{$dir{$dir}}) {
- my @files = @{$dir{$dir}->{$edt}};
+ my @files = @{$dir{$dir}{$edt}};
if (@files > 1) {
- print "directory $dir conflict $edt: @files\n";
+ print "conflict on filename $edt:\n", map " $_\n", @files;
}
}
}
==== //depot/maint-5.8/perl/Porting/checkAUTHORS.pl#8 (text) ====
Index: perl/Porting/checkAUTHORS.pl
--- perl/Porting/checkAUTHORS.pl#7~29890~ 2007-01-19 16:10:08.000000000
-0800
+++ perl/Porting/checkAUTHORS.pl 2007-02-12 13:33:38.000000000 -0800
@@ -5,16 +5,24 @@
my ($committer, $patch, $log);
use Getopt::Long;
-my ($rank, $ta, @authors, %authors, %untraced, %patchers, %committers);
+my ($rank, $percentage, $cumulative, $reverse, $ta, @authors, %authors,
+ %untraced, %patchers, %committers);
my $result = GetOptions ("rank" => \$rank, # rank authors
"thanks-applied" => \$ta, # ranks committers
- "acknowledged=s" => [EMAIL PROTECTED]); # authors
files
+ "acknowledged=s" => [EMAIL PROTECTED] , # authors
files
+ "percentage" => \$percentage, # show as %age
+ "cumulative" => \$cumulative,
+ "reverse" => \$reverse,
+ );
if (!$result or (($rank||0) + ($ta||0) + (@authors ? 1 : 0) != 1) or [EMAIL
PROTECTED]) {
die <<"EOS";
$0 --rank Changelogs # rank authors by patches
$0 --acknowledged <authors file> Changelogs # Display unacknowledged authors
$0 --thanks-applied Changelogs # ranks committers
+$0 --percentage ... # show rankings as percentages
+$0 --cumulative ... # show rankings cumulatively
+$0 --reverse ... # show rankings in reverse
Specify stdin as - if needs be. Remember that option names can be abbreviated.
EOS
}
@@ -107,6 +115,7 @@
"paul.green\100stratus.com"
=> "paul_greenvos\100vos.stratus.com",
"alian\100cpan.org" => "alian\100alianwebserver.com",
+ "david.dyck\100fluke.com" => "dcd\100tc.fluke.com",
# Maybe we should special case this to get real names out?
"perlbug\100perl.org" => "perlbug-followup\100perl.org",
);
@@ -115,7 +124,7 @@
$map{"autrijus\100egb.elixus.org"} = $map{"autrijus\100geb.elixus.org"}
= $map{"autrijus\100gmail.com"} = $map{"autrijus\100ossf.iis.sinica.edu.tw"}
- = "autrijus\100autrijus.org";
+ = $map{"autrijus\100autrijus.org"} = "cpan\100audreyt.org";
$map{"ilya\100math.ohio-state.edu"} = $map{"ilya\100math.berkeley.edu"}
= $map{"ilya\100math.berkeley.edu"} = "nospam-abuse\100ilyaz.org";
$map{"philip.newton\100gmx.net"} = $map{"philip.newton\100datenrevision.de"}
@@ -189,6 +198,7 @@
$map{"nik\100tiuk.ti.com"} = $map{"nick.ing-simmons\100elixent.com"} = "nick";
$map{"hv\100crypt.org"} = "hv";
$map{"gisle\100aas.no"} = "gisle";
+$map{"gsar\100cpan.org"} = "gsar";
if (@authors) {
my %raw;
@@ -269,15 +279,27 @@
sub display_ordered {
my $what = shift;
my @sorted;
+ my $total;
while (my ($name, $count) = each %$what) {
push @{$sorted[$count]}, $name;
+ $total += $count;
}
my $i = @sorted;
- return unless $i;
- while (--$i) {
+ return unless @sorted;
+ my $sum = 0;
+ foreach my $i ($reverse ? 0 .. $#sorted : reverse 0 .. $#sorted) {
next unless $sorted[$i];
- print wrap ("$i:\t", "\t", join (" ", sort @{$sorted[$i]}), "\n");
+ my $prefix;
+ $sum += $i * @{$sorted[$i]};
+ # Value to display is either this one, or the cumulative sum.
+ my $value = $cumulative ? $sum : $i;
+ if ($percentage) {
+ $prefix = sprintf "%6.2f:\t", 100 * $value / $total;
+ } else {
+ $prefix = "$value:\t";
+ }
+ print wrap ($prefix, "\t", join (" ", sort @{$sorted[$i]}), "\n");
}
}
==== //depot/maint-5.8/perl/Porting/checkcfgvar.pl#3 (text) ====
Index: perl/Porting/checkcfgvar.pl
--- perl/Porting/checkcfgvar.pl#2~30162~ 2007-02-07 10:45:59.000000000
-0800
+++ perl/Porting/checkcfgvar.pl 2007-02-12 13:33:38.000000000 -0800
@@ -30,6 +30,7 @@
"win32/config.gc",
"win32/config.vc",
"win32/config.vc64",
+ "win32/config.ce",
"wince/config.ce",
"configure.com",
);
@@ -86,8 +87,10 @@
read_file($cfg,
sub {
return if /^\#/ || /^\s*$/;
- return if $cfg eq 'configure.com' &&
- ! /^\$\s+WC "(\w+)='(.*)'"$/;
+ if ($cfg eq 'configure.com') {
+ s/(\s*!.*|\s*)$//; # remove trailing comments or
whitespace
+ return if ! /^\$\s+WC "(\w+)='(.*)'"$/;
+ }
# foo='bar'
# foo=bar
# $foo='bar' # VOS 5.8.x specialty
==== //depot/maint-5.8/perl/Porting/repository.pod#7 (text) ====
Index: perl/Porting/repository.pod
--- perl/Porting/repository.pod#6~25370~ 2005-09-10 06:47:01.000000000
-0700
+++ perl/Porting/repository.pod 2007-02-12 13:33:38.000000000 -0800
@@ -233,7 +233,9 @@
Then you either don't have a F<~/.ssh/identity> or F<~/.ssh/id_rsa>
file corresponding to your public key, or that file is not readable.
-Fix the problem and try again.
+Fix the problem and try again. Alternatively, some ssh implementations
+will fail to verify your RSA key if the key if readable by others.
+Just lower the permissions to make the key readable to yourself.
If you only had the public key file for one protocol installed at the
server end then make sure your client is using the corresponding
@@ -493,8 +495,8 @@
The mail alias E<lt>[EMAIL PROTECTED]<gt> can be used to reach
all current users of the repository.
-The repository keeper is currently Gurusamy Sarathy
-E<lt>[EMAIL PROTECTED]<gt>.
+The repository keeper is currently Philippe M. Chiasson
+E<lt>[EMAIL PROTECTED]<gt>.
=head1 AUTHORS
End of Patch.
