diff options
Diffstat (limited to 'Command/ImportFeed.hs')
-rw-r--r-- | Command/ImportFeed.hs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/Command/ImportFeed.hs b/Command/ImportFeed.hs index 005d42d20..50f4278b6 100644 --- a/Command/ImportFeed.hs +++ b/Command/ImportFeed.hs @@ -108,7 +108,7 @@ findDownloads u = go =<< downloadFeed u Nothing -> mkquvi f i #ifdef WITH_QUVI mkquvi f i = case getItemLink i of - Just link -> ifM (liftIO $ Quvi.supported link) + Just link -> ifM (quviSupported link) ( return $ Just $ ToDownload f u i $ QuviLink link , return Nothing ) |