~hristoast/dot-emacs

b2ee588bacf8d9c2f41a0c6db9677c4252bcddd0 — Hristos N. Triantafillou 9 months ago c953c91
Add a knob for that, and be smart about using it
1 files changed, 9 insertions(+), 4 deletions(-)

M lib/internals.el
M lib/internals.el => lib/internals.el +9 -4
@@ 3,7 3,11 @@
;; Tweaks to various Emacs internals.
;;; Code:

(defconst default-org-file "~/src/org/home.org")
;; This is here because it needs to happen before org mode is loaded
(let ((h/org-file (or (getenv "EMACS_DEFAULT_ORG_FILE")
                      "~/src/org/org_home.org")))
  (when (file-exists-p h/org-file)
      (defconst default-org-file h/org-file)))

(defvar whitespace-style
  '(spaces tabs newline space-mark tab-mark newline-mark face))


@@ 66,9 70,6 @@
 frame-title-format '("%f [%m]")
 ;; Don't automatically 'fix' files with DOS line endings
 inhibit-eol-conversion t
 ;; Org mode stuff
 org-log-done t
 org-agenda-files (list default-org-file)
 ;; No tabs
 indent-tabs-mode nil
 ;; "Tabs" are 4 spaces


@@ 76,6 77,10 @@
 ;; As advised by https://www.emacswiki.org/emacs/TrampMode
 tramp-default-method "ssh")

;; Set the default org file when it's bound
(when (boundp 'default-org-file)
  (setq-default org-agenda-files (list default-org-file)))

(unless (getenv "EMACS_NO_SAVE_PLACE")
  ;; https://git.sr.ht/~technomancy/better-defaults/tree/4c5409406ee35c5ba46880c6cfe98df4b14dc631/item/better-defaults.el#L65-66
  (save-place-mode 1))