diff --git a/Changes b/Changes index 6b4960f..dd60749 100644 --- a/Changes +++ b/Changes @@ -1,6 +1,7 @@ 1.69 * Exclude autobuild.sh. +* Change regex to also drop leading "an" from Summary. 1.68 2006-07-20 diff --git a/cpanspec b/cpanspec index 554f92a..b08b966 100755 --- a/cpanspec +++ b/cpanspec @@ -10,7 +10,7 @@ # but WITHOUT ANY WARRANTY; without even the implied warranty of # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. # -# $Id: cpanspec,v 1.34 2006/08/12 17:32:50 stevenpritchard Exp $ +# $Id: cpanspec,v 1.35 2006/08/29 00:40:02 stevenpritchard Exp $ our $NAME="cpanspec"; our $VERSION='1.69'; @@ -407,7 +407,7 @@ sub get_description(%) { if ($1 ne "SYNOPSIS") { $summary=$1; $summary=~s/[.\s]+$//; - $summary=~s/^A\s+//i; + $summary=~s/^An?\s+//i; $summary=ucfirst($summary); } }