converted init code to use use-package

2 files changed, 0 insertions, 100 deletions

diff --git a/init/treesit/init-treesit-setup-available-languages.el b/init/treesit/init-treesit-setup-available-languages.el
deleted file mode 100644
index 9a25691..0000000
--- a/init/treesit/init-treesit-setup-available-languages.el
+++ /dev/null
@@ -1,97 +0,0 @@
-;; -*- lexical-binding: t; -*-
-
-;; This script is a quick workaround for setting up treesitter modes.
-;; Hopefully this won't be needed for long but it works for now!
-;;
-;; This just runs through the list of modes below, checks if the
-;; required treesitter parsers are installed, and if so,
-;; sets up auto-mode-alist and interpreter-mode-alist
-;; to open the respective source files with the treesitter
-;; mode for that language.
-;;
-;; To use, you should just add the modes and other info to the list
-;; below, and then "require" this file in your init.
-;; The messages that get generated by this script may be burried
-;; by other startup messages, so it may not appear to have done
-;; anything!
-;;
-;; To test if it works, visit a file such as "x.py", then run
-;; "M-x describe-mode". There should be some info about
-;; the current major mode that looks like this:
-;;
-;; "The major mode is Python mode defined in python.el:
-;; Major mode for editing Python files, using tree-sitter library."
-
-(defvar -quiet? nil
-  "Suppress messages when setting up treesitter modes.")
-
-(defvar -modes `((python-ts-mode
-                  ((:parsers . python)
-                   (:file-ext . ,(rx ".py"))
-                   (:interpreters . ("python" "python3"))))
-                 (rust-ts-mode 
-                  ((:parsers . rust)
-                   (:file-ext . ,(rx ".rs"))))
-                 (bash-ts-mode
-                  ((:parsers . bash)
-                   (:file-ext . ,(rx ".sh"))
-                   (:interpreters . ("bash" "sh" "openrc-run"))))
-                 (c-ts-mode 
-                  ((:parsers . c)
-                   (:file-ext . ,(rx ".c"))))
-                 (c++-ts-mode 
-                  ((:parsers . cpp)
-                   (:file-ext . ,(rx (or ".c++" ".cpp" ".cxx"
-                                         ".h++" ".hpp" ".hxx")))))
-                 (c-or-c++-ts-mode 
-                  ((:parsers . (c c++))
-                   (:file-ext . ,(rx ".h"))))
-                 (toml-ts-mode 
-                  ((:parsers . toml)
-                   (:file-ext . ,(rx ".toml")))))
-  "Treesitter modes and some information required to set them up.
-
-Parsers are the treesitter packages that need to be installed to 
-use the associated mode. python-ts-mode requires the python treesitter
-parser package to be installed for example.
-
-File extension is for example .py for python scripts. Some
-modes like c++-ts-mode are associated with a few 
-extensions, and c-or-c++-mode is associated with .h
-because the extension is ambiguous.
-
-Interpreters are used to associate certain shebangs with the treesitter
-mode. Files that start with '#!/usr/bin/env python' for example will
-be associated with python-ts-mode if 'python' is included in the 
-interpreters list.")
-
-(defun -ready-quiet? (parser)
-  (treesit-ready-p parser t))
-
-(cl-defun -setup-mode? (&key ts-mode
-                             required-parsers
-                             file-extensions
-                             interpreters)
-  (when (seq-every-p '-ready-quiet? (ensure-list required-parsers))    
-    (add-to-list 'auto-mode-alist (cons file-extensions ts-mode))
-    (when interpreters
-      (seq-each (lambda (interpreter)
-                  (add-to-list 'interpreter-mode-alist (cons interpreter ts-mode)))
-                (ensure-list interpreters)))
-    t))
-
-(seq-each (lambda (mode)
-            (when (and (-setup-mode?
-                        :ts-mode (car mode)
-                        :required-parsers (alist-get :parsers (cadr mode))
-                        :file-extensions (alist-get :file-ext (cadr mode))
-                        :interpreters (alist-get :interpreters (cadr mode)))
-                       (not -quiet?))
-              (message "Setup treesitter mode %s" (car mode))))
-          -modes)
-
-(provide 'init-treesit-setup-available-languages)
-
-;; Local Variables:
-;; read-symbol-shorthands: (("-" . "init-treesit-setup-available-languages-"))
-;; End:
diff --git a/init/treesit/init-treesit.el b/init/treesit/init-treesit.el
deleted file mode 100644
index 29ea075..0000000
--- a/init/treesit/init-treesit.el
+++ /dev/null
@@ -1,3 +0,0 @@
-(require 'init-treesit-setup-available-languages)
-
-(provide 'init-treesit)