# HG changeset patch
# User Tatsuro Matsuoka <tmacchant@yahoo.co.jp>
# Date 1238048533 -3600
# Node ID 0eaaf7351ef55d613b76bb3371b7d2ebc9671e71
# Parent  c2bfc6440e181d7a92a921f0593b1410e6d73811
fix platform test in test_string.m

diff --git a/test/ChangeLog b/test/ChangeLog
--- a/test/ChangeLog
+++ b/test/ChangeLog
@@ -1,3 +1,7 @@
+2009-03-26  Tatsuro Matsuoka <tmacchant@yahoo.co.jp>
+
+	* test_string.m: Use more accurate platform test.
+
 2008-09-24  Jaroslav Hajek  <highegg@gmail.com>
 
 	Version 3.0.3 released.
diff --git a/test/test_string.m b/test/test_string.m
--- a/test/test_string.m
+++ b/test/test_string.m
@@ -532,7 +532,7 @@
 %! result = zeros (1, 128);
 %! 
 %! result (33:127) = 1;
-%! if (ispc () && ! isunix ())
+%! if (size(findstr (octave_config_info('canonical_host_type'), 'msvc'),2))
 %!   result(10) = 1;
 %! endif
 %!