Changeset 1764 in ProjectBuilder for devel

Timestamp:

Jun 1, 2013, 9:27:13 PM (12 years ago)

Author:

Bruno Cornec

Message:

• Fix deb changelog generation to avoid long lines (using Text/Wrap to wrap at 80 chars)

File:

• devel/pb/lib/ProjectBuilder/Changelog.pm (modified) (2 diffs)

devel/pb/lib/ProjectBuilder/Changelog.pm

@@ -17 +17 @@
 use POSIX qw(strftime);
 use lib qw (lib);
+use Text::Wrap;
 use ProjectBuilder::Version;
 use ProjectBuilder::Base;
@@ -194 +195 @@
         if ($dtype eq "deb") {
             $tmp =~ s/^- //;
-            print $OUTPUT "  * $tmp";
+            $Text::Wrap::columns = 80;
+            print $OUTPUT "  * ".wrap('','    ',$tmp);
         } elsif ($dtype eq "rpm") {
             print $OUTPUT "$tmp";