From 28b4310abe149efce6f128d5fad1713001b95de6 Mon Sep 17 00:00:00 2001
From: Joey Hess <joeyh@joeyh.name>
Date: Tue, 30 Apr 2019 12:22:13 -0400
Subject: [PATCH] typo

---
 Annex/Magic.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/Annex/Magic.hs b/Annex/Magic.hs
index ad860b9dcf..89bf02f352 100644
--- a/Annex/Magic.hs
+++ b/Annex/Magic.hs
@@ -56,4 +56,4 @@ getMagicMimeType :: Magic -> FilePath -> IO (Maybe MimeType)
 getMagicMimeType m f = fmap fst <$> getMagicMime m f
 
 getMagicMimeEncoding :: Magic -> FilePath -> IO (Maybe MimeEncoding)
-getMagicMimeEncoding m f = fmap fst <$> getMagicMime m f
+getMagicMimeEncoding m f = fmap snd <$> getMagicMime m f