Requires a seteq

This commit is contained in:
Tony Garnock-Jones 2017-01-06 16:46:57 -05:00
parent 9069c80a2a
commit 56d435bf99

View File

@ -1606,7 +1606,7 @@
[(list 'rerender! items-to-rerender) [(list 'rerender! items-to-rerender)
(log-info "rerender! ~v" items-to-rerender) (log-info "rerender! ~v" items-to-rerender)
(define packages-to-rerender (define packages-to-rerender
(list->set (if items-to-rerender (list->seteq (if items-to-rerender
(filter symbol? items-to-rerender) (filter symbol? items-to-rerender)
(all-package-names)))) (all-package-names))))
(package-change-handler packages-to-render-before-issuing-completions (package-change-handler packages-to-render-before-issuing-completions