When Gconvert is a macro around sprintf with a .* format we need

[perl5.git] / lib / FindBin.t

diff --git a/lib/FindBin.t b/lib/FindBin.t
index ebca15b..80ac811 100755 (executable)
--- a/lib/FindBin.t
+++ b/lib/FindBin.t
@@ -11,5 +11,9 @@ use FindBin qw($Bin);
 
 print "# $Bin\n";
 
-print "not " unless $Bin =~ m,[/.]lib\]?$,;
+if ($^O eq 'MacOS') {
+    print "not " unless $Bin =~ m,:lib:$,;
+} else {
+    print "not " unless $Bin =~ m,[/.]lib\]?$,;
+}
 print "ok 1\n";