From 7deb2f85e82c43f6927f8e89f8f81fb10ddbecef Mon Sep 17 00:00:00 2001
From: Jack Nagel <jacknagel@gmail.com>
Date: Sat, 28 Sep 2013 17:00:42 -0500
Subject: [PATCH] MercurialDownloadStrategy: handle corrupt checkouts

---
 Library/Homebrew/download_strategy.rb | 22 +++++++++++++++++-----
 1 file changed, 17 insertions(+), 5 deletions(-)

diff --git a/Library/Homebrew/download_strategy.rb b/Library/Homebrew/download_strategy.rb
index 124c15fb07..29edbfb3bd 100644
--- a/Library/Homebrew/download_strategy.rb
+++ b/Library/Homebrew/download_strategy.rb
@@ -631,18 +631,30 @@ class MercurialDownloadStrategy < AbstractDownloadStrategy
   def fetch
     ohai "Cloning #{@url}"
 
-    unless @clone.exist?
-      url=@url.sub(%r[^hg://], '')
-      safe_system hgpath, 'clone', url, @clone
-    else
+    if @clone.exist? && repo_valid?
       puts "Updating #{@clone}"
-      Dir.chdir(@clone) do
+      @clone.cd do
         safe_system hgpath, 'pull'
         safe_system hgpath, 'update'
       end
+    elsif @clone.exist?
+      puts "Removing invalid hg repo from cache"
+      @clone.rmtree
+      clone_repo
+    else
+      clone_repo
     end
   end
 
+  def repo_valid?
+    @clone.join(".hg").directory?
+  end
+
+  def clone_repo
+    url = @url.sub(%r[^hg://], '')
+    safe_system hgpath, 'clone', url, @clone
+  end
+
   def stage
     dst=Dir.getwd
     Dir.chdir @clone do