(let* ((address (elpher-node-address node))
(type (elpher-address-type address))
(type-record (alist-get type elpher-type-map)))
(let* ((address (elpher-node-address node))
(type (elpher-address-type address))
(type-record (alist-get type elpher-type-map)))