tweaking org-jira

2024-08-07 09:53:38 +02:00 · 2024-08-07 09:53:38 +02:00 · 9a54cc903e
commit 9a54cc903e
parent 46e6b9dc83
1 changed files with 61 additions and 30 deletions
--- a/init.org
+++ b/init.org
@ -720,36 +720,39 @@ This enables direnv globally.
 : [nil 26279 36119 854408 nil elpaca-process-queues nil nil 376000 nil]
 *** Org Configuration
 #+BEGIN_SRC emacs-lisp
-      (use-package org
-        :ensure nil
-        :custom
-        (org-agenda-skip-scheduled-if-done t)
-        (org-agenda-skip-deadline-if-done t)
-        (org-todo-keywords '((sequence "TODO(t)" "NEXT(n)" "WAITING(w)" "SOMEDAY(s)" "PROJ(p)"
-                                       "|" "DONE(d)" "CANCELED(c)")
-                             (sequence "[ ](T)" "[-](S)" "[?](W)"
-                                       "|" "[X](D)")
-                             (sequence "|" "OKAY(o)" "YES(y)" "NO(n)")))
-        (org-todo-keywords-for-agenda '((sequence "NEXT(n)" "TODO(t)" "WAITING(w)" "SOMEDAY(s)" "PROJ(p)" "|" "DONE(d)" "CANCELED(c)")))
-        (line-spacing 0.1)
-        (left-margin-width 2)
-        (right-margin-width 2)
-        (org-hide-emphasis-markers t)
-        (org-agenda-files (list "~/Dropbox/org/" "~/org/snamellit/" "~/org/customer/" "~/org/personal/"))
-        (org-refile-targets '(
-                              (org-agenda-files . (:level . 1))
-                              ("~/org/personal/bijen.org" . (:level . 1))
-                              ("~/org/personal/fitness.org" . (:level . 1))
-                              ))
-        :config
-        ;; set files for agenda views
-        (setq +org-capture-todo-file "~/Dropbox/org/inbox.org"
-              +org-capture-notes-file "~/Dropbox/org/inbox.org"
-              +org-capture-journal-file "~/Dropbox/org/journal.org"
-              +org-capture-projects-file "~/Dropbox/org/projects.org")
-        :hook
-        (org-mode . pti-org-mode-config)
-    )
+          (use-package org
+            :ensure nil
+            :custom
+            (org-agenda-skip-scheduled-if-done t)
+            (org-agenda-skip-deadline-if-done t)
+            (org-todo-keywords '((sequence "TODO(t)" "NEXT(n)" "WAITING(w)" "SOMEDAY(s)" "PROJ(p)"
+                                           "|" "DONE(d)" "CANCELED(c)")
+                                 (sequence "[ ](T)" "[-](S)" "[?](W)"
+                                           "|" "[X](D)")
+                                 (sequence "|" "OKAY(o)" "YES(y)" "NO(n)")))
+            (org-todo-keywords-for-agenda '((sequence "NEXT(n)" "TODO(t)" "WAITING(w)" "SOMEDAY(s)" "PROJ(p)" "|" "DONE(d)" "CANCELED(c)")))
+            (line-spacing 0.1)
+            (left-margin-width 2)
+            (right-margin-width 2)
+            (org-hide-emphasis-markers t)
+            (org-agenda-files (list "~/Dropbox/org/" "~/org/snamellit/" "~/org/customer/" "~/org/personal/"))
+            (org-refile-targets '(
+                                  (org-agenda-files . (:level . 1))
+                                  ("~/org/personal/bijen.org" . (:level . 1))
+                                  ("~/org/personal/fitness.org" . (:level . 1))
+                                  ))
+            :config
+            ;; set files for agenda views
+            (setq +org-capture-todo-file "~/Dropbox/org/inbox.org"
+                  +org-capture-notes-file "~/Dropbox/org/inbox.org"
+                  +org-capture-journal-file "~/Dropbox/org/journal.org"
+                  +org-capture-projects-file "~/Dropbox/org/projects.org")
+            :hook
+            (org-mode . pti-org-mode-config)
+            :bind (
+                   ("<leader> o a" . org-agenda)
+                   ("<leader> o s" . org-store-link)
+                   ))
 #+END_SRC

 #+RESULTS:
@ -1213,6 +1216,9 @@ Here is a snapshot of the keybindings dd <2024-07-30 Tue>.
       ))
    (make-directory "~/.org-jira" 'parents)
    (setq jiralib-url (auth-source-pass-get "url" "customer/jira"))
+    (setq org-jira-custom-jqls
+         '((:jql " assignee = currentUser() and project = TTRK order by priority DESC " :limit 100 :filename "~/Projects/timetrak/jira")
+          (:jql " assignee = currentUser() and createdDate >= '2024-01-01' order by created DESC " :limit 100 :filename "this-years-work")))
    (jiralib-login
     (auth-source-pass-get  "user" "customer/jira")
     (auth-source-pass-get 'secret "customer/jira")))
@ -1871,6 +1877,31 @@ Configures Elfeed, an RSS feed reader for Emacs:
 : [nil 26279 35504 577569 nil elpaca-process-queues nil nil 161000 nil]


+*** TODO OPML To Elfeed
+
+#+BEGIN_SRC emacs-lisp
+    (use-package opml-to-elfeed-feeds
+      :ensure (:host "codeberg.org" :repo "kakafarm/emacs-opml-to-elfeed-feeds"
+                     :main "opml-to-elfeed-feeds.el")
+      :custom (o2e-opml-list . (("https://craftering.systemcrafters.net/Craftering.opml" blog craftering opml-to-elfeed-feeds)))
+      :commands (o2e-opml-to-elfeed--update-o2e-efleed-feeds)
+      )
+#+END_SRC
+
+#+RESULTS:
+: [nil 26289 17361 350243 nil elpaca-process-queues nil nil 817000 nil]
+
+This does all kind of weird things. Apparently elpaca or use-package
+magically namespaces all the functions and for some reason it fails
+to require 'elfeed'. ... The weird thing is that the emacs lips
+feature is used to expand o2e to opml-to-elfeed-feeds, by setting the
+`read-symbol-shorthands` variable to `(("o2e"
+. "opml-to-elfeed-feeds"))`.
+
+Agreed with cow_2000 to create an issue on the repo with my
+recommendation for public API.
+
+
 ** Enable 0x0 to share snippets and files easily
 Configures the ~0x0~ package for easily sharing code snippets and files:
 #+BEGIN_SRC emacs-lisp