projects
/
pdns-pipe-nmc.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
f728855
)
better error reporting
author
Eugene Crosser
<crosser@average.org>
Sat, 19 Apr 2014 10:40:25 +0000
(14:40 +0400)
committer
Eugene Crosser
<crosser@average.org>
Sat, 19 Apr 2014 10:40:25 +0000
(14:40 +0400)
PowerDns.hs
patch
|
blob
|
history
diff --git
a/PowerDns.hs
b/PowerDns.hs
index 76d0b029070f213b0d40f18cdc5e370993eae75c..cbc9fb5df94babc05c9f715b7e6779aa0878e276 100644
(file)
--- a/
PowerDns.hs
+++ b/
PowerDns.hs
@@
-81,7
+81,7
@@
pdnsParse ver s =
"AXFR":x:[] -> Right (PdnsRequestAXFR (getInt x))
"Q":qn:"IN":qt:id:rip:xs -> case rrType qt of
RRTypeError e ->
- Left $ "PDNS Request: " ++
e
+ Left $ "PDNS Request: " ++
(show qt)
rt ->
Right (PdnsRequestQ
{ qName = qn