diff --git a/Semantique.cabal b/Semantique.cabal
--- a/Semantique.cabal
+++ b/Semantique.cabal
@@ -2,7 +2,7 @@
 -- documentation, see http://haskell.org/cabal/users-guide/
 
 name:                Semantique
-version:             0.2.1
+version:             0.2.2
 synopsis:            Command-line tool for maintaining the Semantique database.
 description:         Command-line tool for maintaining the Semantique database. See <http://semantik.tv/>
 license:             PublicDomain
diff --git a/src/Main.hs b/src/Main.hs
--- a/src/Main.hs
+++ b/src/Main.hs
@@ -146,7 +146,10 @@
   shows <- getTVShows
   unless (name `elem` shows) $ error $ "Unknown TV series: " ++ name
   epguides_url <- getEpguidesURL name
-  inp <- liftIO $ readProcess "wget" ["-q", "-O", "-", epguides_url] []
+  (inh, outh, errh, pid) <- liftIO $ runInteractiveProcess "wget" ["-q", "-O", "-", epguides_url] Nothing Nothing
+  liftIO $ hClose inh >> hClose errh
+  inp <- liftIO $ hGetContents outh
+  _ <- liftIO $ waitForProcess pid
   forM_ (parseEpguide inp) $ \(EpIdx season episode, (year, month, day), title) -> do
     let query = ["name" =: name, "episode" =: ["season" =: season, "episode" =: episode ]]
         airdate = ["year" =: year, "month" =: month, "day" =: day]
