JosephFerano/dotfiles
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

Emacs: Dape package and configuration, indent-bars and config

Browse Source
This commit is contained in:
Joseph Ferano 2024-02-14 13:03:30 +08:00
parent e854e540dd
commit 18cd27c699
1 changed files with 26 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

28
.config/emacs/init.org
View File

@ -246,9 +246,11 @@ Finish up
(setopt package-vc-selected-packages (setopt package-vc-selected-packages
'((dotenv :url "https://github.com/pkulev/dotenv.el") '((dotenv :url "https://github.com/pkulev/dotenv.el")
(indent-bars :url "https://github.com/jdtsmith/indent-bars")
(doom-themes :url "https://github.com/JosephFerano/doom-themes") (doom-themes :url "https://github.com/JosephFerano/doom-themes")
(pico8-mode :url "https://github.com/Kaali/pico8-mode") (pico8-mode :url "https://github.com/Kaali/pico8-mode")
(org-timeblock :url "https://github.com/ichernyshovvv/org-timeblock") (org-timeblock :url "https://github.com/ichernyshovvv/org-timeblock")
(dape :url "https://github.com/svaante/dape")
(app-launcher :url "https://github.com/SebastienWae/app-launcher"))) (app-launcher :url "https://github.com/SebastienWae/app-launcher")))
(package-initialize) (package-initialize)
@ -1732,7 +1734,6 @@ When called interactively, prompt for BUFFER."
(dirvish-dwim))) (dirvish-dwim)))
(when (boundp 'evil-mode) (when (boundp 'evil-mode)
(evil-define-key 'normal joe/evil-space-mode-map (kbd "_") #'project-dired)
(evil-define-key 'normal joe/evil-space-mode-map (kbd "-") #'joe/dirvish-up-dwim)) (evil-define-key 'normal joe/evil-space-mode-map (kbd "-") #'joe/dirvish-up-dwim))
(global-set-key (kbd "C-x d") #'dirvish-dwim) (global-set-key (kbd "C-x d") #'dirvish-dwim)
(global-set-key (kbd "C-x C-d") #'joe/dirvish-find-directory) (global-set-key (kbd "C-x C-d") #'joe/dirvish-find-directory)
@ -2187,6 +2188,12 @@ the right frame, I'm going to use the frame's name to close and remove the hook
#+begin_src emacs-lisp #+begin_src emacs-lisp
(require 'gdscript-mode) (require 'gdscript-mode)
#+end_src #+end_src
*** Indentation
#+begin_src emacs-lisp
(setq indent-bars-color '(highlight :face-bg t :blend 0.1))
(setq indent-bars-color-by-depth nil)
(global-set-key (kbd "C-x x i") #'indent-bars-mode)
#+end_src
** Game Dev ** Game Dev
#+begin_src emacs-lisp #+begin_src emacs-lisp
(add-to-list 'auto-mode-alist '("\\.vert\\'" . shader-mode)) (add-to-list 'auto-mode-alist '("\\.vert\\'" . shader-mode))
@ -2321,6 +2328,7 @@ it doesn't close it.
#+begin_src emacs-lisp #+begin_src emacs-lisp
(require 'disaster) (require 'disaster)
(setq c-default-style "bsd")
(defun joe/c-mode-hook () (defun joe/c-mode-hook ()
(local-set-key (kbd "C-x c r") (defun joe/make-run () (interactive) (compile "make run"))) (local-set-key (kbd "C-x c r") (defun joe/make-run () (interactive) (compile "make run")))
(local-set-key (kbd "C-x c c") (defun joe/make () (interactive) (compile "make"))) (local-set-key (kbd "C-x c c") (defun joe/make () (interactive) (compile "make")))
@ -2434,16 +2442,32 @@ and there's no need for a middle-man when it's already been implemented.
:dap-compilation "cargo build" :dap-compilation "cargo build"
:dap-compilation-dir "${workspaceFolder}")) :dap-compilation-dir "${workspaceFolder}"))
#+end_src #+end_src
*** GDB/GUD *** COMMENT GDB/GUD
#+begin_src emacs-lisp #+begin_src emacs-lisp
(setq gdb-many-windows t) (setq gdb-many-windows t)
(setq gud-tooltip-dereference t) (setq gud-tooltip-dereference t)
(defun joe/gdb ()
(interactive)
(gdb (format "%s -i=mi" (file-name-sans-extension buffer-file-name))))
(defun hook-gud-mode () (defun hook-gud-mode ()
(define-key gud-global-map (kbd "C-c") #'gud-cont) (define-key gud-global-map (kbd "C-c") #'gud-cont)
(define-key gud-global-map (kbd "C-r") #'gud-run)) (define-key gud-global-map (kbd "C-r") #'gud-run))
(add-hook 'gud-mode-hook #'hook-gud-mode) (add-hook 'gud-mode-hook #'hook-gud-mode)
#+end_src #+end_src
*** dape
#+begin_src emacs-lisp
(setq dape-buffer-window-arrangement 'right)
(defun joe/dape-toggle-breakpoint-and-rerun ()
(interactive)
(unless (dape--breakpoints-at-point)
(dape-breakpoint-toggle))
(dape-restart))
(define-key global-map (kbd "<f5>") #'joe/dape-toggle-breakpoint-and-rerun)
#+end_src
** org-mode ** org-mode
*** General *** General
#+begin_src emacs-lisp #+begin_src emacs-lisp