branch: externals/jinx commit e1a5a8921e42cd4ae7cb0dba95fe968d04359ee0 Author: Daniel Mendler <m...@daniel-mendler.de> Commit: Daniel Mendler <m...@daniel-mendler.de>
Improve mouse menu separators --- jinx.el | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/jinx.el b/jinx.el index 289d958d6f..6067cdaf58 100644 --- a/jinx.el +++ b/jinx.el @@ -835,14 +835,14 @@ Optionally show prompt INFO and insert INITIAL input." (dolist (dict jinx--dicts) (when-let ((desc (jinx--mod-describe dict)) (suggestions (jinx--mod-suggest dict word))) - (push `[,(concat (car desc) " - " (cdr desc)) :active nil] menu) + (push `[,(concat "── " (car desc) " ─ " (cdr desc) " ──") :active nil] menu) (cl-loop for w in suggestions repeat jinx-menu-suggestions do (push `[,w (jinx--correct-replace ,ov ,w)] menu)))) (when-let ((suggestions (jinx--session-suggestions word))) - (push ["Session" :active nil] menu) + (push ["── Session ──" :active nil] menu) (cl-loop for w in suggestions repeat jinx-menu-suggestions do (push `[,w (jinx--correct-replace ,ov ,w)] menu))) - (push ["Accept and save" :active nil] menu) + (push ["── Accept and save ──" :active nil] menu) (cl-loop for (key . fun) in jinx--save-keys for actions = (funcall fun nil key word) do (unless (consp (car actions)) (setq actions (list actions)))