From: Errietta Kostala <errietta@errietta.me>
Date: Thu, 9 Jan 2014 12:15:52 +0000 (+0000)
Subject: vcsh add test
X-Git-Url: https://git.madduck.net/code/vcsh.git/commitdiff_plain/dda9802233e27008cdd3206d4474be69d54a55b0?ds=inline

vcsh add test
---

diff --git a/t/300-add.t b/t/300-add.t
new file mode 100644
index 0000000..f16f6e1
--- /dev/null
+++ b/t/300-add.t
@@ -0,0 +1,32 @@
+#!/usr/bin/perl
+
+use strict;
+use warnings;
+
+use Cwd 'abs_path';
+
+use Shell::Command;
+use Test::Most;
+
+chdir 't/etc/' or die $!;
+
+$ENV{'HOME'} = abs_path ('.vcsh_home');
+
+eval {
+	touch 'a';
+};
+
+die $@ if $@;
+
+system ("./vcsh -d test1 add 'a'");
+
+my $output = `./vcsh status`;
+
+diag $output;
+
+ok $output eq "test1:
+A a
+", 'Adding a file worksl';
+
+done_testing;
+