From 84bb01209f43a6b0fc3c2579d0c4f030bc804511 Mon Sep 17 00:00:00 2001
From: jao <jao@gnu.org>
Date: Tue, 18 Jan 2022 23:30:38 +0000
Subject: power control commands using systemcl

---
 completion.org | 38 ++++++++++++++++++++++----------------
 1 file changed, 22 insertions(+), 16 deletions(-)

(limited to 'completion.org')

diff --git a/completion.org b/completion.org
index f7c2c1e..0e52b56 100644
--- a/completion.org
+++ b/completion.org
@@ -4,17 +4,22 @@
 
 * completion styles
   #+begin_src emacs-lisp
-  (setq tab-always-indent 'complete
-        read-extended-command-predicate #'command-completion-default-include-p
-        completion-category-defaults nil
-        completion-cycle-threshold nil
-        completions-detailed t
-        completion-show-help nil
-        completion-show-inline-help nil
-        completion-ignore-case t
-        completion-wrap-movement t
-        completion-auto-select nil
-        completion-category-overrides '((file (styles . (partial-completion)))))
+    (setq tab-always-indent 'complete
+          read-extended-command-predicate #'command-completion-default-include-p
+          completion-category-defaults nil
+          completion-cycle-threshold nil
+          completions-detailed t
+          completion-show-help nil
+          completion-show-inline-help nil
+          completion-ignore-case t
+          completion-wrap-movement t
+          completion-auto-select nil
+          completion-styles '(basic partial-completion substring emacs22)
+          completion-category-overrides
+          '((file (styles partial-completion))
+            (command (styles initials substring partial-completion))
+            (symbol (styles initials substring partial-completion))
+            (variable (styles initials substring partial-completion))))
   #+end_src
 * imenu
   #+begin_src emacs-lisp
@@ -62,13 +67,14 @@
             mct-live-completion t ;; 'visible
             mct-completion-blocklist nil
             mct-completion-passlist '(imenu
- 	                              Info-goto-node
- 	                              Info-index
- 	                              Info-menu
+                                      Info-goto-node
+                                      Info-index
+                                      Info-menu
                                       jao-buffer-same-mode
- 	                              vc-retrieve-tag)))
+                                      vc-retrieve-tag)))
+
     (mct-minibuffer-mode 1)
-    ;; (mct-region-global-mode -1)
+    ;; (mct-region-mode 1)
 
   #+end_src
 * marginalia
-- 
cgit v1.2.3