From 615f2ff4462f316e5d6f243dfa75e59f43c838f4 Mon Sep 17 00:00:00 2001 From: Bill Ewanick Date: Tue, 8 Aug 2023 17:18:22 -0400 Subject: [PATCH] Rename Seal for drop 2 to work Don't want to use birthday/april fools photos randomly --- generateSealPosts.hs | 5 ++++- images/{singerSeal.jpg => _singerSeal.jpg} | Bin 2 files changed, 4 insertions(+), 1 deletion(-) rename images/{singerSeal.jpg => _singerSeal.jpg} (100%) diff --git a/generateSealPosts.hs b/generateSealPosts.hs index aa81ba0..f6a974e 100755 --- a/generateSealPosts.hs +++ b/generateSealPosts.hs @@ -186,7 +186,10 @@ randomPull lst = lst !! r' randomNum from to = unsafePerformIO $ randomRIO (from, to) unsafeListDirContents :: FilePath -> [Text] -unsafeListDirContents = map T.pack . sort . unsafePerformIO . listDirectory +unsafeListDirContents = map T.pack . drop 2 . sort . unsafePerformIO . listDirectory +-- ^^^^^^ +-- drop 2 used to remove the birthday and singer photos +-- TODO: find a better way to hardcode this prettyPrint :: Show a => [a] -> IO () prettyPrint = putStr . unlines . map show diff --git a/images/singerSeal.jpg b/images/_singerSeal.jpg similarity index 100% rename from images/singerSeal.jpg rename to images/_singerSeal.jpg