# HG changeset patch
# User John W. Eaton <jwe@octave.org>
# Date 1632779618 14400
# Node ID 8398d31dab76c95817c1160a8ec961f8f948f858
# Parent  6ed1f02621e22d4a6be0fea4f2e90ccc463a4eff
* system.tst: New mkdir tests.

diff -r 6ed1f02621e2 -r 8398d31dab76 test/system.tst
--- a/test/system.tst	Mon Sep 27 17:45:48 2021 -0400
+++ b/test/system.tst	Mon Sep 27 17:53:38 2021 -0400
@@ -103,6 +103,7 @@
 
 %!test <61166>
 %! crr = confirm_recursive_rmdir ();
+%! orig_dir = pwd ();
 %! unwind_protect
 %!   confirm_recursive_rmdir (0);
 %!   tmp_dir = tempname ();
@@ -133,9 +134,17 @@
 %!   assert (isfolder (d7));
 %!   assert (isfolder (d8));
 %!   assert (isfolder (d9));
+%!   chdir (tmp_dir);
+%!   mkdir ("d10", "foo");
+%!   mkdir ("d11", "foo/bar");
+%!   mkdir ("d12", "foo/bar.baz");
+%!   assert (isfolder (fullfile ("d10", "foo")));
+%!   assert (isfolder (fullfile ("d11", "foo/bar")));
+%!   assert (isfolder (fullfile ("d12", "foo/bar.baz")));
 %! unwind_protect_cleanup
 %!   rmdir (tmp_dir, "s");
 %!   confirm_recursive_rmdir (crr);
+%!   chdir (orig_dir);
 %! end_unwind_protect
 
 %!test