From: Gurusamy Sarathy <gsar@cpan.org>
Date: Sat, 17 Oct 1998 02:33:02 +0000 (+0000)
Subject: whitespace-proof grent.t
X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=fc8a54e618b09d10c49c22bda40477e5a967cf69;p=p5sagit%2Fp5-mst-13.2.git

whitespace-proof grent.t

p4raw-id: //depot/perl@1994
---

diff --git a/t/op/grent.t b/t/op/grent.t
index 70b4ce0..48698e8 100755
--- a/t/op/grent.t
+++ b/t/op/grent.t
@@ -30,6 +30,8 @@ while (<GR>) {
     if (@s == 4) {
 	my ($name_s,$passwd_s,$gid_s,$members_s) = @s;
 	$members_s =~ s/\s*,\s*/,/g;
+	$members_s =~ s/\s+$//;
+	$members_s =~ s/^\s+//;
 	@n = getgrgid($gid_s);
 	# 'nogroup' et al.
 	next unless @n;