summaryrefslogtreecommitdiffhomepage
path: root/attic
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2021-04-17 04:01:45 +0100
committerjao <jao@gnu.org>2021-04-17 04:01:45 +0100
commit3d6a8ed794357e9764fe7281c2070601be6daae0 (patch)
treea41c9ceff2e3629ea8f17ca0adeac18c6ec33e73 /attic
parent45bf5ca9f1ab4fcec6388ba9624e6eac719e0b24 (diff)
downloadelibs-3d6a8ed794357e9764fe7281c2070601be6daae0.tar.gz
elibs-3d6a8ed794357e9764fe7281c2070601be6daae0.tar.bz2
the popup keeps me company
Diffstat (limited to 'attic')
-rw-r--r--attic/counsel.org61
1 files changed, 0 insertions, 61 deletions
diff --git a/attic/counsel.org b/attic/counsel.org
index a2147b5..f6814ae 100644
--- a/attic/counsel.org
+++ b/attic/counsel.org
@@ -1,66 +1,5 @@
#+title: Completion configuration using ivy, counsel and friends
-* company
- #+begin_src emacs-lisp
- (use-package company
- :ensure t
- :custom
- ((company-global-modes '(clojure-mode
- clojurec-mode
- emacs-lisp-mode
- ;; eshell-mode
- haskell-mode
- haskell-interactive-mode
- idris-mode
- lisp-interaction-mode
- message-mode
- org-mode
- pie-mode
- scheme-mode))
- (company-idle-delay 0.15)
- (company-lighter "")
- (company-lighter-base "")
- (company-show-numbers nil)
- (company-tooltip-limit 15)
- (company-tooltip-align-annotations t)
- (company-transformers '(company-sort-by-occurrence)))
-
- :config
-
- (defun jao-complete-at-point ()
- "Complete using company unless we're in the minibuffer."
- (interactive)
- (if (window-minibuffer-p) (completion-at-point) (company-manual-begin)))
-
- :bind (;; ([remap completion-at-point] . #'jao-complete-at-point)
- ;; ([remap complete-symbol] . #'jao-complete-at-point)
-
- ;; The following are keybindings that take effect whenever
- ;; the completions menu is visible, even if the user has not
- ;; explicitly interacted with Company.
- :map company-active-map
-
- ("<tab>" . #'company-complete-common-or-cycle)
- ("TAB" . #'company-complete-common-or-cycle)
-
- ("C-h" . #'company-show-doc-buffer)
- ("M-." . #'company-show-location)
-
- :filter (or (not (derived-mode-p 'eshell-mode))
- (company-explicit-action-p))
- ("<return>" . #'company-complete-selection)
- ("RET" . #'company-complete-selection))
-
- :bind* (("M-TAB" . #'jao-complete-at-point))
-
- :diminish)
-
- ;; (use-package company-math :ensure t :after company)
-
- ;; (global-company-mode 1)
-
- #+end_src
-
* selectrum
#+begin_src emacs-lisp :load no
(use-package selectrum