From 6caef06ee4e5e5660dc64aaa56b526074d5f3109 Mon Sep 17 00:00:00 2001 From: espie Date: Mon, 30 Jun 2003 11:53:37 +0000 Subject: [PATCH] do not record comments twice. --- infrastructure/install/make-plist | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/infrastructure/install/make-plist b/infrastructure/install/make-plist index df3791ce570..f4b7ec372f7 100755 --- a/infrastructure/install/make-plist +++ b/infrastructure/install/make-plist @@ -1,6 +1,6 @@ #!/usr/bin/perl -w -# $OpenBSD: make-plist,v 1.26 2003/06/30 11:49:41 espie Exp $ +# $OpenBSD: make-plist,v 1.27 2003/06/30 11:53:37 espie Exp $ # Copyright (c) 1999 Marc Espie # @@ -98,6 +98,7 @@ sub annotate } else { $annotated->add($_, [ $name, $newfh, 'comment'] ); } + next; } elsif (m/^\@dirrm\s+/) { $_=$'; $annotated_dir->add($_, [ $name, $newfh ]); @@ -227,7 +228,7 @@ sub handle_file if (defined $annotated->{$fname}) { for my $l (@{$annotated->{$fname}}) { if (@$l == 3) { - $l->[1]->print("\@comment$string"); + $l->[1]->print("\@comment $string"); } elsif (@$l == 2) { $l->[1]->print($string); } else {