Fix order of entity caps in hash function

This commit is contained in:
eta 2020-08-01 17:37:36 +01:00
parent 599123dbef
commit 912c09edc4
1 changed files with 4 additions and 2 deletions

View File

@ -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))))))))