diff options
author | Sven Nierlein <Sven.Nierlein@consol.de> | 2014-07-30 13:17:26 (GMT) |
---|---|---|
committer | Sven Nierlein <sven@nierlein.de> | 2014-07-30 13:21:27 (GMT) |
commit | 15f8dab30ea1990460ff4b35ce1125786d8ef27b (patch) | |
tree | cc7651acee2106e9a9908812dfdc54701bda6b37 /tools | |
parent | de6f3dddf684180f6cfb7a4022477827007c7fd0 (diff) | |
download | monitoring-plugins-15f8dab30ea1990460ff4b35ce1125786d8ef27b.tar.gz |
tools/generate-change-log: workaround for broken Text::Wraprefs/pull/1280/head
workaround for broken Text::Wrap:
"This shouldn't happen at /usr/share/perl/5.18/Text/Wrap.pm line 84."
changing huge to overflow make generating changelogs work again at
the price of not having changelog strictly cut of at 80 columns
anymore. Words longer than 80 characters will now printed in one
line. This mainly affects old sf.net urls.
Signed-off-by: Sven Nierlein <Sven.Nierlein@consol.de>
Diffstat (limited to 'tools')
-rwxr-xr-x | tools/generate-change-log | 1 |
1 files changed, 1 insertions, 0 deletions
diff --git a/tools/generate-change-log b/tools/generate-change-log index e155f2c..ad19ce9 100755 --- a/tools/generate-change-log +++ b/tools/generate-change-log | |||
@@ -19,6 +19,7 @@ use Text::Wrap; | |||
19 | 19 | ||
20 | # The lines will have a length of no more than $columns - 1. | 20 | # The lines will have a length of no more than $columns - 1. |
21 | $Text::Wrap::columns = 81; | 21 | $Text::Wrap::columns = 81; |
22 | $Text::Wrap::huge = 'overflow'; | ||
22 | 23 | ||
23 | if (system('git rev-parse --git-dir >/dev/null 2>&1') != 0) { | 24 | if (system('git rev-parse --git-dir >/dev/null 2>&1') != 0) { |
24 | print "Not a Git repository, so I won't update the ChangeLog.\n"; | 25 | print "Not a Git repository, so I won't update the ChangeLog.\n"; |