Emacs: Remove counsel-dash

I don't seem to be using it, and it's currently not installable via nix

2 files changed, 0 insertions, 68 deletions

diff --git a/emacs/.emacs.d/init.el b/emacs/.emacs.d/init.el
index 902e5b5..9e8e109 100644
--- a/emacs/.emacs.d/init.el
+++ b/emacs/.emacs.d/init.el
@@ -1338,40 +1338,6 @@
 (use-package ehelp
   :bind-keymap ("C-h" . ehelp-map))
 ;; #+END_SRC
-;; *** counsel-dash
-
-;; Emacs’ documentation is great to read from inside Emacs.  Counsel-dash
-;; helps to make documentation for other languages easier to access
-
-;; #+BEGIN_SRC emacs-lisp
-(defmacro ap/create-counsel-dash-hook (mode docsets)
-  (let* ((mode-s (symbol-name mode))
-         (fun (intern (concat "counsel-dash-hook-" mode-s)))
-         (hook (intern (concat mode-s "-mode-hook"))))
-    `(progn
-       (defun ,fun ()
-         (when (require 'counsel-dash nil :noerror)
-           (seq-map #'counsel-dash-install-docset
-             (seq-difference ',docsets
-                                  (helm-dash-installed-docsets)))
-           (setq-local counsel-dash-docsets ',docsets)))
-       (add-hook (quote ,hook) (function ,fun)))))
-
-(use-package counsel-dash
-  :defer 20
-  :defines counsel-dash-docsets
-  :config (progn
-            (setq counsel-dash-browser-func #'eww)
-            (ap/create-counsel-dash-hook nginx ("Nginx"))
-            (ap/create-counsel-dash-hook ansible ("Ansible"))
-            (ap/create-counsel-dash-hook php ("PHP" "Symfony"))
-            (ap/create-counsel-dash-hook twig ("Twig"))
-            (ap/create-counsel-dash-hook js2 ("JavaScript" "NodeJS" "jQuery" "Express" "SailsJS" "Lo-Dash"))
-            (ap/create-counsel-dash-hook markdown ("Markdown"))
-            (ap/create-counsel-dash-hook saltstack ("SaltStack"))
-            (ap/create-counsel-dash-hook clojure ("Clojure"))
-            (ap/create-counsel-dash-hook sql ("PostgreSQL" "MySQL"))))
-;; #+END_SRC
 
 ;; *** discover-my-major
 
diff --git a/emacs/.emacs.d/init.org b/emacs/.emacs.d/init.org
index d428bd8..78c1ede 100644
--- a/emacs/.emacs.d/init.org
+++ b/emacs/.emacs.d/init.org
@@ -1338,40 +1338,6 @@ improves the normal help commands, mostly by making quitting them easier.
 (use-package ehelp
   :bind-keymap ("C-h" . ehelp-map))
 #+END_SRC
-*** counsel-dash
-
-Emacs’ documentation is great to read from inside Emacs.  Counsel-dash
-helps to make documentation for other languages easier to access
-
-#+BEGIN_SRC emacs-lisp
-(defmacro ap/create-counsel-dash-hook (mode docsets)
-  (let* ((mode-s (symbol-name mode))
-         (fun (intern (concat "counsel-dash-hook-" mode-s)))
-         (hook (intern (concat mode-s "-mode-hook"))))
-    `(progn
-       (defun ,fun ()
-         (when (require 'counsel-dash nil :noerror)
-           (seq-map #'counsel-dash-install-docset
-             (seq-difference ',docsets
-                                  (helm-dash-installed-docsets)))
-           (setq-local counsel-dash-docsets ',docsets)))
-       (add-hook (quote ,hook) (function ,fun)))))
-
-(use-package counsel-dash
-  :defer 20
-  :defines counsel-dash-docsets
-  :config (progn
-            (setq counsel-dash-browser-func #'eww)
-            (ap/create-counsel-dash-hook nginx ("Nginx"))
-            (ap/create-counsel-dash-hook ansible ("Ansible"))
-            (ap/create-counsel-dash-hook php ("PHP" "Symfony"))
-            (ap/create-counsel-dash-hook twig ("Twig"))
-            (ap/create-counsel-dash-hook js2 ("JavaScript" "NodeJS" "jQuery" "Express" "SailsJS" "Lo-Dash"))
-            (ap/create-counsel-dash-hook markdown ("Markdown"))
-            (ap/create-counsel-dash-hook saltstack ("SaltStack"))
-            (ap/create-counsel-dash-hook clojure ("Clojure"))
-            (ap/create-counsel-dash-hook sql ("PostgreSQL" "MySQL"))))
-#+END_SRC
 
 *** discover-my-major