diff --git a/Changes b/Changes index 3d155da..0f4c6a5 100644 --- a/Changes +++ b/Changes @@ -1,3 +1,7 @@ +1.66 + +* Fix $summary modification. + 1.65 2006-04-26 * Exclude inc (suggested by Ian Burrell). diff --git a/cpanspec b/cpanspec index 35e8613..2dca0a5 100755 --- a/cpanspec +++ b/cpanspec @@ -10,10 +10,10 @@ # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. # -# $Id: cpanspec,v 1.22 2006/04/26 21:08:45 stevenpritchard Exp $ +# $Id: cpanspec,v 1.23 2006/05/04 16:18:17 stevenpritchard Exp $ our $NAME="cpanspec"; -our $VERSION='1.65'; +our $VERSION='1.66'; =head1 NAME @@ -393,7 +393,7 @@ sub get_description(%) { if ($rendered=~/NAME\s*$args{module}\s[-\s]*(\S[^\n]*)/s) { if ($1 ne "SYNOPSIS") { $summary=$1; - $summary=~s/[.\s]+//; + $summary=~s/[.\s]+$//; $summary=~s/^A\s+//i; $summary=ucfirst($summary); }