projects
/
p5sagit/Oyster.git
/ blob
commit
grep
author
committer
pickaxe
?
search:
re
37ff0a816462ab0ba292fa0fe07d28c50ecd0e07
[p5sagit/Oyster.git]
/
lib
/
Oyster
/
Deploy
/
Git.pm
1
package Oyster::Deploy::Git;
2
3
use Moose;
4
use Git::Wrapper;
5
use Error::Simple;
6
7
use Data::Dumper;
8
9
sub create {
10
my $self = shift;
11
my $location = shift;
12
13
if( -f $location || -d $location ) {
14
Error::Simple->throw("$location already exists");
15
}
16
17
mkdir($location);
18
my $git = Git::Wrapper->new($location);
19
20
return 1;
21
}
22
23
24
1;