This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Refactor the Text::Wrap::wrap() logic in regen/regen_lib.pl
authorNicholas Clark <nick@ccl4.org>
Wed, 3 Jul 2013 13:51:16 +0000 (15:51 +0200)
committerNicholas Clark <nick@ccl4.org>
Sun, 7 Jul 2013 10:42:02 +0000 (12:42 +0200)
commit779d6b4a99e81aab11db9c66ab07286850b2d575
tree5f9be79ae5d0c853402bfa3add9878883c5b2a57
parentf4e064af84aaaa725dac7cde712c82576f87c83f
Refactor the Text::Wrap::wrap() logic in regen/regen_lib.pl

Provide a local subroutine wrap(). Pass columns as its first parameter and
set $Text::Wrap::columns, as all uses of Text::Wrap::wrap() were setting
this variable.
regen/regen_lib.pl