--- echangelog (revision 548) +++ echangelog (working copy) @@ -431,7 +431,7 @@ # If there are any long lines, then wrap the input at $columns chars # (leaving 2 chars on left, one char on right, after adding indentation below). $input =~ s/^\s*(.*?)\s*\z/$1/s; # trim whitespace -$input = Text::Wrap::fill(' ', ' ', $input); +$input = Text::Wrap::wrap(' ', ' ', $input); # Prepend the user info to the input unless ($user = $ENV{'ECHANGELOG_USER'}) {