Missing the `:protocol' key, for no especially obvious reason.
:data name)))
(defzoneparse :srv (name data rec :zname zname)
:data name)))
(defzoneparse :srv (name data rec :zname zname)
- ":srv (((SERVICE &key :port) (PROVIDER &key :port :prio :weight :ip)*)*)"
+ ":srv (((SERVICE &key :port :protocol)
+ (PROVIDER &key :port :prio :weight :ip)*)*)"
(dolist (srv data)
(destructuring-bind (servopts &rest providers) srv
(destructuring-bind
(dolist (srv data)
(destructuring-bind (servopts &rest providers) srv
(destructuring-bind