From 422e7cfc8bb601ae1f24422d5fe1325ee72de82a Mon Sep 17 00:00:00 2001 From: Mark Wooding Date: Wed, 30 Apr 2014 16:08:13 +0100 Subject: [PATCH] zone.lisp: Export `tinydns-output', because it looks handy. Extensions adding new record types might want this. --- zone.lisp | 1 + 1 file changed, 1 insertion(+) diff --git a/zone.lisp b/zone.lisp index f4f2367..e686322 100644 --- a/zone.lisp +++ b/zone.lisp @@ -1342,6 +1342,7 @@ $TTL ~2@*~D~2%" ;;;-------------------------------------------------------------------------- ;;; tinydns-data output format. +(export 'tinydns-output) (defun tinydns-output (code &rest fields) (format *zone-output-stream* "~C~{~@[~A~]~^:~}~%" code fields)) -- 2.11.0