Update Emacs config

This is mainly used by my work machine at the moment, but that should
change soon.

1 files changed, 0 insertions, 49 deletions

diff --git a/oni/home/config/pop-os/emacs.el b/oni/home/config/pop-os/emacs.el
index 4c97e3a..ffd0c79 100644
--- a/oni/home/config/pop-os/emacs.el
+++ b/oni/home/config/pop-os/emacs.el
@@ -403,41 +403,6 @@ Optional argument STOPP means stop on any defect."
     (find-file good-file-name)
     (vc-register)))
 
-(require 'dashboard)
-(dashboard-setup-startup-hook)
-(run-with-idle-timer 300 t (lambda () (switch-to-buffer dashboard-buffer-name)))
-(run-at-time "02:00" 86400 #'dashboard-open)
-;;;
-(setq dashboard-navigator-buttons `(((,(propertize " " 'display `(image :type svg :file ,(expand-file-name "search.svg" oni-gui-icons-dir) :ascent center :margin (5 . 0))) "Conversations" "Open pull requests"
-                                      (lambda (&rest _)
-                                        (browse-url "https://github.com/pulls?q=commenter%3Atomw-punt+review%3Achanges_requested+is%3Aopen"))
-                                      default "[" "]")
-                                     (,(propertize " " 'display `(image :type svg :file ,(expand-file-name "search.svg" oni-gui-icons-dir) :ascent center :margin (5 . 0))) "PRs" "Open pull requests"
-                                      (lambda (&rest _)
-                                        (browse-url "https://github.com/pulls?q=is%3Aopen+is%3Apr+org%3Ajuked-social+draft%3Afalse+review%3Anone+-author%3Aapp%2Fdependabot+-base%3Adev+-base%3Amain+-base%3Achanced_dev"))
-                                      default "[" "]"))
-                                    ((,(propertize " " 'display `(image :type svg :file ,(expand-file-name "search.svg" oni-gui-icons-dir) :ascent center :margin (5 . 0))) "back-end" "Unmerged into back-end"
-                                      (lambda (&rest _)
-                                        (browse-url "https://github.com/juked-social/social-api/compare/main...staging"))
-                                      default "[" "]")
-                                     (,(propertize " " 'display `(image :type svg :file ,(expand-file-name "search.svg" oni-gui-icons-dir) :ascent center :margin (5 . 0))) "chanced" "Unmerged into chanced front-end"
-                                      (lambda (&rest _)
-                                        (browse-url "https://github.com/juked-social/chanced-frontend/compare/main...staging"))
-                                      default "[" "]")
-                                     (,(propertize " " 'display `(image :type svg :file ,(expand-file-name "search.svg" oni-gui-icons-dir) :ascent center :margin (5 . 0))) "punt" "Unmerged into punt front-end"
-                                      (lambda (&rest _)
-                                        (browse-url "https://github.com/juked-social/punt-frontend/compare/main...staging"))
-                                      default "[" "]"))))
-(setq dashboard-startup-banner "~/code/personal/dotfiles/oni/home/services/emacs/pop-os-logo.svg")
-(setq dashboard-set-navigator t)
-(setq dashboard-set-footer nil)
-(setq dashboard-projects-show-base t)
-(setq dashboard-recentf-show-base t)
-
-(add-hook 'server-after-make-frame-hook #'dashboard-open)
-(add-hook 'dashboard-mode-hook 'olivetti-mode)
-(add-hook 'dashboard-after-initialize-hook (lambda () (setq truncate-lines t)))
-
 (setq browse-url-browser-function #'browse-url-generic)
 (setq browse-url-generic-args nil)
 (setq browse-url-generic-program "~/Downloads/glide/glide")
@@ -494,13 +459,6 @@ Optional argument STOPP means stop on any defect."
           (sql-server "localhost")
           (sql-port 5432))))
 
-(require 'oni-js)
-
-(with-eval-after-load 'sh-script (require 'oni-sh))
-(with-eval-after-load 'sql (require 'oni-sql))
-(with-eval-after-load 'outline (require 'oni-outline))
-(with-eval-after-load 'logview (require 'oni-logview))
-
 (eval-when-compile
   (require 'magit-section))
 
@@ -591,10 +549,3 @@ Optional argument STOPP means stop on any defect."
 
 (autoload 'vue-ts-mode "vue-ts-mode" nil t)
 (add-to-list 'auto-mode-alist (cons (rx ".vue" eos) 'vue-ts-mode))
-
-(stillness-mode)
-
-(setq vertico-posframe-poshandler 'posframe-poshandler-frame-bottom-center)
-(vertico-posframe-mode)
-
-(require 'oni-dumb-jump)