repositories
/
cloogle-irc.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
(from parent 2:
ad6f64c
)
Merge pull request #13 from clean-cloogle/pr-better-output
author
dopefishh
<mart@martlubbers.net>
Tue, 25 Jul 2017 16:58:08 +0000
(18:58 +0200)
committer
GitHub
<noreply@github.com>
Tue, 25 Jul 2017 16:58:08 +0000
(18:58 +0200)
Pr better output
cloogleirc.icl
patch
|
blob
|
history
diff --git
a/cloogleirc.icl
b/cloogleirc.icl
index
0fc25f9
..
3e89acc
100644
(file)
--- a/
cloogleirc.icl
+++ b/
cloogleirc.icl
@@
-190,6
+190,7
@@
Start w
| m.[0] == '!'
# (msgs, w) = realProcess (split " " $ m % (1, size m)) w
= (Just $ map reply msgs, w)
+ | m % (0,4) == "\001PING" = (Just [reply m], w)
= (Just [], w)
where
reply = case (\(CSepList [t:_]) -> t.[0]) t of