# HG changeset patch
# User Jaroslav Hajek <highegg@gmail.com>
# Date 1234642523 -3600
# Node ID 205f10f5cbe85e4a97abd0f11982295c5d6c5f3f
# Parent  8d1427a14f45e9779660279de009755b2b62becb
more fixes to fileparts.m tests

diff -r 8d1427a14f45 -r 205f10f5cbe8 scripts/ChangeLog
--- a/scripts/ChangeLog	Thu Jan 29 09:40:23 2009 +0100
+++ b/scripts/ChangeLog	Sat Feb 14 21:15:23 2009 +0100
@@ -1,3 +1,7 @@
+2009-02-14  Tatsuro MATSUOKA <tmacchant@yahoo.co.jp>
+
+	* miscellaneous/fileparts.m: Fix again.
+
 2009-01-29  Jaroslav Hajek  <highegg@gmail.com>
 
 	* miscellaneous/fileparts.m: Fix test for Windows.
diff -r 8d1427a14f45 -r 205f10f5cbe8 scripts/miscellaneous/fileparts.m
--- a/scripts/miscellaneous/fileparts.m	Thu Jan 29 09:40:23 2009 +0100
+++ b/scripts/miscellaneous/fileparts.m	Sat Feb 14 21:15:23 2009 +0100
@@ -82,15 +82,15 @@
 
 %!test
 %! [d, n, e] = fileparts (["d1" filesep "d2" filesep "file.ext"]);
-%! assert (strcmp (d, "d1/d2") && strcmp (n, "file") && strcmp (e, ".ext"));
+%! assert (strcmp (d, ["d1" filesep "d2"]) && strcmp (n, "file") && strcmp (e, ".ext"));
 
 %!test
 %! [d, n, e] = fileparts ([filesep "d1" filesep "d2" filesep "file.ext"]);
-%! assert (strcmp (d, "/d1/d2") && strcmp (n, "file") && strcmp (e, ".ext"));
+%! assert (strcmp (d, [filesep "d1" filesep "d2"]) && strcmp (n, "file") && strcmp (e, ".ext"));
 
 %!test
 %! [d, n, e] = fileparts ([filesep ".ext"]);
-%! assert (strcmp (d, "/") && strcmp (n, char (zeros (1, 0))) && strcmp (e, ".ext"));
+%! assert (strcmp (d, filesep) && strcmp (n, char (zeros (1, 0))) && strcmp (e, ".ext"));
 
 %!test
 %! [d, n, e] = fileparts (".ext");