diff --git a/configuration.org b/configuration.org index 4478fdd..081ed04 100644 --- a/configuration.org +++ b/configuration.org @@ -268,16 +268,6 @@ it as early as possible. ** Utility functions -*** Check if something is ~nil~ or a list of strings - -#+BEGIN_SRC emacs-lisp -(defun nil-or-list-of-strings-p (var) - "Return t if VAR is either nil or a list holding only strings." - (or (null var) - (not (null (delq nil - (mapcar (lambda (x) (and (stringp x) x)) var)))))) -#+END_SRC - *** Get the number at point #+BEGIN_SRC emacs-lisp @@ -3598,59 +3588,6 @@ See previous versions of the current file. (([f6] . git-timemachine-toggle))) #+END_SRC -* Company & Co. - -#+BEGIN_SRC emacs-lisp -(use-package company - :delight " 🏢" - :custom - (company-idle-delay nil) - (company-dabbrev-downcase nil) - :config - (setq company-frontends '(company-pseudo-tooltip-frontend - company-echo-metadata-frontend)) - (put 'company-clang-arguments 'safe-local-variable #'nil-or-list-of-strings-p) - (global-company-mode)) -#+END_SRC - -** Company completion based on local C headers - -#+BEGIN_SRC emacs-lisp -(use-package company-c-headers) -#+END_SRC - -** Company mode in the shell - -#+BEGIN_SRC emacs-lisp -(use-package company-shell) -#+END_SRC - -** REST Client completion via Company - -#+BEGIN_SRC emacs-lisp -(use-package company-restclient) -#+END_SRC - -** Insert Emoji with Company - -#+BEGIN_SRC emacs-lisp -(use-package company-emoji - :after - company - :init - (--set-emoji-font nil) - :config - (add-to-list 'company-backends 'company-emoji)) -#+END_SRC - -** Web mode (~web-mode~ and ~emmet-mode~, too) backend for Company - -#+BEGIN_SRC emacs-lisp -(use-package company-web - :config - (require 'company-web-html)) -#+END_SRC - * Consult, Vertico, Orderless The new completing system!