~mdw
/
zone
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
7496237
)
zone.lisp: Stringify the zone name at construction time.
author
Mark Wooding
<mdw@distorted.org.uk>
Fri, 25 Apr 2014 23:10:46 +0000
(
00:10
+0100)
committer
Mark Wooding
<mdw@distorted.org.uk>
Fri, 25 Apr 2014 23:10:46 +0000
(
00:10
+0100)
It causes trouble later if we don't.
zone.lisp
patch
|
blob
|
blame
|
history
diff --git
a/zone.lisp
b/zone.lisp
index
1324f70
..
6b84dac
100644
(file)
--- a/
zone.lisp
+++ b/
zone.lisp
@@
-439,7
+439,7
@@
(ttl min-ttl)
(serial (make-zone-serial zname)))
(listify head)
(ttl min-ttl)
(serial (make-zone-serial zname)))
(listify head)
- (values
zname
+ (values
(string-downcase zname)
(timespec-seconds ttl)
(make-soa :admin admin
:source (zone-parse-host source zname)
(timespec-seconds ttl)
(make-soa :admin admin
:source (zone-parse-host source zname)