1
0
Fork 0

Rename Seal for drop 2 to work

Don't want to use birthday/april fools photos randomly
main
Bill Ewanick 2023-08-08 17:18:22 -04:00
parent 72cf946eb7
commit 615f2ff446
2 changed files with 4 additions and 1 deletions

View File

@ -186,7 +186,10 @@ randomPull lst = lst !! r'
randomNum from to = unsafePerformIO $ randomRIO (from, to) randomNum from to = unsafePerformIO $ randomRIO (from, to)
unsafeListDirContents :: FilePath -> [Text] 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 :: Show a => [a] -> IO ()
prettyPrint = putStr . unlines . map show prettyPrint = putStr . unlines . map show

View File

Before

Width:  |  Height:  |  Size: 13 KiB

After

Width:  |  Height:  |  Size: 13 KiB