tests/issue184.pl

   1 #!/usr/bin/env perl
   2
   3 # For issue184: recording files in directories that haven't explicity been added.
   4
   5 use lib 'lib/perl', '../tests/lib/perl';
   6 use Test::More 'no_plan';
   7 use Shell::Command;
   8 use Test::Darcs;
   9 use Shell::Command;
  10 use strict;
  11 use warnings;
  12
  13 init_tmp_repo();
  14
  15 mkdir 'new';
  16 mkdir 'new/dir';
  17 touch 'new/dir/t.t';
  18 darcs "add new/dir/t.t";
  19 my $out = darcs 'record -am "test" new/dir/t.t';
  20
  21 unlike($out, qr/don't want to record/, "avoid message which indicates there is nothing to record");