X-Git-Url: https://gitweb.factorcode.org/gitweb.cgi?p=factor.git;a=blobdiff_plain;f=misc%2Ffuel%2Ffuel-markup.el;h=3fd8a89c8c05f892b07b188e9f06e4cb68c9f144;hp=7d10cd512fbb3ada2e59147b6f843ec8e78c085a;hb=5d27f004a1676056fb67dea0ffc9c89ee544eaf0;hpb=9d19fb939a1835aacd6d82d7dddc2fc54874f665 diff --git a/misc/fuel/fuel-markup.el b/misc/fuel/fuel-markup.el index 7d10cd512f..3fd8a89c8c 100644 --- a/misc/fuel/fuel-markup.el +++ b/misc/fuel/fuel-markup.el @@ -466,7 +466,7 @@ the 'words.' word emits." (fuel-markup--insert-newline))) (defun fuel-markup--all-tags (e) - (let* ((cmd `(:fuel* (all-tags :get) "fuel" t)) + (let* ((cmd `(:fuel* (all-tags) "fuel" t)) (tags (fuel-eval--retort-result (fuel-eval--send/wait cmd)))) (fuel-markup--list (cons '$list (mapcar (lambda (tag) (list '$link tag tag 'tag)) tags))))) @@ -484,7 +484,7 @@ the 'words.' word emits." (fuel-markup--insert-newline))) (defun fuel-markup--all-authors (e) - (let* ((cmd `(:fuel* (all-authors :get) "fuel" t)) + (let* ((cmd `(:fuel* (all-authors) "fuel" t)) (authors (fuel-eval--retort-result (fuel-eval--send/wait cmd)))) (fuel-markup--list (cons '$list (mapcar (lambda (a) (list '$link a a 'author)) authors)))))