Reconfigure to work with guix

1 files changed, 78 insertions, 68 deletions

diff --git a/.emacs.d/init.el b/.emacs.d/init.el
index 4f92371..894e7c4 100644
--- a/.emacs.d/init.el
+++ b/.emacs.d/init.el
@@ -4,8 +4,11 @@
 
 (require 'package)
 (add-to-list 'load-path "~/.emacs.d/lisp/")
+(add-to-list 'load-path "/home/apollo/.guix-profile/share/emacs/site-lisp")
 
-
+(guix-emacs-autoload-packages)
+;(require 'vterm)
+;(vterm)
 
 (add-hook 'dired-mode-hook 'all-the-icons-dired-mode)
 
@@ -28,7 +31,9 @@
 (load "functions.el")
 (load "keys.el")
 (load "all-the-icons-dired.el")
+;(load "anki-editor.el")
 
+;(use-package anki-editor)
 
 (setq inhibit-startup-message nil)
 
@@ -78,34 +83,33 @@
   :ensure t)
 
 ;;Dashboard settings
-(use-package dashboard
-  :ensure t
-  :config
-  (dashboard-setup-startup-hook))
-
-(setq dashboard-items '((recents  . 5)
-                        (bookmarks . 5)))
-(setq initial-buffer-choice (lambda () (get-buffer-create "*dashboard*")))
-(setq dashboard-item-names '(("Recent Files:" . "Recent Files:")
-			     ("Bookmarks:" . "Study:")))
-;; Set the banner
-(setq dashboard-startup-banner "~/dotfiles/pictures/medicine/plague-doctor-s.png")
-;; Set the title
-(setq dashboard-banner-logo-title "Is that a flying flower?")
-;; (setq dashboard-init-info "Bring me your sick and wounded!")
-;; Content is not centered by default. To center, set
-(setq dashboard-set-init-info t)
-(setq dashboard-center-content t)
-(setq dashboard-set-navigator t)
-(setq dashboard-set-heading-icons t)
-(setq dashboard-set-file-icons t)
-(setq dashboard-show-shortcuts nil)
-(setq dashboard-set-footer t)
-(setq dashboard-footer-messages '("Welcome to the Church Of Emacs"))
-(setq dashboard-footer-icon (all-the-icons-octicon "broadcast"
-                                                   :height 1.15
-                                                   :v-adjust -0.05
-                                                   :face 'font-lock-keyword-face))
+;(require 'dashboard)
+
+;(dashboard-setup-startup-hook)
+
+;; (setq dashboard-items '((recents  . 5)
+;;                         (bookmarks . 5)))
+;; (setq initial-buffer-choice (lambda () (get-buffer-create "*dashboard*")))
+;; (setq dashboard-item-names '(("Recent Files:" . "Recent Files:")
+;; 			     ("Bookmarks:" . "Study:")))
+;; ;; Set the banner
+;; (setq dashboard-startup-banner "~/dotfiles/pictures/medicine/plague-doctor-s.png")
+;; ;; Set the title
+;; (setq dashboard-banner-logo-title "Is that a flying flower?")
+;; ;; (setq dashboard-init-info "Bring me your sick and wounded!")
+;; ;; Content is not centered by default. To center, set
+;; (setq dashboard-set-init-info t)
+;; (setq dashboard-center-content t)
+;; (setq dashboard-set-navigator t)
+;; (setq dashboard-set-heading-icons t)
+;; (setq dashboard-set-file-icons t)
+;; (setq dashboard-show-shortcuts nil)
+;; (setq dashboard-set-footer t)
+;; (setq dashboard-footer-messages '("Welcome to the Church Of Emacs"))
+;; (setq dashboard-footer-icon (all-the-icons-octicon "broadcast"
+;;                                                    :height 1.15
+;;                                                    :v-adjust -0.05
+;;                                                    :face 'font-lock-keyword-face))
 
 
 (defvar eshell-path-env (getenv "~/.local/bin"))
@@ -379,23 +383,24 @@
   :custom
   (lsp-ui-doc-position 'bottom))
 
-(use-package dap-mode
-  ;; Uncomment the config below if you want all UI panes to be hidden by default!
-  ;; :custom
-  ;; (lsp-enable-dap-auto-configure nil)
-  ;; :config
-  ;; (dap-ui-mode 1)
+;; (use-package dap-node)
+;; (use-package dap-mode
+;;   ;; Uncomment the config below if you want all UI panes to be hidden by default!
+;;   ;; :custom
+;;   ;; (lsp-enable-dap-auto-configure nil)
+;;   ;; :config
+;;   ;; (dap-ui-mode 1)
 
-  :config
-  ;; Set up Node debugging
-  (require 'dap-node)
-  (dap-node-setup) ;; Automatically installs Node debug adapter if needed
+;;   :config
+;;   ;; Set up Node debugging
+;;   (require 'dap-node)
+;;   (dap-node-setup) ;; Automatically installs Node debug adapter if needed
 
-  ;; Bind `C-c l d` to `dap-hydra` for easy access
-  (general-define-key
-    :keymaps 'lsp-mode-map
-    :prefix lsp-keymap-prefix
-    "d" '(dap-hydra t :wk "debugger")))
+;;   ;; Bind `C-c l d` to `dap-hydra` for easy access
+;;   (general-define-key
+;;     :keymaps 'lsp-mode-map
+;;     :prefix lsp-keymap-prefix
+;;     "d" '(dap-hydra t :wk "debugger")))
 
 
 (use-package json-mode
@@ -492,10 +497,10 @@
   :config
   (setq elfeed-goodies/entry-pane-size 0.5))
 
-(use-package vterm
-  :config
-  (setq vterm-shell "/bin/zsh")
-  :bind(("C-c C-v c" . 'vterm-send-stop)))
+;; (use-package vterm
+;;   :config
+;;   (setq vterm-shell "/bin/zsh")
+;;   :bind(("C-c C-v c" . 'vterm-send-stop)))
 
 (use-package eshell
   :bind (("C-c e" . 'eshell)))
@@ -506,10 +511,15 @@
 	 ("C-c C-v p" . 'multi-vterm-prev)
 	 ("C-c C-v o" . 'multi-vterm)
 	 ("C-c C-c" . 'vterm-send-next-key)))
+(require 'multi-vterm)
+(global-set-key (kbd "C-c C-v n") 'multi-vterm-next)
+(global-set-key (kbd "C-c C-v p") 'multi-vterm-prev)
+(global-set-key (kbd "C-c C-v o") 'multi-vterm)
+(global-set-key (kbd "C-c C-c") 'vterm-send-next-key)
 
-(use-package pdf-tools
-  :init
-  (pdf-tools-install))
+;; (use-package pdf-tools
+;;   :init
+;;   (pdf-tools-install))
 
 ;; (use-package eyebrowse
 ;;   :init
@@ -526,7 +536,7 @@
 (use-package paredit)
 (use-package corfu)
 (use-package monkeytype)
-(use-package telega)
+;(use-package telega)
 
 (put 'downcase-region 'disabled nil)
 (put 'dired-find-alternate-file 'disabled nil)
@@ -678,20 +688,20 @@
 
 
 
-(use-package eaf
-  :load-path "~/.emacs.d/site-lisp/emacs-application-framework"
-  :custom
-  ; See https://github.com/emacs-eaf/emacs-application-framework/wiki/Customization
-  (eaf-browser-continue-where-left-off t)
-  (eaf-browser-enable-adblocker t)
-  (browse-url-browser-function 'eaf-open-browser)
-  :config
-  (require 'eaf-browser)
-  (require 'eaf-pdf-viewer)
-  (defalias 'browse-web #'eaf-open-browser)
-  (eaf-bind-key scroll_up "C-n" eaf-pdf-viewer-keybinding)
-  (eaf-bind-key scroll_down "C-p" eaf-pdf-viewer-keybinding)
-  (eaf-bind-key nil "M-q" eaf-browser-keybinding))
+;; (use-package eaf
+;;   :load-path "~/.emacs.d/site-lisp/emacs-application-framework"
+;;   :custom
+;;   ; See https://github.com/emacs-eaf/emacs-application-framework/wiki/Customization
+;;   (eaf-browser-continue-where-left-off t)
+;;   (eaf-browser-enable-adblocker t)
+;;   (browse-url-browser-function 'eaf-open-browser)
+;;   :config
+;;   (require 'eaf-browser)
+;;   (require 'eaf-pdf-viewer)
+;;   (defalias 'browse-web #'eaf-open-browser)
+;;   (eaf-bind-key scroll_up "C-n" eaf-pdf-viewer-keybinding)
+;;   (eaf-bind-key scroll_down "C-p" eaf-pdf-viewer-keybinding)
+;;   (eaf-bind-key nil "M-q" eaf-browser-keybinding))
 
 
 (use-package exwm-firefox-core)
@@ -699,7 +709,7 @@
 (use-package consult
   :ensure t
   :bind(("M-g g" . consult-goto-line)))
-
+(use-package alsamixer)
 (custom-set-variables
  ;; custom-set-variables was added by Custom.
  ;; If you edit it by hand, you could mess it up, so be careful.
@@ -709,7 +719,7 @@
  '(custom-safe-themes
    '("21055a064d6d673f666baaed35a69519841134829982cbbb76960575f43424db" "2c613514f52fb56d34d00cc074fe6b5f4769b4b7f0cc12d22787808addcef12c" "3325e2c49c8cc81a8cc94b0d57f1975e6562858db5de840b03338529c64f58d1" "512ce140ea9c1521ccaceaa0e73e2487e2d3826cc9d287275550b47c04072bc4" "6945dadc749ac5cbd47012cad836f92aea9ebec9f504d32fe89a956260773ca4" "05626f77b0c8c197c7e4a31d9783c4ec6e351d9624aa28bc15e7f6d6a6ebd926" "49acd691c89118c0768c4fb9a333af33e3d2dca48e6f79787478757071d64e68" "60ada0ff6b91687f1a04cc17ad04119e59a7542644c7c59fc135909499400ab8" "545ab1a535c913c9214fe5b883046f02982c508815612234140240c129682a68" "ce4234c32262924c1d2f43e6b61312634938777071f1129c7cde3ebd4a3028da" "c865644bfc16c7a43e847828139b74d1117a6077a845d16e71da38c8413a5aaa" "680f62b751481cc5b5b44aeab824e5683cf13792c006aeba1c25ce2d89826426" "631c52620e2953e744f2b56d102eae503017047fb43d65ce028e88ef5846ea3b" "2dd4951e967990396142ec54d376cced3f135810b2b69920e77103e0bcedfba9" "a138ec18a6b926ea9d66e61aac28f5ce99739cf38566876dc31e29ec8757f6e2" "683b3fe1689da78a4e64d3ddfce90f2c19eb2d8ab1bab1738a63d8263119c3f4" "2dc03dfb67fbcb7d9c487522c29b7582da20766c9998aaad5e5b63b5c27eec3f" "830596655dc39879096d9b7772768de6042fb5a4293c6b90c98a9b98bce96e4a" "7dc296b80df1b29bfc4062d1a66ee91efb462d6a7a934955e94e786394d80b71" "0ce768d3ea6d809292d12b22a5ff6de65e24a8d527e4e0885cf87640f42dff7d" "02f57ef0a20b7f61adce51445b68b2a7e832648ce2e7efb19d217b6454c1b644" "e3daa8f18440301f3e54f2093fe15f4fe951986a8628e98dcd781efbec7a46f2" "5586a5db9dadef93b6b6e72720205a4fa92fd60e4ccfd3a5fa389782eab2371b" "1aa4243143f6c9f2a51ff173221f4fd23a1719f4194df6cef8878e75d349613d" "7a4784fc0c0c853c578132e81a757a0f9b3e675fdd7e56303f3ee1fb8d7ae2a3" "8d3ef5ff6273f2a552152c7febc40eabca26bae05bd12bc85062e2dc224cde9a" "aec7b55f2a13307a55517fdf08438863d694550565dee23181d2ebd973ebd6b8" "7a424478cb77a96af2c0f50cfb4e2a88647b3ccca225f8c650ed45b7f50d9525" "944d52450c57b7cbba08f9b3d08095eb7a5541b0ecfb3a0a9ecd4a18f3c28948" "3199be8536de4a8300eaf9ce6d864a35aa802088c0925e944e2b74a574c68fd0" "443e2c3c4dd44510f0ea8247b438e834188dc1c6fb80785d83ad3628eadf9294" "554c2be54aecbbd3a6317906ada2e8f25f50f8d6bf3d9c22e3b30e3700d0bbd1" "5f128efd37c6a87cd4ad8e8b7f2afaba425425524a68133ac0efd87291d05874" "bf948e3f55a8cd1f420373410911d0a50be5a04a8886cabe8d8e471ad8fdba8e" "fb2c27e7ad4a81c2f57bceeca0faeb1c84fb7a167c097b998e2a1ea314455fd6" "47f3e55e4e3d570d5513d4cc58047dc059bd6ab3d135c796c4ccbfb77d4eb88b" "1070069a4671554a2c00b8375485896c1aa8144f5b8d99b86845069351770ee9" "e8483bc21cf667971eabdbb01203e3a471de1b59a4e532368b7a20f5665d686a" "b7bf7b95fb796614f0b36a7c4906a93db75ad0c6146f336c7ed085f6fceef93d" "05b767a3f3a37ac46353fd88f194934d82eb6c3644c3b8da883752f57513e7aa" default))
  '(package-selected-packages
-   '(exwm-firefox-evil exwm-firefox-core ayu-theme multi-vterm emmet-mode emmet multi-web-mode org-modern sudo-edit exwm dracula-theme dashboard treemacs-icons-dired ac-html html-mode hacker-typer autocomplete ac-slime rjsx-mode telega monkeytype evil-collection lsp-intellij lsp-mode yasnippet lsp-treemacs helm-lsp projectile hydra flycheck company avy which-key helm-xref dap-mode zenburn-theme json-mode)))
+   '(desktop-environment which-key use-package typescript-mode the-matrix-theme telega sudo-edit rjsx-mode rainbow-delimiters pyvenv python-mode paredit org-superstar org-modern monkeytype magit lsp-ui json-mode helpful general flycheck exwm-mff exwm-firefox-core elfeed-goodies doom-themes doom-modeline dap-mode counsel corfu consult company-box alsamixer all-the-icons-ivy-rich)))
 
 (custom-set-faces
  ;; custom-set-faces was added by Custom.