From 378f20cd88cae73b1bca6fb4fe65419bfb0cbb3c Mon Sep 17 00:00:00 2001
From: rillig <rillig>
Date: Sun, 4 Sep 2005 00:26:13 +0000
Subject: Made the code in get_logical_line easier.

---
 pkgtools/pkglint/files/pkglint.pl | 11 ++++++++---
 1 file changed, 8 insertions(+), 3 deletions(-)

(limited to 'pkgtools')

diff --git a/pkgtools/pkglint/files/pkglint.pl b/pkgtools/pkglint/files/pkglint.pl
index f7043dde2c1..1148ae0c47b 100644
--- a/pkgtools/pkglint/files/pkglint.pl
+++ b/pkgtools/pkglint/files/pkglint.pl
@@ -11,7 +11,7 @@
 # Freely redistributable.  Absolutely no warranty.
 #
 # From Id: portlint.pl,v 1.64 1998/02/28 02:34:05 itojun Exp
-# $NetBSD: pkglint.pl,v 1.275 2005/09/03 22:23:46 rillig Exp $
+# $NetBSD: pkglint.pl,v 1.276 2005/09/04 00:26:13 rillig Exp $
 #
 # This version contains lots of changes necessary for NetBSD packages
 # done by:
@@ -525,13 +525,18 @@ sub get_logical_line($$) {
 		if ($lines->[$lineno]->text =~ qr"^(\s*)(.*?)\s*(\\?)$") {
 			my ($indent, $text, $cont) = ($1, $2, $3);
 
-			$value .= $first ? "$indent$text" : $text;
+			if ($first) {
+				$value .= $indent;
+				$first = false;
+			}
+
+			$value .= $text;
+
 			if ($cont eq "\\") {
 				$value .= " ";
 			} else {
 				last;
 			}
-			$first = false;
 		}
 	}
 	${$ref_lineno} = $lineno + 1;
-- 
cgit v1.2.3