Removed caddr usage.
authorTim Vaughan <tgvaughan@gmail.com>
Thu, 13 Jun 2019 23:59:07 +0000 (01:59 +0200)
committerTim Vaughan <tgvaughan@gmail.com>
Thu, 13 Jun 2019 23:59:07 +0000 (01:59 +0200)
elpher.el

index 94ba3be..bddb98f 100644 (file)
--- a/elpher.el
+++ b/elpher.el
@@ -375,7 +375,7 @@ and PORT."
         (type-map-entry (alist-get type elpher-type-map)))
     (if type-map-entry
         (let* ((margin-code (cadr type-map-entry))
-               (face (caddr type-map-entry))
+               (face (elt type-map-entry 2))
                (node (elpher-make-node display-string elpher-current-node address)))
           (elpher-insert-margin margin-code)
           (insert-text-button display-string