Browse Source

Fix order of entity caps in hash function

master
eta 3 years ago
parent
commit
912c09edc4
  1. 6
      xep-0115.lisp

6
xep-0115.lisp

@ -24,6 +24,8 @@ WARNING: You must pre-sort DISCO-INFO-LIST according to the rules in XEP-0115 § @@ -24,6 +24,8 @@ WARNING: You must pre-sort DISCO-INFO-LIST according to the rules in XEP-0115 §
;; intentionally take the same lambda lists,
;; we can just do this.
(apply #'format-disco-identity call))
identities)
;; NREVERSE because pushing things does it the wrong
;; way round (FIXME, inefficient)
(nreverse identities))
;; DISCO-FEATURE takes one argument (the feature name)
(mapcar #'car features)))))))
(mapcar #'car (nreverse features))))))))

Loading…
Cancel
Save