Explorar o código

Previous install-infos(before 1.10) handled multiple dir file entries,
because they would copy the entire stanza unmodified. The newest version
does not do this, as it reformats the options, and thereby only takes the
first line. So, we now split all the lines from the stanza, and process
them all.

Adam Heath %!s(int64=24) %!d(string=hai) anos
pai
achega
3b1674a01b
Modificáronse 3 ficheiros con 14 adicións e 1 borrados
  1. 8 0
      ChangeLog
  2. 5 0
      debian/changelog
  3. 1 1
      scripts/install-info.pl

+ 8 - 0
ChangeLog

@@ -1,3 +1,11 @@
+Sat Aug 24 15:36:41 CDT 2002 Adam Heath <doogie@debian.org>
+
+  * scripts/install-info.pl: Previous install-infos(before 1.10) handled
+    multiple dir file entries, because they would copy the entire stanza
+    unmodified.  The newest version does not do this, as it reformats the
+    options, and thereby only takes the first line.  So, we now split all
+    the lines from the stanza, and process them all.
+
 Sat Aug 24 14:47:56 CDT 2002 Adam Heath <doogie@debian.org>
 Sat Aug 24 14:47:56 CDT 2002 Adam Heath <doogie@debian.org>
 
 
   * archtable: Add i386-gnu0.3.
   * archtable: Add i386-gnu0.3.

+ 5 - 0
debian/changelog

@@ -12,6 +12,11 @@ dpkg (1.10.5) unstable; urgency=low
   * Fixes for HURD:  Closes: #156545
   * Fixes for HURD:  Closes: #156545
     * Add i386-gnu0.3 to archtable.
     * Add i386-gnu0.3 to archtable.
     * Fix handling of static compiles, with regard to zlib.
     * Fix handling of static compiles, with regard to zlib.
+  * Previous install-infos(before 1.10) handled multiple dir file entries,
+    because they would copy the entire stanza unmodified.  The newest
+    version does not do this, as it reformats the options, and thereby
+    only takes the first line.  So, we now split all the lines from the
+    stanza, and process them all.
 
 
  -- Adam Heath <doogie@debian.org>  UNRELEASED
  -- Adam Heath <doogie@debian.org>  UNRELEASED
 
 

+ 1 - 1
scripts/install-info.pl

@@ -339,7 +339,7 @@ if (!$remove) {
         $mss= $#work+1;
         $mss= $#work+1;
     }
     }
 
 
-    @work= (@work[0..$mss-1], $infoentry, @work[$mss..$#work]);
+    @work= (@work[0..$mss-1], map("$_\n",split(/\n/,$infoentry)), @work[$mss..$#work]);
     
     
 } else {
 } else {