Commit 68009290 authored by Linus Tolke Y's avatar Linus Tolke Y
Browse files

Converting vectors to lists.

parent 49396a29
......@@ -139,14 +139,16 @@ The defaults for this command is the conference that you are in."
(let* ((found-by (or (zerop by)
(lyskom-remove-zeroes
(map->text-nos
(blocking-do 'get-created-texts by
0 lyskom-max-int)))))
(append
(map->text-nos
(blocking-do 'get-created-texts by
0 lyskom-max-int)) nil))))
(found-to (or (zerop to)
(lyskom-remove-zeroes
(map->text-nos
(blocking-do 'get-map to
0 lyskom-max-int)))))
(append
(map->text-nos
(blocking-do 'get-map to
0 lyskom-max-int)) nil))))
(list (cond
((zerop by) found-to)
((zerop to) found-by)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment