Commits

Anonymous committed d86efce

Aded another asertion for the final token (before the footer).

  • Participants
  • Parent commits 078dd42

Comments (0)

Files changed (1)

File File-Dir-Dumper/t/dumper.t

 use strict;
 use warnings;
 
-use Test::More tests => 24;
+use Test::More tests => 26;
 
 use POSIX qw(mktime strftime);
 use File::Path;
     is ($token->{type}, "updir", "Token is updir");
 
     # TEST
-    is ($token->{depth}, 1, "Token depth is 2");
+    is ($token->{depth}, 1, "Token depth is 1");
+
+    $token = $scanner->fetch();
+
+    # TEST
+    is ($token->{type}, "updir", "Token is updir");
+
+    # TEST
+    is ($token->{depth}, 0, "Token depth is 0");
 
     rmtree($t->get_path($test_dir))
 }