From 47c8386726dc3dd8d2fa76feeb6856511cdf5c2d Mon Sep 17 00:00:00 2001 From: Levi Neely <141506390+lneely@users.noreply.github.com> Date: Thu, 26 Sep 2024 21:19:00 +0200 Subject: [PATCH] org stuff and default font --- emacs/custom.el | 6 ++++-- emacs/module/module-org.el | 6 ++++-- 2 files changed, 8 insertions(+), 4 deletions(-) diff --git a/emacs/custom.el b/emacs/custom.el index 8ac6cb3..cfd1102 100644 --- a/emacs/custom.el +++ b/emacs/custom.el @@ -38,15 +38,17 @@ '(elfeed-feeds '("https://www.thenation.com/feed/?post_type=article" "https://feeds2.feedburner.com/google/RzFQ" "https://api.substack.com/feed/podcast/365422.rss" "https://stallman.org/rss/rss.xml" "https://danielpocock.com/feed.atom")) '(mc/always-run-for-all t) + '(menu-bar-mode nil) '(safe-local-variable-values '((flycheck-disabled-checkers emacs-lisp-checkdoc emacs-lisp))) - '(tab-width 2)) + '(tab-width 2) + '(tool-bar-mode nil)) (custom-set-faces ;; custom-set-faces was added by Custom. ;; If you edit it by hand, you could mess it up, so be careful. ;; Your init file should contain only one such instance. ;; If there is more than one, they won't work right. - '(default ((t (:weight regular :height 150 :width normal :foundry " " :family "Go Mono" :slant normal))))) + '(default ((t (:weight regular :height 120 :width normal :foundry "CF " :family "Space Mono" :slant normal))))) (provide 'custom) diff --git a/emacs/module/module-org.el b/emacs/module/module-org.el index bd2b1b8..d07b71d 100644 --- a/emacs/module/module-org.el +++ b/emacs/module/module-org.el @@ -9,6 +9,8 @@ (require 'module-pkg) (pkg/require 'org) (pkg/require 'ox-clip) +(pkg/require 'org-board) +(pkg/require 'org-index) (require 'org) (require 'org-agenda) @@ -37,10 +39,10 @@ (get-text-property 0 'org-hd-marker item))) (line (when marker (org-with-point-at marker - (buffer-substring (line-beginning-position) (line-end-position))))) + (buffer-substring (line-beginning-position) (line-end-position))))) (todo-keyword (when marker (org-with-point-at marker - (org-get-todo-state)))) + (org-get-todo-state)))) (truncated-line (when line (replace-regexp-in-string "^\\[#[A-Z]\\] " "" line)))) (if truncated-line