From 38019163a5008299048e7fedd2f5fe19b36789f9 Mon Sep 17 00:00:00 2001 From: freesource Date: Tue, 16 Oct 2001 19:33:25 +0000 Subject: [PATCH] Just clip and paste the changes lines, * is automatically appended whenever it finds a line which just has a newline. --- .../yard/make-debian-X11/make_debian-X11_pkg | 20 ++++++++++++++++--- gbootroot_pkg | 20 ++++++++++++++++--- 2 files changed, 34 insertions(+), 6 deletions(-) diff --git a/add-ons/yard/make-debian-X11/make_debian-X11_pkg b/add-ons/yard/make-debian-X11/make_debian-X11_pkg index 95c73ab..aa30d49 100755 --- a/add-ons/yard/make-debian-X11/make_debian-X11_pkg +++ b/add-ons/yard/make-debian-X11/make_debian-X11_pkg @@ -187,17 +187,31 @@ if (!$stop) { my $save_doc; $save_doc = " * "; $count = 0; + my $mc = 0; while () { my $doc_reply = $_; - if ($doc_reply) { + if ($doc_reply ne "\n") { print " "; - $doc_reply = " $doc_reply" if $count != 0; + $doc_reply = "$doc_reply" if $count != 0 && $mc == 1; + $doc_reply = " $doc_reply" if $count != 0 && $mc != 1; + $mc = 0; + } + else { + print " * "; + if ( $count != 0 && $doc_reply eq "\n" ) { + $mc = 0; + $doc_reply = "\n * "; + $mc++; + } + $doc_reply = "$doc_reply" if $count != 0 && $mc == 1; + $doc_reply = " $doc_reply" if $count != 0 && $mc != 1; } last if $doc_reply =~ /^\s*\.\s*$/; if ($doc_reply) { $save_doc = $save_doc . $doc_reply; } - $count++; + $count++; + } diff --git a/gbootroot_pkg b/gbootroot_pkg index 4e88aa9..ec26992 100755 --- a/gbootroot_pkg +++ b/gbootroot_pkg @@ -185,17 +185,31 @@ if (!$stop) { my $save_doc; $save_doc = " * "; $count = 0; + my $mc = 0; while () { my $doc_reply = $_; - if ($doc_reply) { + if ($doc_reply ne "\n") { print " "; - $doc_reply = " $doc_reply" if $count != 0; + $doc_reply = "$doc_reply" if $count != 0 && $mc == 1; + $doc_reply = " $doc_reply" if $count != 0 && $mc != 1; + $mc = 0; + } + else { + print " * "; + if ( $count != 0 && $doc_reply eq "\n" ) { + $mc = 0; + $doc_reply = "\n * "; + $mc++; + } + $doc_reply = "$doc_reply" if $count != 0 && $mc == 1; + $doc_reply = " $doc_reply" if $count != 0 && $mc != 1; } last if $doc_reply =~ /^\s*\.\s*$/; if ($doc_reply) { $save_doc = $save_doc . $doc_reply; } - $count++; + $count++; + } open(CHANGELOG,">$packaging_defaults/changelog")