Better deploy script that does not actually fail

speechanddebate · Nov 14, 2023 · cd4a12a · cd4a12a
1 parent 63a2e3b
commit cd4a12a
Showing 1 changed file with 2 additions and 4 deletions.
diff --git a/doc/utility/deploy b/doc/utility/deploy
@@ -1,9 +1,7 @@
 #!/usr/bin/perl -w
 
-use DateTime;
-
 my @prod_servers = ("tabroom-www1", "tabroom-www2");
-my $now = DateTime->now;
+my $now = `/bin/date`;
 
 foreach my $server (@prod_servers) {
 	print "\n\nDEPLOYING MASON TO ".$server." at $now \n\n";
@@ -14,7 +12,7 @@ foreach my $server (@prod_servers) {
 	print "\n\n";
 
 	print "\n\nDEPLOYING INDEXCARDS TO ".$server." at $now \n\n";
-	my $result = `ssh tabroom\@$server \"cd /www/indexcards; git pull" `;
+	$result = `ssh tabroom\@$server \"cd /www/indexcards; git pull" `;
 	chomp $result;
 
 	if ($result eq "Already up to date.") {