X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=Debbugs%2FUser.pm;h=3b90ec4147c3b095729b84733ea19daa732d6fbd;hb=45f1672bfee50ef8c2ec5938979ee409c5c3db87;hp=c091031ec1dbebd24e589b276d45cdcfe3338dc3;hpb=942e7c897fd7f7cb0534f67a61dad0770fcb8730;p=debbugs.git

diff --git a/Debbugs/User.pm b/Debbugs/User.pm
index c091031..3b90ec4 100644
--- a/Debbugs/User.pm
+++ b/Debbugs/User.pm
@@ -400,7 +400,7 @@ Wraps a line to a specific length by splitting at commas
 
 sub _wrap_to_length {
     my ($content,$line_length) = @_;
-    my $current_line_length;
+    my $current_line_length = 0;
     my $result = "";
     while ($content =~ m/^([^,]*,\s*)(.*)$/ || $content =~ m/^([^,]+)()$/) {
         my $current_word = $1;