From: Marco Fontani Date: Sun, 21 Nov 2010 23:24:36 +0000 (+0000) Subject: Too much Whitespace X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=c0ce95cc18f039ddbd57762ffe7e0581f9ecfcad;p=p5sagit%2FOyster.git Too much Whitespace --- diff --git a/lib/Oyster/Deploy/Git.pm b/lib/Oyster/Deploy/Git.pm index 12e4ba0..c70eb8e 100644 --- a/lib/Oyster/Deploy/Git.pm +++ b/lib/Oyster/Deploy/Git.pm @@ -11,17 +11,17 @@ use File::ShareDir ':ALL'; sub create { my $self = shift; my $location = shift; - + if( -f $location || -d $location ) { Error::Simple->throw("$location already exists"); } - + mkdir($location); my $git = Git::Wrapper->new($location); $git->init(); - + my ($postreceive, $postupdate); - + eval { $postreceive = dist_file( 'Oyster', './deploy/git/post-receive'); $postupdate = dist_file( 'Oyster', './deploy/git/post-update'); @@ -35,12 +35,12 @@ sub create { copy($postreceive, ($git->dir . '/.git/hooks/')) or Error::Simple->throw('Creating post commit hooks failed.'); - + copy($postupdate, ($git->dir . '/.git/hooks/')) or Error::Simple->throw('Creating post commit hooks failed.'); - + chmod(0x755, ($git->dir . '.git/hooks/post-receive', $git->dir . '.git/hooks/post-update')); - + return 1; }