Change dashboard and vterm for work laptop
This commit is contained in:
		
							parent
							
								
									4d0c20712e
								
							
						
					
					
						commit
						2731861d46
					
				
					 3 changed files with 14 additions and 7 deletions
				
			
		| 
						 | 
					@ -144,6 +144,14 @@ The [[https://github.com/emacs-dashboard/emacs-dashboard][emacs-dashboard]] proj
 | 
				
			||||||
                              (rx " (" (zero-or-more any) eol) "" (emacs-version))))
 | 
					                              (rx " (" (zero-or-more any) eol) "" (emacs-version))))
 | 
				
			||||||
        (string-replace "\n" "" smaller-version)))
 | 
					        (string-replace "\n" "" smaller-version)))
 | 
				
			||||||
 | 
					
 | 
				
			||||||
 | 
					    (setq dashboard-startup-banner
 | 
				
			||||||
 | 
					          (if (ha-emacs-for-work?)
 | 
				
			||||||
 | 
					              "~/src/hamacs/support/teal-sticker.png"
 | 
				
			||||||
 | 
					            ;; Choose a random image from my collection of startup images:
 | 
				
			||||||
 | 
					            (thread-first "~/src/hamacs/support/dashboard"
 | 
				
			||||||
 | 
					                                                 (directory-files t (rx ".png"))
 | 
				
			||||||
 | 
					                                                 (seq-random-elt))))
 | 
				
			||||||
 | 
					
 | 
				
			||||||
    (setq dashboard-banner-logo-title
 | 
					    (setq dashboard-banner-logo-title
 | 
				
			||||||
          (format "Emacs %s — %s"
 | 
					          (format "Emacs %s — %s"
 | 
				
			||||||
                  (if (and (fboundp 'native-comp-available-p)
 | 
					                  (if (and (fboundp 'native-comp-available-p)
 | 
				
			||||||
| 
						 | 
					@ -151,10 +159,6 @@ The [[https://github.com/emacs-dashboard/emacs-dashboard][emacs-dashboard]] proj
 | 
				
			||||||
                      "with Native Compilation" "")
 | 
					                      "with Native Compilation" "")
 | 
				
			||||||
                  (ha-dashboard-version))
 | 
					                  (ha-dashboard-version))
 | 
				
			||||||
 | 
					
 | 
				
			||||||
          ;; Choose a random image from my collection of startup images:
 | 
					 | 
				
			||||||
          dashboard-startup-banner (thread-first "~/src/hamacs/support/dashboard"
 | 
					 | 
				
			||||||
                                                 (directory-files t (rx ".png"))
 | 
					 | 
				
			||||||
                                                 (seq-random-elt))
 | 
					 | 
				
			||||||
          dashboard-center-content t
 | 
					          dashboard-center-content t
 | 
				
			||||||
          dashboard-set-init-info t
 | 
					          dashboard-set-init-info t
 | 
				
			||||||
          dashboard-projects-switch-function 'project-switch-project
 | 
					          dashboard-projects-switch-function 'project-switch-project
 | 
				
			||||||
| 
						 | 
					
 | 
				
			||||||
| 
						 | 
					@ -101,7 +101,7 @@ Instead of memorizing all the Emacs-specific keybindings, we use [[https://githu
 | 
				
			||||||
        (">" python-indent-shift-left "Shift Left")
 | 
					        (">" python-indent-shift-left "Shift Left")
 | 
				
			||||||
        ("<" python-indent-shift-right "Shift Right"))
 | 
					        ("<" python-indent-shift-right "Shift Right"))
 | 
				
			||||||
       "Navigate/Eval"
 | 
					       "Navigate/Eval"
 | 
				
			||||||
       (("e" python-evaluate/body "Evaluate...")
 | 
					       (("e" python-evaluate/body "Eval...")
 | 
				
			||||||
        ("g" python-goto/body "Go to..."))
 | 
					        ("g" python-goto/body "Go to..."))
 | 
				
			||||||
       "Docs"
 | 
					       "Docs"
 | 
				
			||||||
       (("d" python-eldoc-at-point "Docs on Symbol")
 | 
					       (("d" python-eldoc-at-point "Docs on Symbol")
 | 
				
			||||||
| 
						 | 
					
 | 
				
			||||||
| 
						 | 
					@ -121,9 +121,12 @@ I'm not giving up on Eshell, but I am playing around with [[https://github.com/a
 | 
				
			||||||
 | 
					
 | 
				
			||||||
VTerm has an issue (at least for me) with ~M-Backspace~ not deleting the previous word, and yeah, I want to make sure that both keystrokes do the same thing.
 | 
					VTerm has an issue (at least for me) with ~M-Backspace~ not deleting the previous word, and yeah, I want to make sure that both keystrokes do the same thing.
 | 
				
			||||||
 | 
					
 | 
				
			||||||
#+begin_src emacs-lisp :tangle no
 | 
					#+begin_src emacs-lisp
 | 
				
			||||||
  (use-package vterm
 | 
					  (use-package vterm
 | 
				
			||||||
    :config
 | 
					    :config
 | 
				
			||||||
 | 
					    (setq vterm-shell "zsh"
 | 
				
			||||||
 | 
					          vterm-kill-buffer-on-exit t)
 | 
				
			||||||
 | 
					
 | 
				
			||||||
    (ha-leader
 | 
					    (ha-leader
 | 
				
			||||||
      "p t" '("terminal" . (lambda () (interactive) (ha-shell (project-root (project-current))))))
 | 
					      "p t" '("terminal" . (lambda () (interactive) (ha-shell (project-root (project-current))))))
 | 
				
			||||||
 | 
					
 | 
				
			||||||
| 
						 | 
					@ -154,7 +157,7 @@ The advantage of running terminals in Emacs is the ability to copy text without
 | 
				
			||||||
** Eat
 | 
					** Eat
 | 
				
			||||||
While not as fast as [[https://github.com/akermu/emacs-libvterm][vterm]], the [[https://codeberg.org/akib/emacs-eat][Emulate a Terminal]] project (eat) is fast enough, and doesn’t require a dedicate library that requires re-compilation. While offering [[https://elpa.nongnu.org/nongnu-devel/doc/eat.html][online documentation]], I’m glad for an [[info:eat#Top][Info version]].
 | 
					While not as fast as [[https://github.com/akermu/emacs-libvterm][vterm]], the [[https://codeberg.org/akib/emacs-eat][Emulate a Terminal]] project (eat) is fast enough, and doesn’t require a dedicate library that requires re-compilation. While offering [[https://elpa.nongnu.org/nongnu-devel/doc/eat.html][online documentation]], I’m glad for an [[info:eat#Top][Info version]].
 | 
				
			||||||
 | 
					
 | 
				
			||||||
#+BEGIN_SRC emacs-lisp
 | 
					#+BEGIN_SRC emacs-lisp :tangle no
 | 
				
			||||||
  (use-package eat
 | 
					  (use-package eat
 | 
				
			||||||
    :straight (:host codeberg :repo "akib/emacs-eat"
 | 
					    :straight (:host codeberg :repo "akib/emacs-eat"
 | 
				
			||||||
                     :files ("*.el" ("term" "term/*.el") "*.texi"
 | 
					                     :files ("*.el" ("term" "term/*.el") "*.texi"
 | 
				
			||||||
| 
						 | 
					
 | 
				
			||||||
		Loading…
	
		Reference in a new issue