summaryrefslogtreecommitdiff
path: root/devel/portlint/src
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 /devel/portlint/src
parentgtk11-devel -> gtk12 (diff)
remove the first comment lines in a section properly.
Notes
Notes: svn path=/head/; revision=18069
Diffstat (limited to 'devel/portlint/src')
-rw-r--r--devel/portlint/src/portlint.pl4
1 files changed, 3 insertions, 1 deletions
diff --git a/devel/portlint/src/portlint.pl b/devel/portlint/src/portlint.pl
index c257e4235d9e..fdeede98aa58 100644
--- a/devel/portlint/src/portlint.pl
+++ b/devel/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//;
}
#