diff options
-rw-r--r-- | miaowe.hs | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -227,7 +227,7 @@ trySendFile channel path = (doesFileExist (path) #ifdef FORTUNE getFortune :: IO String -getFortune = readCreateProcess ((shell "fortune | cowsay -b")) "" +getFortune = readCreateProcess ((shell "fortune -e | cowsay -b")) "" #endif doCommand :: IrcChannel -> MircString -> IO () |