539 lines
20 KiB
EmacsLisp
539 lines
20 KiB
EmacsLisp
;;; $DOOMDIR/config.el -*- lexical-binding: t; -*-
|
|
|
|
;; Place your private configuration here! Remember, you do not need to run 'doom
|
|
;; sync' after modifying this file!
|
|
|
|
|
|
;; Some functionality uses this to identify you, e.g. GPG configuration, email
|
|
;; clients, file templates and snippets. It is optional.
|
|
(setq user-full-name "Aly Sewelam"
|
|
user-mail-address "linlysmolworthy@gmail.com")
|
|
|
|
;; Doom exposes five (optional) variables for controlling fonts in Doom:
|
|
;;
|
|
;; - `doom-font' -- the primary font to use
|
|
;; - `doom-variable-pitch-font' -- a non-monospace font (where applicable)
|
|
;; - `doom-big-font' -- used for `doom-big-font-mode'; use this for
|
|
;; presentations or streaming.
|
|
;; - `doom-unicode-font' -- for unicode glyphs
|
|
;; - `doom-serif-font' -- for the `fixed-pitch-serif' face
|
|
;;
|
|
;; See 'C-h v doom-font' for documentation and more examples of what they
|
|
;; accept. For example:
|
|
;;
|
|
(setq doom-font (font-spec :family "MiraCode" :size 13.5))
|
|
;;(font-spec :family "Fira Code" :size 12.5 :weight 'semi-light)
|
|
;; doom-variable-pitch-font (font-spec :family "Fira Sans" :size 13))
|
|
;;
|
|
;; If you or Emacs can't find your font, use 'M-x describe-font' to look them
|
|
;; up, `M-x eval-region' to execute elisp code, and 'M-x doom/reload-font' to
|
|
;; refresh your font settings. If Emacs still can't find your font, it likely
|
|
;; wasn't installed correctly. Font issues are rarely Doom issues!
|
|
|
|
;; There are two ways to load a theme. Both assume the theme is installed and
|
|
;; available. You can either set `doom-theme' or manually load a theme with the
|
|
;; `load-theme' function. This is the default:
|
|
(setq doom-theme 'doom-gruvbox)
|
|
(setq darkman-themes '(:light doom-gruvbox-light :dark doom-gruvbox))
|
|
;; This determines the style of line numbers in effect. If set to `nil', line
|
|
;; numbers are disabled. For relative line numbers, set this to `relative'.
|
|
(setq display-line-numbers-type 'relative)
|
|
(when (daemonp)
|
|
(add-hook 'server-after-make-frame-hook #'darkman-mode)
|
|
(advice-add 'darkman-mode
|
|
:after
|
|
(lambda ()
|
|
(remove-hook 'server-after-make-frame-hook
|
|
#'darkman-mode))))
|
|
;; If you use `org' and don't want your org files in the default location below,
|
|
;; change `org-directory'. It must be set before org loads!
|
|
(setq org-directory "~/org/")
|
|
|
|
|
|
;; Whenever you reconfigure a package, make sure to wrap your config in an
|
|
;; `after!' block, otherwise Doom's defaults may override your settings. E.g.
|
|
;;
|
|
;; (after! PACKAGE
|
|
;; (setq x y))
|
|
;;
|
|
;; The exceptions to this rule:
|
|
;;
|
|
;; - Setting file/directory variables (like `org-directory')
|
|
;; - Setting variables which explicitly tell you to set them before their
|
|
;; package is loaded (see 'C-h v VARIABLE' to look up their documentation).
|
|
;; - Setting doom variables (which start with 'doom-' or '+').
|
|
;;
|
|
;; Here are some additional functions/macros that will help you configure Doom.
|
|
;;
|
|
;; - `load!' for loading external *.el files relative to this one
|
|
;; - `use-package!' for configuring packages
|
|
;; - `after!' for running code after a package has loaded
|
|
;; - `add-load-path!' for adding directories to the `load-path', relative to
|
|
;; this file. Emacs searches the `load-path' when you load packages with
|
|
;; `require' or `use-package'.
|
|
;; - `map!' for binding new keys
|
|
;;
|
|
;; To get information about any of these functions/macros, move the cursor over
|
|
;; the highlighted symbol at press 'K' (non-evil users must press 'C-c c k').
|
|
;; This will open documentation for it, including demos of how they are used.
|
|
;; Alternatively, use `C-h o' to look up a symbol (functions, variables, faces,
|
|
;; etc).
|
|
;;
|
|
;; You can also try 'gd' (or 'C-c c d') to jump to their definition and see how
|
|
;; they are implemented.
|
|
|
|
|
|
;; org-roam
|
|
(use-package! org-roam
|
|
:custom
|
|
(org-roam-directory "~/org/Brain")
|
|
(org-roam-dailies-directory "daily/")
|
|
|
|
(org-roam-capture-templates
|
|
'(("d" "default" plain
|
|
(function org-roam-capture--get-point)
|
|
"%?"
|
|
:file-name "${slug}" ; <---------- see?
|
|
:head "#+title: ${title}\n#+created: %u\n#+last_modified: %U\n#+roam_tags:${tag}\n\n"
|
|
:unnarrowed t
|
|
:immediate-finish t :config)))
|
|
|
|
(org-roam-dailies-capture-templates
|
|
'(("d" "default" entry
|
|
"* %?"
|
|
:target (file+head "%<%Y-%m-%d>.org"
|
|
"#+title: %<%Y-%m-%d>\n"))))
|
|
:config
|
|
(org-roam-db-autosync-enable)
|
|
(require 'org-roam-dailies)
|
|
(require 'org-roam-graph)
|
|
(require 'org-roam-protocol))
|
|
|
|
(eval-after-load 'org-list
|
|
'(add-hook 'org-checkbox-statistics-hook (function ndk/checkbox-list-complete)))
|
|
|
|
(defun ndk/checkbox-list-complete ()
|
|
(save-excursion
|
|
(org-back-to-heading t)
|
|
(let ((beg (point)) end)
|
|
(end-of-line)
|
|
(setq end (point))
|
|
(goto-char beg)
|
|
(if (re-search-forward "\\[\\([0-9]*%\\)\\]\\|\\[\\([0-9]*\\)/\\([0-9]*\\)\\]" end t)
|
|
(if (match-end 1)
|
|
(if (equal (match-string 1) "100%")
|
|
;; all done - do the state change
|
|
(org-todo 'done)
|
|
)
|
|
(if (and (> (match-end 2) (match-beginning 2))
|
|
(equal (match-string 2) (match-string 3)))
|
|
(org-todo 'done)
|
|
(org-todo 'todo)
|
|
))))))
|
|
|
|
;; ctrl+a and ctrl+x is awesome
|
|
(evil-define-key '(normal visual) 'global (kbd "C-a") 'evil-numbers/inc-at-pt)
|
|
(evil-define-key '(normal visual) 'global (kbd "C-x") 'evil-numbers/dec-at-pt)
|
|
(evil-define-key '(normal visual) 'global (kbd "C-a") 'evil-numbers/inc-at-pt-incremental)
|
|
(evil-define-key '(normal visual) 'global (kbd "C-x") 'evil-numbers/dec-at-pt-incremental)
|
|
|
|
;; YAY I LOVE PRESSING s
|
|
(remove-hook 'doom-first-input-hook
|
|
#'evil-snipe-mode)
|
|
;; TABBSS
|
|
;; use tab indentation everywhere
|
|
(setq-default indent-tabs-mode t)
|
|
(setq-default tab-width 4) ; Assuming you want your tabs to be four spaces wide
|
|
(defvaralias 'c-basic-offset 'tab-width)
|
|
;;Chezmoi
|
|
(use-package chezmoi)
|
|
|
|
;; Silly Latex
|
|
(setq-default org-latex-toc-command "\\tableofcontents \\clearpage ")
|
|
|
|
;;org-caldav
|
|
(use-package! org-caldav
|
|
:init
|
|
;; This is the sync on close function; it also prompts for save after syncing so
|
|
;; no late changes get lost
|
|
;; (defun org-caldav-sync-at-close ()
|
|
;; (org-caldav-sync)
|
|
;; (save-some-buffers))
|
|
;;
|
|
;; This is the delayed sync function; it waits until emacs has been idle for
|
|
;; "secs" seconds before syncing. The delay is important because the caldav-sync
|
|
;; can take five or ten seconds, which would be painful if it did that right at save.
|
|
;; This way it just waits until you've been idle for a while to avoid disturbing
|
|
;; the user.
|
|
(setq-default org-caldav-inbox nil)
|
|
(defvar org-caldav-sync-timer nil
|
|
"Timer that `org-caldav-push-timer' used to reschedule itself, or nil.")
|
|
(defun org-caldav-sync-with-delay (secs)
|
|
(when org-caldav-sync-timer
|
|
(cancel-timer org-caldav-sync-timer))
|
|
(setq org-caldav-sync-timer
|
|
(run-with-idle-timer
|
|
(* 1 secs) nil 'org-caldav-sync)))
|
|
|
|
(setq org-caldav-files '("~/org/.archive/appointments.org"))
|
|
;; Actual calendar configuration edit this to meet your specific needs
|
|
(setq org-caldav-url "https://cloud.sewelam.org/remote.php/dav/calendars/Aly")
|
|
(setq org-caldav-calendars
|
|
'(
|
|
;; (:calendar-id "capture-1"
|
|
;; :files ("~/org/todo.org")
|
|
;; :inbox "~/org/todo.org")
|
|
(:calendar-id "work"
|
|
:files ("~/org/work.org")
|
|
;; :inbox "~/org/from_work.org"
|
|
)
|
|
(:calendar-id "home"
|
|
:files: ("~/org/home.org")
|
|
:inbox "~/org/home.org")
|
|
(:calendar-id "studies-1"
|
|
:files: ("~/org/studies.org")
|
|
:inbox "~/org/studies.org"
|
|
)
|
|
;; (:calendar-id "some-day-1"
|
|
;; :files: ("~/org/.archive/someday.org")
|
|
;; :inbox "~/org/.archive/someday.org")
|
|
))
|
|
(setq org-caldav-backup-file "~/org-caldav/org-caldav-backup.org")
|
|
(setq org-caldav-save-directory "~/org-caldav/")
|
|
(setq org-icalendar-categories '(local-tags))
|
|
|
|
:config
|
|
(setq org-icalendar-alarm-time 1)
|
|
(setq org-caldav-sync-direction 'org->cal)
|
|
;; This makes sure to-do items as a category can show up on the calendar
|
|
(setq org-icalendar-include-todo 'all)
|
|
(setq org-caldav-sync-todo nil)
|
|
(setq org-caldav-delete-calendar-entries 'always)
|
|
(setq org-caldav-delete-org-entries 'always)
|
|
;; This ensures all org "deadlines" show up, and show up as due dates
|
|
(setq org-icalendar-use-deadline '(todo-due))
|
|
;; This ensures "scheduled" org items show up, and show up as start times
|
|
(setq org-icalendar-use-scheduled '(todo-start))
|
|
;; Add the delayed save hook with a five minute idle timer
|
|
(add-hook 'after-save-hook
|
|
(lambda ()
|
|
(when (eq major-mode 'org-mode)
|
|
(org-caldav-sync-with-delay 300))))
|
|
;; Add the close emacs hook
|
|
;;(add-hook 'kill-emacs-hook 'org-caldav-sync-at-close)
|
|
(add-to-list 'org-caldav-todo-percent-states
|
|
'( 0 "IDEA")
|
|
)
|
|
(add-to-list 'org-caldav-todo-percent-states
|
|
'( 0 "WAIT")
|
|
)
|
|
)
|
|
(setq auth-sources '("~/.authinfo.gpg"))
|
|
|
|
;; MORE TEMPLATES
|
|
(after! org
|
|
(use-package! org-contacts
|
|
:after org
|
|
:custom (org-contacts-files '("~/org/contacts.org"))
|
|
)
|
|
|
|
(add-to-list 'org-capture-templates
|
|
'("c" "Contact" entry
|
|
(file+headline "~/org/contacts.org" "Contacts")
|
|
"* %^{Name|John Doe}
|
|
:PROPERTIES:
|
|
:PHONE: %^{Phone Number}
|
|
:ADDRESS: %^{Address}
|
|
:BIRTHDAY: %^{yyyy-mm-dd}
|
|
:EMAIL: %^{Email}
|
|
:NOTE: %^{NOTE}
|
|
:END:"
|
|
:empty-lines 1))
|
|
(add-to-list 'org-capture-templates
|
|
'("w" "Work" entry
|
|
(file+headline "~/org/work.org" "Inbox")
|
|
"* TODO [#A] %?\n %i" :empty-lines 1))
|
|
(add-to-list 'org-capture-templates
|
|
'("i" "Content idea" entry
|
|
(file+headline "~/org/work.org" "Ideas")
|
|
"* TODO %? :idea:\n %i" :empty-lines 1))
|
|
(add-to-list 'org-capture-templates
|
|
'("l" "Someday" entry
|
|
(file+headline "~/org/someday.org" "Inbox")
|
|
"* TODO %? \n %i " :empty-lines 1))
|
|
(add-to-list 'org-capture-templates
|
|
'("s" "Studies" entry
|
|
(file+headline "~/org/studies.org" "Inbox")
|
|
"* TODO [#C] %?\n %i" :empty-lines 1))
|
|
(add-to-list 'org-capture-templates
|
|
'("S" "Lecture" entry
|
|
(file+headline "~/org/studies.org" "Schedule")
|
|
"* %^{Subject} %^{Type|Lecture|Section}
|
|
:PROPERTIES:
|
|
:WILD_NOTIFY_BEFORE: %^{Reminders}
|
|
:LOCATION: %^{Location}
|
|
:END:
|
|
%^{Time}T"
|
|
:empty-lines 1))
|
|
;; add this for reminder stuff
|
|
;; :PROPERTIES:\n\n:WILD_NOTIFY_BEFORE: %^{Reminders}\n:END:\n
|
|
(add-to-list 'org-capture-templates
|
|
'("W" "Event" entry
|
|
(file+headline "~/org/work.org" "Schedule")
|
|
"* %^{Title} %^{Type|Meeting|Class}
|
|
|
|
:PROPERTIES:
|
|
:WILD_NOTIFY_BEFORE: %^{Reminders}
|
|
:LOCATION: %^{Location}
|
|
:END:
|
|
%^{Time}T"
|
|
:empty-lines 1))
|
|
(add-to-list 'org-capture-templates
|
|
'("H" "Home Event" entry
|
|
(file+headline "~/org/home.org" "Schedule")
|
|
"* %^{Title} %^{Type|Meeting|Class}
|
|
:PROPERTIES:
|
|
:WILD_NOTIFY_BEFORE: %^{Reminders}
|
|
:LOCATION: %^{Location}
|
|
:END:
|
|
%^{Time}T"
|
|
:empty-lines 1))
|
|
(add-to-list 'org-capture-templates
|
|
'("h" "Home" entry
|
|
(file+headline "~/org/home.org" "Inbox")
|
|
"* TODO [#A] %?\n %i" :empty-lines 1))
|
|
(add-to-list 'org-capture-templates
|
|
'("b" "Quote" plain
|
|
(file "~/org/quotes.org")
|
|
"%i" :empty-lines 0))
|
|
(setq-default org-archive-location "~/org/.archive/%s_archive::* Finished Tasks")
|
|
|
|
;; Import ox-latex to get org-latex-classes and other funcitonality
|
|
;; for exporting to LaTeX from org
|
|
(use-package! ox-latex
|
|
:init
|
|
;; code here will run immediately
|
|
:config
|
|
;; code here will run after the package is loaded
|
|
(setq org-latex-pdf-process
|
|
'("pdflatex -interaction nonstopmode -output-directory %o %f"
|
|
"bibtex %b"
|
|
"pdflatex -interaction nonstopmode -output-directory %o %f"
|
|
"pdflatex -interaction nonstopmode -output-directory %o %f"))
|
|
(setq org-latex-with-hyperref nil) ;; stop org adding hypersetup{author..} to latex export
|
|
;; (setq org-latex-prefer-user-labels t)
|
|
|
|
;; deleted unwanted file extensions after latexMK
|
|
(setq org-latex-logfiles-extensions
|
|
(quote ("lof" "lot" "tex~" "aux" "idx" "log" "out" "toc" "nav" "snm" "vrb" "dvi" "fdb_latexmk" "blg" "brf" "fls" "entoc" "ps" "spl" "bbl" "xmpi" "run.xml" "bcf" "acn" "acr" "alg" "glg" "gls" "ist")))
|
|
|
|
(unless (boundp 'org-latex-classes)
|
|
(setq org-latex-classes nil))
|
|
(use-package! ox-extra
|
|
:config
|
|
(ox-extras-activate '(latex-header-blocks ignore-headlines)))
|
|
;; (setq-default org-startup-folded 'content)
|
|
))
|
|
(after! ox
|
|
(use-package! ox-hugo
|
|
))
|
|
(setq-default cache-long-scans nil)
|
|
|
|
;; zsh pls
|
|
(setq explicit-shell-file-name "/usr/bin/zsh")
|
|
(setq shell-file-name "zsh")
|
|
(setq explicit-zsh-args '("--login" "--interactive"))
|
|
(defun zsh-shell-mode-setup ()
|
|
(setq-local comint-process-echoes t))
|
|
(add-hook 'shell-mode-hook #'zsh-shell-mode-setup)
|
|
|
|
(after! telega
|
|
(telega-notifications-mode 1))
|
|
(setq-default org-export-with-broken-links t)
|
|
(setq org-modern-label-border 0.1)
|
|
(global-org-modern-mode)
|
|
(add-hook 'python-mode-hook #'flymake-ruff-load)
|
|
;; Jetbrains comment keybind )
|
|
(evil-define-key '(normal insert) 'global (kbd "C-/") 'comment-line)
|
|
(evil-define-key '(visual) 'global (kbd "C-/") 'comment-dwim)
|
|
(evil-define-key '(normal visual) 'global (kbd "C-b") 'comment-box)
|
|
(setq-default ispell-dictionary "british")
|
|
(setq-default org-log-into-drawer "LOGBOOK")
|
|
|
|
;; binds for ctrl+hjkl
|
|
(evil-define-key '(normal insert) 'global (kbd "C-h") 'evil-window-left)
|
|
(evil-define-key '(normal insert) 'global (kbd "C-j") 'evil-window-down)
|
|
(evil-define-key '(normal insert) 'global (kbd "C-k") 'evil-window-up)
|
|
(evil-define-key '(normal insert) 'global (kbd "C-l") 'evil-window-right)
|
|
(setq conda-env-home-directory "~/anaconda3")
|
|
|
|
(ranger-override-dired-mode t)
|
|
;; ("\\.pdf\\'" . default) is already member in `org-file-apps'
|
|
;; Use "xdg-open" to open files by default
|
|
;; (setcdr (assq t org-file-apps-gnu) 'browse-url-xdg-open)
|
|
(setq doc-view-continuous t)
|
|
(setq telega-open-file-function 'org-open-file)
|
|
(setq org-log-done 'time)
|
|
|
|
|
|
;; (use-package! org-alert
|
|
;; :config
|
|
;; (setq alert-default-style 'libnotify)
|
|
;; (setq org-alert-interval 300
|
|
;; org-alert-notify-cutoff 10
|
|
;; org-alert-notify-after-event-cutoff 10)
|
|
|
|
;; 'org-alert-enable
|
|
;; :ensure t
|
|
;; )
|
|
(setq org-wild-notifier-predicate-blacklist
|
|
'((lambda (marker)
|
|
(-contains? (org-entry-properties marker 'all)
|
|
'("STYLE" . "habit")))))
|
|
;; processing things
|
|
(autoload 'processing-mode "processing-mode" "Processing mode" t)
|
|
(add-to-list 'auto-mode-alist '("\\.pde$" . processing-mode))
|
|
(setq-default processing-location "~/bin/processing-java")
|
|
;; idk what this is
|
|
;;org-agenda filter
|
|
(custom-set-variables
|
|
'(org-agenda-custom-commands
|
|
'(("c" "Custom agenda, ignore someday tag"
|
|
((agenda ""))
|
|
((org-agenda-tag-filter-preset '("-someday")))))))
|
|
|
|
;;Setup prayer times mashallah
|
|
;; (use-package! awqat
|
|
;; :commands (awqat-display-prayer-time-mode
|
|
;; awqat-times-for-day)
|
|
;; :config
|
|
;; (setq calendar-latitude 30.87605680
|
|
;; calendar-longitude 29.74260400
|
|
;; awqat-mode-line-format " 🕌 ${prayer} (${hours}h${minutes}m) "))
|
|
;; (add-hook 'doom-after-init-hook #'awqat-display-prayer-time-mode)
|
|
;; (add-hook 'doom-after-init-hook #'org-alert-enable)
|
|
(add-hook 'doom-after-init-hook #'org-wild-notifier-mode)
|
|
(load-file "~/.config/doom/ox-ipynb.el")
|
|
|
|
;;no auto () when chat mode
|
|
(add-hook 'telega-chat-mode-hook #'turn-off-smartparens-mode)
|
|
|
|
|
|
;;EMAIL? IN EMAKS?? OH YEA
|
|
;; Each path is relative to the path of the maildir you passed to mu
|
|
(add-to-list 'load-path "/usr/local/share/emacs/site-lisp/mu4e")
|
|
(after! mu4e
|
|
(set-email-account! "Gmail"
|
|
'((mu4e-sent-folder . "/gmail/[Gmail].Sent Mail")
|
|
(mu4e-drafts-folder . "/gmail/[Gmail].Drafts")
|
|
(mu4e-trash-folder . "/gmail/[Gmail].Trash")
|
|
(mu4e-refile-folder . "/gmail/[Gmail].All Mail")
|
|
(smtpmail-smtp-user . "thatguymax9001@gmail.com")
|
|
(mu4e-compose-signature . "---\nAly Sewelam"))
|
|
t)
|
|
|
|
(set-email-account! "Work"
|
|
'((mu4e-sent-folder . "/work/[Work].Sent Mail")
|
|
(mu4e-drafts-folder . "/work/[Work].Drafts")
|
|
(mu4e-trash-folder . "/work/[Work].Trash")
|
|
(mu4e-refile-folder . "/work/[Work].All Mail")
|
|
(smtpmail-smtp-user . "linlysmolworthy@gmail.com")
|
|
(mu4e-compose-signature . "---\nLIN LEE"))
|
|
t)
|
|
(setq-default mu4e-update-interval 300)
|
|
)
|
|
|
|
;; Telega and ranger
|
|
(map! :leader
|
|
:nv "o g" #'telega
|
|
:nv "o r" #'ranger
|
|
:nv "o p" #'org-pomodoro
|
|
:nv "n d" #'org-agenda-day-view
|
|
:nv "n w" #'org-agenda-week-view
|
|
)
|
|
(setq-default org-roam-extract-new-file-path "${slug}.org" )
|
|
|
|
;;org latex moment
|
|
(setq-default org-latex-toc-command "\\clearpage \\tableofcontents \\clearpage")
|
|
(add-hook 'doc-view-mode-hook 'auto-revert-mode)
|
|
|
|
(defun disable-dunst-notifs ()
|
|
(call-process-shell-command "dunstctl set-paused true"))
|
|
|
|
(defun enable-dunst-notifs ()
|
|
(call-process-shell-command "dunstctl set-paused false"))
|
|
|
|
(add-hook 'org-pomodoro-started-hook #'disable-dunst-notifs)
|
|
(add-hook 'org-pomodoro-finished-hook #'enable-dunst-notifs)
|
|
(add-hook 'org-pomodoro-killed-hook #'enable-dunst-notifs)
|
|
|
|
(setq org-pomodoro-play-sounds t)
|
|
(setq-default doom-modeline-buffer-file-name-style 'file-name-with-project)
|
|
(setq chezmoi-command "/home/linly/bin/chezmoi")
|
|
(setq auto-save-visited-mode t)
|
|
(setq auto-save-visited-interval 10)
|
|
(auto-save-visited-mode +1)
|
|
(setq alert-default-style 'libnotify)
|
|
(setq org-pomodoro-finished-sound "~/Music/yippee.wav")
|
|
(setq org-pomodoro-short-break-sound "~/Music/shortbreak.wav")
|
|
(setq org-pomodoro-long-break-sound "~/Music/longbreak.wav")
|
|
(setq x-select-enable-clipboard-manager nil)
|
|
(setq org-trello-files '("~/org/grad-trello.org"))
|
|
(setq straight-disable-native-compile '("org-trello") )
|
|
(setq org-agenda-span 'day)
|
|
(setq org-agenda-start-day "-0d")
|
|
(setq org-agenda-start-with-clockreport-mode t)
|
|
|
|
;;this is for rest api testing in emacs )
|
|
(map! :leader
|
|
:nv "v s" #'verb-send-request-on-point-other-window-stay
|
|
:nv "v r" #'verb-re-send-request
|
|
:nv "v k" #'verb-kill-all-response-buffers
|
|
)
|
|
|
|
(setq verb-auto-kill-response-buffers 5)
|
|
(setq verb-trim-body-end "[ \t\n\r]+")
|
|
(org-babel-do-load-languages
|
|
'org-babel-load-languages
|
|
'((verb . t)))
|
|
(setq org-agenda-skip-scheduled-if-done t)
|
|
(setq org-agenda-skip-deadline-if-done t)
|
|
(setq org-agenda-skip-timestamp-if-done t)
|
|
(setq org-pomodoro-format "Work~%s")
|
|
(setq org-pomodoro-short-break-format "Br~%s")
|
|
(setq org-pomodoro-length 20)
|
|
(setq org-pomodoro-short-break-length 10)
|
|
(setq org-pomodoro-long-break-format "Br~%s")
|
|
(setq org-clock-clocked-in-display nil)
|
|
(setq doom-modeline-major-mode-icon t)
|
|
(setq org-agenda-skip-deadline-prewarning-if-scheduled t)
|
|
|
|
(setq mu4e-root-maildir "~/.mail")
|
|
(setq +mu4e-backend 'offlineimap)
|
|
(add-to-list 'load-path "/usr/local/share/emacs/site-lisp/mu4e")
|
|
;; (add-hook 'org-agenda-mode-hook
|
|
;; (lambda ()
|
|
;; (setq-local doom-modeline-buffer-name nil)))
|
|
;; Define your custom doom-modeline
|
|
;; (doom-modeline-def-modeline 'minimal-line
|
|
;; '(bar matches buffer-info remote-host buffer-position parrot selection-info)
|
|
;; '(misc-info input-method buffer-encoding))
|
|
;; (add-to-list 'doom-modeline-mode-alist '(org-agenda-mode . minimal-line))
|
|
;; case insensitive search )
|
|
(defun case-insensitive-org-roam-node-read (orig-fn &rest args)
|
|
(let ((completion-ignore-case t))
|
|
(apply orig-fn args)))
|
|
|
|
(advice-add 'org-roam-node-read :around #'case-insensitive-org-roam-node-read)
|
|
(defun org-archive-done-tasks ()
|
|
(interactive)
|
|
(org-map-entries
|
|
(lambda ()
|
|
(org-archive-subtree)
|
|
(setq org-map-continue-from (org-element-property :begin (org-element-at-point))))
|
|
"/DONE" 'agenda)
|
|
(org-save-all-org-buffers))
|
|
;; (add-hook 'kill-emacs-hook 'org-archive-done-tasks)
|
|
;;why my agenda break haa?
|
|
(setq org-element-use-cache nil)
|