From 90ab151745736b2e3cd6ce0a6588df02f8b1b15c Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Fri, 22 Nov 2013 14:12:44 -0400 Subject: Avoid misbehavior when addurl is used with quvi 0.9. In 0.9, -v shows version, rather than controlling verbosity. Still need to port to 0.9, this just avoids massively confusing addurl when quvi prints its version and exits successfully, on urls that it cannot be used with. --- Utility/Quvi.hs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'Utility') diff --git a/Utility/Quvi.hs b/Utility/Quvi.hs index 5df1a4da7..cce02d646 100644 --- a/Utility/Quvi.hs +++ b/Utility/Quvi.hs @@ -68,10 +68,10 @@ check ps url = maybe False (not . null . pageLinks) <$> query ps url {- Checks if an url is supported by quvi, without hitting it, or outputting - anything. Also returns False if quvi is not installed. -} supported :: URLString -> IO Bool -supported url = boolSystem "quvi" [Params "-v mute --support", Param url] +supported url = boolSystem "quvi" [Params "--verbosity mute --support", Param url] quiet :: CommandParam -quiet = Params "-v quiet" +quiet = Params "--verbosity quiet" noredir :: CommandParam noredir = Params "-e -resolve" -- cgit v1.2.3