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:
291b90a
)
fix error reporting
author
Eugene Crosser
<crosser@average.org>
Sat, 19 Apr 2014 10:47:13 +0000
(14:47 +0400)
committer
Eugene Crosser
<crosser@average.org>
Sat, 19 Apr 2014 10:47:13 +0000
(14:47 +0400)
PowerDns.hs
patch
|
blob
|
history
diff --git
a/PowerDns.hs
b/PowerDns.hs
index cbc9fb5df94babc05c9f715b7e6779aa0878e276..81e0ac9efac8c88f3a9746fc8821981af58f69fa 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: " ++ (show qt)
+ Left $ "
Unrecognized RR type: " ++ e
rt ->
Right (PdnsRequestQ
{ qName = qn