summary refs log tree commit diff
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)