diff options
| -rw-r--r-- | completion.org | 9 | ||||
| -rw-r--r-- | init.org | 2 |
2 files changed, 9 insertions, 2 deletions
diff --git a/completion.org b/completion.org index 5d71e9e..f266c49 100644 --- a/completion.org +++ b/completion.org @@ -33,7 +33,7 @@ orderless-skip-highlighting nil orderless-component-separator "[ -/]+" orderless-matching-styles - '(orderless-literal orderless-regexp orderless-initialism))) + '(orderless-literal orderless-initialism orderless-regexp))) #+end_src * corfu #+begin_src emacs-lisp @@ -50,6 +50,11 @@ corfu-min-width 20 corfu-max-width 100) :config + + ;; show eldoc string immediately after accepted completion too + (with-eval-after-load "eldoc" + (eldoc-add-command-completions "corfu-")) + (defun jao-corfu-enable-no-auto () (setq-local corfu-auto nil) (corfu-mode 1)) @@ -70,7 +75,7 @@ #+end_src * vertico - #+begin_src emacs-lisp + #+begin_src emacs-lisp :tangle no (jao-load-path "vertico/extensions") (use-package vertico-directory :after vertico) @@ -651,6 +651,7 @@ (jao-notify msg "" (jao-data-file "clock-world-icon.png")))) (defun jao-time-to-epoch (&optional s) + "Transform a time string to an epoch integer in milliseconds." (interactive) (let ((s (or s (read-string "Time string: " (thing-at-point 'string))))) (message "%s = %s" @@ -658,6 +659,7 @@ (round (* 1000 (time-to-seconds (parse-time-string s))))))) (defun jao-epoch-to-time (&optional v) + "Transform an epoch, given in milliseconds, to a time string." (interactive) (let ((v (or v (read-number "Milliseconds: " (thing-at-point 'number))))) (message "%s = %s" v |