addurl: Avoid crash if quvi is not installed, when git-annex was built with process-1.2

createProcess has been changed to throw an exception if the program is
not in path.

Utility/Quvi.hs

@@ -22,6 +22,7 @@ data QuviVersion
 	= Quvi04
 	| Quvi09
 	| NoQuvi
+	deriving (Show)
 
 data Page = Page
 	{ pageTitle :: String
@@ -61,7 +62,8 @@ parseEnum s = Page
 	m = M.fromList $ map (separate (== '=')) $ lines s
 
 probeVersion :: IO QuviVersion
-probeVersion = examine <$> processTranscript "quvi" ["--version"] Nothing
+probeVersion = catchDefaultIO NoQuvi $
+	examine <$> processTranscript "quviaaa" ["--version"] Nothing
   where
 	examine (s, True)
 		| "quvi v0.4" `isInfixOf` s = Quvi04

debian/changelog

@@ -18,6 +18,8 @@ git-annex (5.20150206) UNRELEASED; urgency=medium
     inside a repository.
   * assistant: Improve sanity check for control characters when pairing.
   * Improve race recovery code when committing to git-annex branch.
+  * addurl: Avoid crash if quvi is not installed, when git-annex was
+    built with process-1.2
 
  -- Joey Hess <id@joeyh.name>  Fri, 06 Feb 2015 13:57:08 -0400