summaryrefslogtreecommitdiff
path: root/t
diff options
context:
space:
mode:
authorRafael Garcia-Suarez <rgarciasuarez@gmail.com>2007-08-31 13:28:46 +0000
committerRafael Garcia-Suarez <rgarciasuarez@gmail.com>2007-08-31 13:28:46 +0000
commit7b7dcf5ac94bed0f662436876fc7ea3297cbf179 (patch)
tree3970f18fb392c9ede8bfa7483702f05d06110bc0 /t
parent42ad0bbf7d53e4a30786360017b759e2eb194082 (diff)
downloadperl-7b7dcf5ac94bed0f662436876fc7ea3297cbf179.tar.gz
Following Jan's advice, remove Cygwin::is_textmount(),
which duplicates the functionality of is_binmount(). p4raw-id: //depot/perl@31773
Diffstat (limited to 't')
-rw-r--r--t/lib/cygwin.t3
1 files changed, 1 insertions, 2 deletions
diff --git a/t/lib/cygwin.t b/t/lib/cygwin.t
index 00cd05fec0..d92031db3e 100644
--- a/t/lib/cygwin.t
+++ b/t/lib/cygwin.t
@@ -9,7 +9,7 @@ BEGIN {
}
}
-use Test::More tests => 15;
+use Test::More tests => 14;
is(Cygwin::winpid_to_pid(Cygwin::pid_to_winpid($$)), $$,
"perl pid translates to itself");
@@ -46,7 +46,6 @@ my $mount = join '', `/usr/bin/mount`;
$mount =~ m|on /usr/bin type .+ \((\w+mode)\)|m;
my $binmode = $1 eq 'binmode';
is(Cygwin::is_binmount("/"), $binmode ? 1 : '', "check / for binmount");
-is(Cygwin::is_textmount("/"), $binmode ? '' : 1, "check / for textmount");
my $rootmnt = Cygwin::mount_flags("/");
ok($binmode ? ($rootmnt =~ /,binmode/) : ($rootmnt =~ /,textmode/), "check / mount_flags");