diff options
| author | Laura <the-ceo-of-antifa@protonmail.com> | 2023-01-26 17:12:36 +0100 |
|---|---|---|
| committer | Laura <the-ceo-of-antifa@protonmail.com> | 2023-01-26 17:12:36 +0100 |
| commit | d197bc769e2eb45e84e0de749796f32345825469 (patch) | |
| tree | 3630e8ac21b7705e64cc71c4dd7c7edacaf8c093 | |
| parent | 115d223922eb50a371743ea2f384323278888f9c (diff) | |
| download | miaowe-d197bc769e2eb45e84e0de749796f32345825469.tar.gz miaowe-d197bc769e2eb45e84e0de749796f32345825469.zip | |
No reason for a quit command really
| -rw-r--r-- | miaowe.hs | 1 |
1 files changed, 0 insertions, 1 deletions
@@ -233,7 +233,6 @@ getFortune = readCreateProcess ((shell "fortune -e | cowsay -b")) "" doCommand :: IrcChannel -> MircString -> IO () doCommand channel command = case map toLower ((words command)!!4) of - "quit" -> exitSuccess "list" -> listDirectory "." >>= sendToChannel channel . intercalate "\n" |