From 8e6f67392998d09073aa04932a4c838e264a56ce Mon Sep 17 00:00:00 2001
From: Stefan Metzmacher <metze@samba.org>
Date: Sat, 28 Aug 2010 09:42:10 +0200
Subject: selftest/Subunit.pm: fix perl warnings

Argument "\n" isn't numeric in numeric ne (!=) at selftest/Subunit.pm line 136

metze
---
 selftest/Subunit.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'selftest/Subunit.pm')

diff --git a/selftest/Subunit.pm b/selftest/Subunit.pm
index d5c8277fca..7a352bd71b 100644
--- a/selftest/Subunit.pm
+++ b/selftest/Subunit.pm
@@ -133,7 +133,7 @@ sub end_test($$;$)
 	if ($reason) {
 		print "$result: $name [\n";
 		print $reason;
-		if (substr($reason, -1, 1) != "\n") { print "\n"; }
+		if (substr($reason, -1, 1) ne "\n") { print "\n"; }
 		print "]\n";
 	} else {
 		print "$result: $name\n";
-- 
cgit