From d387771002efc7ca372408bc67e56c5bbdb2779a Mon Sep 17 00:00:00 2001
From: Marc <marc>
Date: Wed, 20 Mar 2024 07:26:46 +0100
Subject: [PATCH] some cleanup

---
 config.org | 115 -----------------------------------------------------
 1 file changed, 115 deletions(-)

diff --git a/config.org b/config.org
index 98373bd..3545c98 100644
--- a/config.org
+++ b/config.org
@@ -922,56 +922,6 @@ As an alternative if I'm not happy with selectrum & co
   )
 #+end_src
 
-* COMMENT ivy / counsel / swiper
-#+BEGIN_SRC emacs-lisp
-;  (require 'ivy)
-(use-package ivy
-  :ensure t
-  :diminish
-  (ivy-mode . "")
-  :defer t
-  :init
-  (ivy-mode 1)
-  :bind
-  ("C-r" . ivy-resume)             ;; overrides isearch-backwards binding
-  :config
-  (setq ivy-use-virtual-buffers t  ;; recent files and bookmarks in ivy-switch-buffer
-	ivy-height 20              ;; height of ivy window
-	ivy-count-format "%d/%d"   ;; current and total number
-	ivy-re-builders-alist      ;; regex replaces spaces with *
-	'((t . ivy--regex-plus))))
-
-; make counsel-M-x more descriptive
-(use-package ivy-rich
-  :ensure t
-  :defer t
-  :init
-  (ivy-rich-mode 1))
-
-(use-package counsel
-  :ensure t
-  :defer t
-  :bind
-  (("M-x" . counsel-M-x)
-   ("C-x C-f" . counsel-find-file)
-   ("C-x C-r" . counsel-recentf)
-   ("C-x b"   . counsel-switch-buffer)
-   ("C-c C-f" . counsel-git)
-   ("C-c h f" . counsel-describe-function)
-   ("C-c h v" . counsel-describe-variable)
-   ("M-i" . counsel-imenu)))
-;   :map minibuffer-local-map ;;currently mapped to evil-redo
-;   ("C-r"     . 'counsel-minibuffer-history)))
-
-(use-package swiper
-  :ensure t
-  :bind
-  ("C-s" . swiper))
-
-(use-package ivy-hydra
-  :ensure t)
-#+END_SRC
-
 * outlook
 In outlook a macro is necessary, also a reference to FM20.DLL
 (Microsoft Forms 2.0 Object Library, in c:\windows\syswow64\fm20.dll)
@@ -1014,71 +964,6 @@ End Sub
   :diminish auto-revert-mode)
 #+end_src
 
-* COMMENT company (now corfu)
-#+BEGIN_SRC emacs-lisp
-(use-package company
-  :defer 1
-  :diminish
-  :defer t
-  :bind
-  (("C-<tab>" . company-complete)
-   :map company-active-map
-   ("RET" . nil)
-   ([return] . nil)
-   ("TAB" . company-complete-selection)
-   ([tab] . company-complete-selection)
-   ("<right>" . company-complete-common)
-   ("<escape>" . company-abort))
-  :hook
-  (after-init . global-company-mode)
-  (emacs-lisp-mode . my--company-elisp)
-  (org-mode . my--company-org)
-  :config
-  (defun my--company-elisp ()
-    (message "set up company for elisp")
-    (set (make-local-variable 'company-backends)
-         '(company-capf   ;; capf needs to be before yasnippet, or lsp fucks up completion for elisp
-           company-yasnippet
-           company-dabbrev-code
-           company-files)))
-  (defun my--company-org ()
-    (set (make-local-variable 'company-backends)
-         '(company-capf company-files))
- ;;   (add-hook 'completion-at-point-functions 'pcomplete-completions-at-point nil t)
-    (message "setup company for org"))
-  (setq company-idle-delay .2
-        company-minimum-prefix-length 1
-        company-require-match nil
-        company-show-numbers t
-        company-tooltip-align-annotations t))
-
-(use-package company-statistics
-  :ensure t
-  :after company
-  :defer t
-  :init
-  (setq company-statistics-file (concat MY--PATH_USER_LOCAL "company-statistics-cache.el"));~/.emacs.d/user-dir/company-statistics-cache.el")
-  :config
-  (company-statistics-mode 1))
-
-(use-package company-dabbrev
-  :ensure nil
-  :after company
-  :defer t
-  :config
-  (setq-default company-dabbrev-downcase nil))
-
-;; adds a info box right of the cursor with doc of the function
-(use-package company-box
-  :ensure t
-  :diminish
-  :defer t
-  :hook
-  (company-mode . company-box-mode))
-;  :init
-;  (add-hook 'company-mode-hook 'company-box-mode))
-#+END_SRC 
-
 * orgmode
 ** some notes
 *** copy file path within emacs