[ufo] fixed logic bug

masak · Jun 2, 2010 · 1011bf0 · 1011bf0
1 parent 356ddd8
commit 1011bf0
Showing 1 changed file with 2 additions and 2 deletions.
diff --git a/ufo b/ufo
@@ -69,11 +69,11 @@ my @sources = map { &module-name-to-path($_) }, @order;
 my $sources = 'SOURCES=';
 my $line-length = 0;
 for @sources -> $source {
-    $line-length += $source.chars;
+    $line-length += $source.chars + 1;
     if $line-length > 65 {
                        # SOURCES=
         $sources ~= "\\\n        ";
-        $line-length = 0;
+        $line-length = $source.chars + 1;
     }
     $sources ~= $source ~ ' ';
 }