From 6c5e0ff683dd9e66f68c96b8775df2ac65281d3b Mon Sep 17 00:00:00 2001 From: Joey Hess Date: Mon, 17 Oct 2016 16:02:05 -0400 Subject: importfeed: Drop URL parameters from file extension. Thanks, James MacMahon. --- CHANGELOG | 2 ++ Command/ImportFeed.hs | 2 +- doc/todo/PATCH__58___drop_url_parameters_from_extension.hs | 2 ++ 3 files changed, 5 insertions(+), 1 deletion(-) diff --git a/CHANGELOG b/CHANGELOG index b34cfce0d..816c4d70c 100644 --- a/CHANGELOG +++ b/CHANGELOG @@ -5,6 +5,8 @@ git-annex (6.20161013) UNRELEASED; urgency=medium * upgrade: Handle upgrade to v6 when the repository already contains v6 unlocked files whose content is already present. * Improve style of offline html build of website. + * importfeed: Drop URL parameters from file extension. + Thanks, James MacMahon. -- Joey Hess Mon, 17 Oct 2016 12:46:54 -0400 diff --git a/Command/ImportFeed.hs b/Command/ImportFeed.hs index 498d5041c..8f3a60726 100644 --- a/Command/ImportFeed.hs +++ b/Command/ImportFeed.hs @@ -161,7 +161,7 @@ downloadFeed url performDownload :: ImportFeedOptions -> Cache -> ToDownload -> Annex Bool performDownload opts cache todownload = case location todownload of Enclosure url -> checkknown url $ - rundownload url (takeExtension url) $ \f -> do + rundownload url (takeWhile (/= '?') $ takeExtension url) $ \f -> do r <- Remote.claimingUrl url if Remote.uuid r == webUUID || rawOption opts then do diff --git a/doc/todo/PATCH__58___drop_url_parameters_from_extension.hs b/doc/todo/PATCH__58___drop_url_parameters_from_extension.hs index 4b4ec330b..580ed96ba 100644 --- a/doc/todo/PATCH__58___drop_url_parameters_from_extension.hs +++ b/doc/todo/PATCH__58___drop_url_parameters_from_extension.hs @@ -52,3 +52,5 @@ index 498d504..210aca0 100644 if Remote.uuid r == webUUID || rawOption opts then do +> Hmm, didn't cleanly apply for some reason. And, `takeWhile (/= '?')` is a +> simpler way to do that. Thank you for the bug report and patch; [[done]] --[[Joey]] -- cgit v1.2.3