From 885dd2a01ed3613801d3553e0b14852d5936d035 Mon Sep 17 00:00:00 2001
From: Bryan Richter <bryan@haskell.foundation>
Date: Tue, 5 Nov 2024 17:18:55 +0200
Subject: [PATCH] Drop unused subdirectory

---
 src/Stackage/Database/Cron.hs | 3 ---
 1 file changed, 3 deletions(-)

diff --git a/src/Stackage/Database/Cron.hs b/src/Stackage/Database/Cron.hs
index f053609..c5b1101 100644
--- a/src/Stackage/Database/Cron.hs
+++ b/src/Stackage/Database/Cron.hs
@@ -825,7 +825,6 @@ createHoogleDB snapshotId snapName =
         logInfo $ "Creating Hoogle DB for " <> display snapName
         downloadBucketUrl <- scDownloadBucketUrl <$> ask
         let root = "hoogle-gen"
-            bindir = root </> "bindir"
             outname = root </> "output.hoo"
             tarKey = toPathPiece snapName <> "/hoogle/orig.tar"
             tarUrl = downloadBucketUrl <> "/" <> tarKey
@@ -841,9 +840,7 @@ createHoogleDB snapshotId snapName =
                 createDirectoryIfMissing True $ takeDirectory tarFP
                 withBinaryFileDurableAtomic tarFP WriteMode $ \tarHandle ->
                     runConduitRes $ bodyReaderSource (responseBody res) .| sinkHandle tarHandle
-        void $ tryIO $ removeDirectoryRecursive bindir
         void $ tryIO $ removeFile outname
-        createDirectoryIfMissing True bindir
         withSystemTempDirectory ("hoogle-" ++ T.unpack (textDisplay snapName)) $ \tmpdir -> do
             Any hasRestored <-
                 runConduitRes $