summaryrefslogtreecommitdiff
path: root/ports-mgmt
diff options
context:
space:
mode:
authorJun-ichiro itojun Hagino <itojun@FreeBSD.org>1999-04-22 05:37:46 +0000
committerJun-ichiro itojun Hagino <itojun@FreeBSD.org>1999-04-22 05:37:46 +0000
commitbd430b955e3ba65af6a6985a5f28452ef35321d1 (patch)
treee379f37cab6035ae37db101e1be7ae8ac097f3b7 /ports-mgmt
parentgtk11-devel -> gtk12 (diff)
remove the first comment lines in a section properly.
Notes
Notes: svn path=/head/; revision=18069
Diffstat (limited to 'ports-mgmt')
-rw-r--r--ports-mgmt/portlint/src/portlint.pl4
1 files changed, 3 insertions, 1 deletions
diff --git a/ports-mgmt/portlint/src/portlint.pl b/ports-mgmt/portlint/src/portlint.pl
index c257e4235d9e..fdeede98aa58 100644
--- a/ports-mgmt/portlint/src/portlint.pl
+++ b/ports-mgmt/portlint/src/portlint.pl
@@ -13,7 +13,7 @@
# bsd.port.mk. There are significant differences in those so you'll have
# hard time upgrading this...
#
-# $Id: portlint.pl,v 1.4 1999/04/02 03:24:13 steve Exp $
+# $Id: portlint.pl,v 1.5 1999/04/04 21:35:10 steve Exp $
#
$err = $warn = 0;
@@ -654,9 +654,11 @@ EOF
# for the rest of the checks, comment lines are not important.
#
for ($i = 0; $i < scalar(@sections); $i++) {
+ $sections[$i] = "\n" . $sections[$i];
$sections[$i] =~ s/\n#[^\n]*//g;
$sections[$i] =~ s/\n\n+/\n/g;
$sections[$i] =~ s/\\\n/ /g;
+ $sections[$i] =~ s/^\n//;
}
#