From b075319adfe2b12fe81c5a4f8c5257e99e649a54 Mon Sep 17 00:00:00 2001
From: defanor <defanor@uberspace.net>
Date: Wed, 6 Dec 2017 08:32:37 +0300
Subject: Run curl with --compressed by default

Otherwise it fails on pages that are only available with compression.
---
 Pancake/Configuration.hs | 2 +-
 README                   | 2 +-
 2 files changed, 2 insertions(+), 2 deletions(-)

diff --git a/Pancake/Configuration.hs b/Pancake/Configuration.hs
index 477dee1..7c537bc 100644
--- a/Pancake/Configuration.hs
+++ b/Pancake/Configuration.hs
@@ -83,7 +83,7 @@ instance Default Config where
                 ++ " && echo -e '\n-pancake-'")
       , ("gopher", "curl \"${URI}\""
           ++ " -w \"\n-pancake-\n\"")]
-    , defaultCommand = "curl -4 -L \"${URI}\""
+    , defaultCommand = "curl --compressed -4 -L \"${URI}\""
       ++ " -w \"\n-pancake-\nuri: %{url_effective}\ntype: %{content_type}\n\""
     , externalViewers = M.fromList $
       map (flip (,) "emacsclient -n \"${FILE}\"")
diff --git a/README b/README
index 577c642..5a1ea8f 100644
--- a/README
+++ b/README
@@ -91,7 +91,7 @@ directory, and would look approximately like this::
   commands:
     gopher: torify curl "${URI}"
     ssh: scp "${URI_REGNAME}:${URI_PATH}" /dev/stdout
-  defaultCommand: ! 'curl -4 -L "${URI}" -w "
+  defaultCommand: ! 'curl --compressed -4 -L "${URI}" -w "
 
     -pancake-
 
-- 
cgit v1.2.3