1.1 --- a/scripts/ChangeLog	Thu Jan 29 09:40:23 2009 +0100
     1.2 +++ b/scripts/ChangeLog	Sat Feb 14 21:15:23 2009 +0100
     1.3 @@ -1,3 +1,7 @@
     1.4 +2009-02-14  Tatsuro MATSUOKA <tmacchant@yahoo.co.jp>
     1.5 +
     1.6 +	* miscellaneous/fileparts.m: Fix again.
     1.7 +
     1.8  2009-01-29  Jaroslav Hajek  <highegg@gmail.com>
     1.9  
    1.10  	* miscellaneous/fileparts.m: Fix test for Windows.

     2.1 --- a/scripts/miscellaneous/fileparts.m	Thu Jan 29 09:40:23 2009 +0100
     2.2 +++ b/scripts/miscellaneous/fileparts.m	Sat Feb 14 21:15:23 2009 +0100
     2.3 @@ -82,15 +82,15 @@
     2.4  
     2.5  %!test
     2.6  %! [d, n, e] = fileparts (["d1" filesep "d2" filesep "file.ext"]);
     2.7 -%! assert (strcmp (d, "d1/d2") && strcmp (n, "file") && strcmp (e, ".ext"));
     2.8 +%! assert (strcmp (d, ["d1" filesep "d2"]) && strcmp (n, "file") && strcmp (e, ".ext"));
     2.9  
    2.10  %!test
    2.11  %! [d, n, e] = fileparts ([filesep "d1" filesep "d2" filesep "file.ext"]);
    2.12 -%! assert (strcmp (d, "/d1/d2") && strcmp (n, "file") && strcmp (e, ".ext"));
    2.13 +%! assert (strcmp (d, [filesep "d1" filesep "d2"]) && strcmp (n, "file") && strcmp (e, ".ext"));
    2.14  
    2.15  %!test
    2.16  %! [d, n, e] = fileparts ([filesep ".ext"]);
    2.17 -%! assert (strcmp (d, "/") && strcmp (n, char (zeros (1, 0))) && strcmp (e, ".ext"));
    2.18 +%! assert (strcmp (d, filesep) && strcmp (n, char (zeros (1, 0))) && strcmp (e, ".ext"));
    2.19  
    2.20  %!test
    2.21  %! [d, n, e] = fileparts (".ext");