=== 22status.t
==================================================================
--- 22status.t   (/SVK/trunk/t/22status.t)   (revision 2999)
+++ 22status.t   (/SVK/local/t/22status.t)   (revision 2999)
@@ -1,5 +1,5 @@
 #!/usr/bin/perl -w
-use Test::More tests => 12;
+use Test::More tests => 13;
 use strict;
 BEGIN { require 't/tree.pl' };
 our $output;
@@ -82,3 +82,18 @@
 	   [map __($_),
 	    '?   A/bar',
 	    '~   A/deep'], 'obstructure');
+
+$svk->revert ('-R', '.');
+$svk->mkdir ('-p', '-m', ' ', '//A/deeper/deeper');
+$svk->up;
+append_file ("A/deeper/deeper/baz", "baz");
+$svk->add ('-m', ' ', "A/deeper/deeper/baz");
+$svk->delete ('-m', 'delete', '//A/deeper');
+overwrite_file ("A/deeper/deeper/baz", "boo");
+$svk->up;
+warn `ls -la A/deeper/deeper`;
+chdir ('A');
+is_output ($svk, 'status', ['deeper/deeper'],
+	   [__('C   deeper/deeper')]);
+chdir ('..');
+