dunlin

commit d62b9dea3ec67221d2e2bcb3db397f1eed279c1a
parent d962dd7c41eebd239a066346f044f4d4c9397173
Author: Daniel Barlow <dan@telent.net>
Date:   Sun, 15 Jan 2023 18:29:46 +0000

repair command completions

Diffstat:
M
command.fnl
 | 
4
++--
M
musing.md
 | 
2
+-

2 files changed, 3 insertions(+), 3 deletions(-)
diff --git a/command.fnl b/command.fnl
@@ -168,8 +168,8 @@
 
       {:command nil}
       (set-completions
-       (collect [k _ (pairs  commands)]
-         (if (= (k:find str 1 true) 1) (values k k)))))))
+       (icollect [k _ (pairs  commands)]
+         (if (= (k:find str 1 true) 1) (completion { :text k})))))))
 
 (fn activate [{: state : entry : prompt &as self}]
   (tset state :active true)
diff --git a/musing.md b/musing.md
@@ -65,6 +65,7 @@ focus from entry to step through the completions then RET activates
 * [done] display unbound key error
 * [done] back binding
 * [done] save url history, use it in completions
+* [done] autocomplete command name
 
 * custom rendering for completions (e.g. buffer thumbnails)
 * less ugly default completions rendering
@@ -74,7 +75,6 @@ focus from entry to step through the completions then RET activates
 * bind event to echo-area click, ideally dependent on what's being shown
   in there
 * in general, can we bind commands to widget events?
-* autocomplete command name
 * command to create new buffer
 * keyboard navigation of completions