diff --git a/src/main/Main.hs b/src/main/Main.hs
index 88492206a9..fab9c1f8c6 100644
--- a/src/main/Main.hs
+++ b/src/main/Main.hs
@@ -770,7 +770,8 @@ execCmd ExecOpts {..} go@GlobalOpts{..} =
 
       getPkgOpts menv wc pkgs = do
           ids <- mapM (getPkgId menv wc) pkgs
-          return $ map ("-package-id " ++) ids
+          let pkgIdOpts x = ["--ghc-arg=-package-id", "--ghc-arg=" ++ x]
+          return $ concatMap pkgIdOpts ids
 
       getGhcCmd prefix menv pkgs args = do
           wc <- getWhichCompiler