From bb5dd17ccbc8f94ed68de91e54e57d4b0c201744 Mon Sep 17 00:00:00 2001
From: Nicholas Clark <nick@ccl4.org>
Date: Thu, 20 Jan 2011 17:12:50 +0000
Subject: [PATCH] In buildtoc, remove a superfluous length in output()

If \S matches, then length must be non-zero, and therefore true.
This dates to commit 8ebc5c0145d2e355, when output() was added.
---
 pod/buildtoc | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/pod/buildtoc b/pod/buildtoc
index 76b41b8..748f65f 100644
--- a/pod/buildtoc
+++ b/pod/buildtoc
@@ -520,7 +520,7 @@ sub output ($) {
 		$NEWLINE++;
 	    }
 	}
-	elsif (/\S/ && length) {
+	elsif (/\S/) {
 	    $LINE .= $_;
 	    $NEWLINE = 0;
 	}
-- 
2.7.4