In perl.git, the branch blead has been updated <http://perl5.git.perl.org/perl.git/commitdiff/7b5a08e99644a51f13ce3555c781b9664368a4af?hp=b641685a8cdb14c8728fd97660d09571268ec117>
- Log ----------------------------------------------------------------- commit 7b5a08e99644a51f13ce3555c781b9664368a4af Author: David Leadbeater <[email protected]> Date: Wed Mar 9 20:48:54 2011 +0000 perldelta for 9407f9c1 M pod/perldelta.pod commit d83adb226d6804e54be6f73a0073c3d4612661cf Author: Florian Ragwitz <[email protected]> Date: Wed Mar 9 21:53:56 2011 +0100 Have git-deltatool list the commit's author Some authors are more likely to include delta entries in their commits than others. Knowing who wrote a commit at a glance when reviewing it is helpful. M Porting/git-deltatool ----------------------------------------------------------------------- Summary of changes: Porting/git-deltatool | 2 ++ pod/perldelta.pod | 6 +++--- 2 files changed, 5 insertions(+), 3 deletions(-) diff --git a/Porting/git-deltatool b/Porting/git-deltatool index ce7c50a..ae364cc 100644 --- a/Porting/git-deltatool +++ b/Porting/git-deltatool @@ -327,6 +327,7 @@ sub show_header { my ($self, $log) = @_; my $header = $log->short_id; $header .= " " . $log->subject if length $log->subject; + $header .= sprintf(' (%s)', $log->author) if $log->author; say colored( $header, "yellow"); return; } @@ -769,6 +770,7 @@ BEGIN { our @ISA = qw/Git::Wrapper::Log/; } sub subject { shift->attr->{subject} } sub body { shift->attr->{body} } sub short_id { shift->attr->{short_id} } +sub author { shift->attr->{author} } sub from_log { my ($class, $log) = @_; diff --git a/pod/perldelta.pod b/pod/perldelta.pod index 5aa4cb4..9f9f814 100644 --- a/pod/perldelta.pod +++ b/pod/perldelta.pod @@ -428,13 +428,13 @@ XXX Important bug fixes in the core language are summarised here. Bug fixes in files in F<ext/> and F<lib/> are best summarised in L</Modules and Pragmata>. -[ List each fix as a =item entry ] - =over 4 =item * -XXX +A fix for a bug in C<length(undef)> in 5.13.4 introduced a regression that +meant C<print length undef> did not warn when warnings were enabled. It now +correctly warns (RT #85508). =back -- Perl5 Master Repository
