From b4661570a919e097c2021083270a27bbe2600c20 Mon Sep 17 00:00:00 2001
From: Ryan Mulligan <ryan@ryantm.com>
Date: Mon, 2 Apr 2018 22:07:05 -0700
Subject: [PATCH] remove redundant throw

---
 src/Main.hs | 3 +--
 1 file changed, 1 insertion(+), 2 deletions(-)

diff --git a/src/Main.hs b/src/Main.hs
index a58a145..b795098 100644
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -62,8 +62,7 @@ loop options log ((package, oldVersion, newVersion) : moreUpdates) okToPrAt = do
       (\ e ->
          case e of
            ExitCode 0 -> return True
-           ExitCode _ -> return False
-           _ -> throw e)
+           ExitCode _ -> return False)
 
     okToPrAt <-
         if updated then do