;;; Package --- Summary ;;; Commentary: ;;; Code: ;; -*- lexical-binding: t; -*- (defvar my-laptop-p (equal (system-name) "lilitop")) (defvar my-server-p (and (equal (system-name) "localhost") (equal user-login-name "root"))) (defvar my-phone-p (not (null (getenv "ANDROID_ROOT"))) "If non-nil, GNU Emacs is running on Termux.") (when my-phone-p (defvar gnutls-algorithm-priority "NORMAL:-VERS-TLS1.3")) (global-auto-revert-mode) ; simplifies syncing (setq user-full-name "Amr Gharbeia") (defvar email-address "amr@gharbeia.net") (defvar calendar-latitude 39.0) (defvar calendar-longitude -77.1) (defvar calendar-location-name "Washington, DC") (defvar calendar-time-zone -300) (defvar calendar-standard-time-zone-name "EST") (defvar calendar-daylight-time-zone-name "EDT") (defvar org-directory (concat (getenv "HOME") "/org/")) (defvar org-gtd-directory org-directory) (defvar org-gtd-organize-hooks '(org-gtd-set-area-of-focus org-set-tags-command)) (defvar org-gtd-organize-hooks '(org-gtd-set-area-of-focus)) (defvar org-gtd-areas-of-focus '( "Atoms" "Bits" "Cells" "Flags" "Business" "Wealth" "Learning" "Skills" "Privacy" "Archive" "Library" "Writing" "Health" "Home" "Family" "Social" "Egypt" ) ) (defvar org-gtd-clarify-show-horizons 'right) (defvar org-default-notes-file (concat org-directory "/inbox.org")) (defvar org-capture-templates '( ("p" "Protocol" entry (file "inbox.org") "* %^{Title}\nSource: %u, %c\n #+BEGIN_QUOTE\n%i\n#+END_QUOTE\n\n\n%?" ) ("L" "Protocol Link" entry (file "inbox.org") "* %? [[%:link][%:description]]\n:PROPERTIES:\n:TITLE: %:description\n:URI: %:link\n:CREATED: %U\n:END:" :prepend nil :empty-lines 1 :created t :kill-buffer t ) ) ) (setq org-roam-directory org-directory) (setq org-roam-dailies-directory (concat org-roam-directory "daily")) (defvar org-attach-id-dir (concat org-directory "/library/documents")) (defvar calibredb-root-dir (concat (getenv "HOME") "/library/books")) (defvar calibredb-db-dir (expand-file-name "metadata.db" calibredb-root-dir)) (defvar calibredb-library-alist (concat (getenv "HOME") "/library/books")) (defvar org-noter-notes-search-path (list (concat org-directory "/library/books"))) (defvar org-noter-default-notes-file-names '("books.org")) (defvar bibtex-completion-bibliography '("~/bibliography/zotero.bib")) (provide 'custom) ;;; custom.el ends here