From: Adam Heath <doogie@debian.org>
Date: Thu, 20 Jun 2002 05:56:57 +0000 (+0000)
Subject: Fix broken merge from 1.9 branch.
X-Git-Url: https://err.no/cgi-bin/gitweb.cgi?a=commitdiff_plain;h=06cbb69e837e25674f59db61df5438151db44867;p=dpkg

Fix broken merge from 1.9 branch.
---

diff --git a/ChangeLog b/ChangeLog
index 8cd6bdb2..09147ca7 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,7 @@
+Thu Jun 20 00:54:54 CDT 2002 Adam Heath <doogie@debian.org>
+
+  * scripts/install-info.pl: Fix broken merge from 1.9 branch.
+
 Sat Jun  1 23:22:19 CDT 2002 Adam Heath <doogie@debian.org>
 
   * dpkg-deb/main.c, main/main.c, main/query.c, dselect/main.cc,
diff --git a/scripts/install-info.pl b/scripts/install-info.pl
index f4ad0ceb..d5b5a405 100755
--- a/scripts/install-info.pl
+++ b/scripts/install-info.pl
@@ -219,11 +219,22 @@ $name: unable to determine description for \`dir' entry - giving up
         }
 
         $align--; $calign--;
+        $lprefix= length($cprefix);
+        if ($lprefix < $align) {
+            $cprefix .= ' ' x ($align - $lprefix);
+            $lprefix= $align;
+        }
+        $prefix= "\n". (' 'x $calign);
         $cwidth= $maxwidth+1;
 
         for $_ (split(/\s+/,$description)) {
             $l= length($_);
             $cwidth++; $cwidth += $l;
+            if ($cwidth > $maxwidth) {
+                $infoentry .= $cprefix;
+                $cwidth= $lprefix+1+$l;
+                $cprefix= $prefix; $lprefix= $calign;
+            }
             $infoentry.= ' '; $infoentry .= $_;
         }