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

Emacs: Add and configure org-download, machine specific config

Browse Source
This commit is contained in:
Joseph Ferano 2023-08-21 17:28:00 +07:00
parent 3d620bd862
commit d219ccadc2
1 changed files with 21 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

31
.config/emacs/init.org
View File

@ -225,6 +225,7 @@ Finish up
org-kanban org-kanban
org-fancy-priorities org-fancy-priorities
org-roam org-roam
org-download
;; Programming Languages ;; Programming Languages
highlight-quoted highlight-quoted
rustic rustic
@ -417,15 +418,16 @@ Setup other stuff
#+begin_src emacs-lisp #+begin_src emacs-lisp
(setq ring-bell-function 'ignore) (setq ring-bell-function 'ignore)
(add-to-list 'default-frame-alist '(undecorated . t)) (when (equal "flowjoe-f37" (system-name))
(add-to-list 'default-frame-alist '(fullscreen . maximized)) (add-to-list 'default-frame-alist '(undecorated . t))
(add-to-list 'default-frame-alist '(fullscreen . maximized)))
(add-to-list 'default-frame-alist '(vertical-scroll-bars . nil)) (add-to-list 'default-frame-alist '(vertical-scroll-bars . nil))
(setq default-frame-alist '( ;; (setq default-frame-alist '(
(vertical-scroll-bars) ;; (vertical-scroll-bars)
(right-divider-width . 5) ;; (right-divider-width . 5)
(tab-bar-lines . 0) ;; (tab-bar-lines . 0)
(internal-border-width . 12))) ;; (internal-border-width . 12)))
(add-hook 'text-mode-hook (lambda () (setq fill-column 80) (turn-on-auto-fill))) (add-hook 'text-mode-hook (lambda () (setq fill-column 80) (turn-on-auto-fill)))
(setq-default display-line-numbers 'relative) (setq-default display-line-numbers 'relative)
@ -491,7 +493,13 @@ Ligatures... are they that useful?
#+begin_src emacs-lisp #+begin_src emacs-lisp
;; (set-face-attribute 'default nil :family "Fira Code Nerd Font" :height 150) ;; (set-face-attribute 'default nil :family "Fira Code Nerd Font" :height 150)
(set-face-attribute 'default nil :family "JetBrainsMono Nerd Font Mono" :height 130) (let ((height (if (equal "flowjoe-f37" (system-name))
115
130)))
(set-face-attribute 'default nil :family "JetBrainsMono Nerd Font Mono" :height height))
;; (set-face-attribute 'default nil :family "JetBrainsMono Nerd Font Mono" :height 115)
;; (set-face-attribute 'variable-pitch nil :family "Source Code Pro" :height 120) ;; (set-face-attribute 'variable-pitch nil :family "Source Code Pro" :height 120)
(setq-default c-basic-offset 4) ;; This is annoying (setq-default c-basic-offset 4) ;; This is annoying
(setq-default indent-tabs-mode nil) (setq-default indent-tabs-mode nil)
@ -2257,7 +2265,7 @@ 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
** Org Mode ** Org-Mode
#+begin_src emacs-lisp #+begin_src emacs-lisp
(require 'org-bullets) (require 'org-bullets)
@ -2297,12 +2305,15 @@ and there's no need for a middle-man when it's already been implemented.
(defun joe/org-hook () (defun joe/org-hook ()
(local-set-key (kbd "C-. C-i") 'consult-org-heading) (local-set-key (kbd "C-. C-i") 'consult-org-heading)
(setq org-download-image-dir "./Images/")
(setq org-download-heading-lvl nil)
(org-fancy-priorities-mode) (org-fancy-priorities-mode)
(olivetti-mode) (olivetti-mode)
(org-bullets-mode) (org-bullets-mode)
(org-indent-mode)) (org-indent-mode))
(add-hook 'org-mode-hook 'joe/org-hook) (add-hook 'org-mode-hook 'joe/org-hook)
(require 'org-download)
(require 'org-kanban) (require 'org-kanban)
(require 'org-fancy-priorities) (require 'org-fancy-priorities)
;; (setq org-fancy-priorities-list '("🅰" "🅱" "🅲" "🅳" "🅴")) ;; (setq org-fancy-priorities-list '("🅰" "🅱" "🅲" "🅳" "🅴"))
@ -2321,7 +2332,7 @@ and there's no need for a middle-man when it's already been implemented.
(define-key global-map (kbd "C-c n c") #'org-roam-capture) (define-key global-map (kbd "C-c n c") #'org-roam-capture)
(org-roam-setup) (org-roam-setup)
(evil-define-key 'normal 'calendar-mode-map (kbd "RET") #'org-calendar-select) (evil-define-key 'normal calendar-mode-map (kbd "RET") #'org-calendar-select)
#+end_src #+end_src
** Magit ** Magit