From 67d25c0ce4e585247f0b03562bf097c5e43d6bed Mon Sep 17 00:00:00 2001
From: Tianon Gravi <admwiggin@gmail.com>
Date: Mon, 1 Jun 2015 12:08:05 -0700
Subject: [PATCH] Add "--batchmode" flag for automated docs updates (still
 displays all diffs)

---
 push.pl | 18 +++++++++++++-----
 1 file changed, 13 insertions(+), 5 deletions(-)

diff --git a/push.pl b/push.pl
index 4bdf3cbb..26a6f686 100755
--- a/push.pl
+++ b/push.pl
@@ -15,9 +15,11 @@ use Term::ReadLine;
 
 my $username;
 my $password;
+my $batchmode;
 GetOptions(
 	'u|username=s' => \$username,
 	'p|password=s' => \$password,
+	'batchmode!' => \$batchmode,
 ) or die 'bad args';
 
 die 'no repos specified' unless @ARGV;
@@ -106,11 +108,17 @@ sub prompt_for_edit {
 	
 	system(qw(git --no-pager diff --no-index), $filename, $proposedFile);
 	
-	my $reply = $term->get_reply(
-		prompt => 'Apply changes?',
-		choices => [ qw( yes vimdiff no quit ) ],
-		default => 'yes',
-	);
+	my $reply;
+	if ($batchmode) {
+		$reply = 'yes';
+	}
+	else {
+		$reply = $term->get_reply(
+			prompt => 'Apply changes?',
+			choices => [ qw( yes vimdiff no quit ) ],
+			default => 'yes',
+		);
+	}
 	
 	if ($reply eq 'quit') {
 		say 'quitting, as requested';