`(((type . "missed") 
   (user . ,(alist-ref 'user-name to-identity))
   (host . ,(alist-ref 'registrar to-identity))))