summaryrefslogtreecommitdiff
path: root/emacs/custom
diff options
context:
space:
mode:
authorFranck Cuny <franck@fcuny.net>2021-02-12 17:17:42 -0800
committerFranck Cuny <franck@fcuny.net>2021-02-12 17:17:42 -0800
commit37bcd39becdd9ad1bd908bce38277cb0aeed5b67 (patch)
tree9b84b9790dc96f0773d9f8dfe4d79dd7a1814e33 /emacs/custom
parentemacs: set proper font size for linux (diff)
parentemacs: some updates to org's ui (diff)
downloademacs.d-37bcd39becdd9ad1bd908bce38277cb0aeed5b67.tar.gz
Merge branch 'master' of ssh://git.fcuny.net:222/fcuny/dotfiles
Diffstat (limited to 'emacs/custom')
-rw-r--r--emacs/custom/fcuny-navigation.el23
-rw-r--r--emacs/custom/fcuny-org.el53
-rw-r--r--emacs/custom/fcuny-tramp.el5
3 files changed, 69 insertions, 12 deletions
diff --git a/emacs/custom/fcuny-navigation.el b/emacs/custom/fcuny-navigation.el
index 49309a5..42027fd 100644
--- a/emacs/custom/fcuny-navigation.el
+++ b/emacs/custom/fcuny-navigation.el
@@ -70,6 +70,29 @@
(use-package rg
:ensure t
+ :config
+ (rg-define-search fcuny/grep-git-or-dir
+ :query ask
+ :format regexp
+ :files "everything"
+ :confirm prefix
+ :flags ("--hidden -g !.git")
+ :dir (let ((vc (magit-toplevel)))
+ (if vc
+ vc
+ default-directory)))
+ (rg-define-search fcuny/grep-git-or-dir-todos
+ :query "TODO\|FIXME\|XXX"
+ :format regexp
+ :files "everything"
+ :confirm prefix
+ :flags ("--hidden -g !.git")
+ :dir (let ((vc (magit-toplevel)))
+ (if vc
+ vc
+ default-directory)))
+ :bind (("M-s g" . fcuny/grep-git-or-dir)
+ ("M-s t" . fcuny/grep-git-or-dir-todos))
:custom
(rg-group-result t)
(rg-show-columns t)
diff --git a/emacs/custom/fcuny-org.el b/emacs/custom/fcuny-org.el
index dded47a..d993f0b 100644
--- a/emacs/custom/fcuny-org.el
+++ b/emacs/custom/fcuny-org.el
@@ -20,9 +20,15 @@
(defvar fcuny/org-personal-notes-file
(concat fcuny/org-directory "/personal.org"))
+(defvar fcuny/org-personal-journal-file
+ (concat fcuny/org-directory "/journals/personal.org"))
+
(defvar fcuny/org-work-notes-file
(concat fcuny/org-directory "/twitter.org"))
+(defvar fcuny/org-work-journal-file
+ (concat fcuny/org-directory "/journals/twitter.org"))
+
(use-package htmlize
:ensure t)
@@ -63,6 +69,15 @@
(org-startup-indented t)
+ (org-ellipsis "↴")
+ (org-cycle-separator-lines 0)
+ (org-startup-folded 'content)
+ (org-todo-keywords '((type "TODO" "STARTED" "WAITING" "|" "DONE" "CANCELED")))
+ (org-todo-keyword-faces
+ '(("TODO" . (:foreground "red" :weight bold))
+ ("STARTED" . (:foreground "red" :weight bold))
+ ("WAITING" . (:foreground "blue" :weight bold))))
+
;; priorities
(org-priority-start-cycle-with-default nil) ;; Start one over/under default value.
(org-highest-priority ?1)
@@ -73,7 +88,10 @@
(calendar-week-start-day 1) ;; org-mode uses calendar for the date picker, and I want this to start on Monday
(org-agenda-start-on-weekday 1) ;; this is specific to org-agenda
(org-agenda-files `(,fcuny/org-personal-notes-file
- ,fcuny/org-work-notes-file))
+ ,fcuny/org-personal-journal-file
+ ,fcuny/org-work-notes-file
+ ,fcuny/org-work-journal-file
+ ,fcuny/org-references-file))
;; refile
(org-refile-use-cache nil)
@@ -122,32 +140,43 @@
(("Personal" :keys "p" :file fcuny/org-personal-notes-file :clock-in t :clock-resume t :children
(("Task" :keys "t" :todo-state "TODO" :headline "Tasks"
:template ("* %{todo-state} [#3] %^{Description}"
- ":PROPERTIES:" ":CREATED: %U" ":END:"
+ ":PROPERTIES:" ":CREATED: %T" ":END:"
"%?"))
("Note" :keys "n" :headline "Notes" :type entry
:template ("* %^{Description}"
- ":PROPERTIES:" ":CREATED: %U" ":END:"
+ ":PROPERTIES:" ":CREATED: %T" ":END:"
"%?"))
("Reading" :keys "r" :todo-state "TODO" :headline "Reading"
:template ("* %{todo-state} %^{Description}"
- ":PROPERTIES:" ":CREATED: %U" ":END:"
- "%a"))
+ ":PROPERTIES:" ":CREATED: %T" ":END:"
+ "%?"))
("Journal" :keys "j" :type entry :datetree t :tree-type week
- :template ("* %^{Description}"
- ":PROPERTIES:" ":CREATED: %U" ":END:"
+ :file fcuny/org-personal-journal-file
+ :template ("* journal"
+ ":PROPERTIES:" ":CREATED: %T" ":END:"
"%?"))))
("Work" :keys "w" :file fcuny/org-work-notes-file :clock-in t :clock-resume t :children
(("Tasks" :keys "t" :todo-state "TODO" :headline "Tasks"
:template ("* %{todo-state} [#3] %^{Description}"
- ":PROPERTIES:" ":CREATED: %U" ":END:"
+ ":PROPERTIES:" ":CREATED: %T" ":END:"
"%?"))
("Note" :keys "n" :headline "Notes" :type entry
:template ("* %^{Description}"
- ":PROPERTIES:" ":CREATED: %U" ":END:"
+ ":PROPERTIES:" ":CREATED: %T" ":END:"
+ "%?"))
+ ("Reading" :keys "r" :todo-state "TODO" :headline "Reading"
+ :template ("* %{todo-state} %^{Description}"
+ ":PROPERTIES:" ":CREATED: %T" ":END:"
+ "%?"))
+ ("Journal" :keys "j" :type entry :datetree t :tree-type month
+ :file fcuny/org-work-journal-file
+ :template ("* %U journal"
+ ":PROPERTIES:" ":CREATED: %T" ":END:"
"%?"))
- ("Meeting" :keys "m" :type entry :datetree t :tree-type week
- :template ("* meeting: %^{Description}"
- ":PROPERTIES:" ":CREATED: %U" ":END:"
+ ("Meeting" :keys "m" :type entry :datetree t :tree-type month
+ :file fcuny/org-work-journal-file
+ :template ("* %U meeting: %^{Description}"
+ ":PROPERTIES:" ":CREATED: %T" ":END:"
"%?")))))))))
(provide 'fcuny-org)
diff --git a/emacs/custom/fcuny-tramp.el b/emacs/custom/fcuny-tramp.el
new file mode 100644
index 0000000..52c035a
--- /dev/null
+++ b/emacs/custom/fcuny-tramp.el
@@ -0,0 +1,5 @@
+(use-package tramp
+ :custom
+ (tramp-default-method "ssh"))
+
+(provide 'fcuny-tramp)