Added org-analyzer

user/app/doom-emacs/doom.org

@@ -346,7 +346,6 @@ Doom Emacs is traditionally installed by cloning the repository ([[https://githu
   `(org-agenda-date-weekend-today :inherit 'unspecified :foreground ,(nth 1 (nth 15 doom-themes--colors)) :weight bold :height 1.1)
 )
 
-
 (after! org (org-eldoc-load))
 
 (with-eval-after-load 'org (global-org-modern-mode))
@@ -824,6 +823,47 @@ exit
       "u" #'crdt-list-users
 )
 
+#+end_src
+*** Org Analyzer
+#+begin_src emacs-lisp :tangle config.el
+(require 'org-analyzer)
+(setq org-analyzer-wrapper-command "org-analyzer")
+(setq org-analyzer-jar-file-name "~/.nix-profile/bin/org-analyzer.jar")
+(setq org-analyzer-java-program "~/.nix-profile/bin/org-analyzer") ;; Is not actually java, buta  wrapper shell script
+
+(defun org-analyzer-start-process (org-dir)
+  "Start the org analyzer process .
+Argument ORG-DIR is where the org-files are located."
+  (org-analyzer-cleanup-process-state)
+  (unless (file-exists-p org-dir)
+    (warn "org-analyzer was started with org-directory set to
+  \"%s\"\nbut this directory does not exist.
+Please set the variable `org-directory' to the location where you keep your org files."
+           org-directory))
+    (let* ((name (format " *org-analyzer [org-dir:%s]*" org-dir))
+           (proc-buffer (generate-new-buffer name))
+           (proc nil))
+      (setq org-analyzer-process-buffer proc-buffer)
+      (with-current-buffer proc-buffer
+        (setq default-directory (if (file-exists-p org-dir)
+                                    org-dir default-directory)
+              proc (condition-case err
+                       (let ((process-connection-type nil)
+                             (process-environment process-environment))
+                         (start-process name
+                                        (current-buffer)
+                                        org-analyzer-wrapper-command
+                                        "--port"
+                                        (format "%d" org-analyzer-http-port)
+                                        "--started-from-emacs"
+                      (if (file-exists-p org-dir) org-dir "")))
+                     (error
+                      (concat "Can't start org-analyzer (%s: %s)"
+                (car err) (cadr err)))))
+        (set-process-query-on-exit-flag proc nil)
+        (set-process-filter proc #'org-analyzer-process-filter))
+      proc-buffer))
+
 #+end_src
 ** Org Roam Configuration
 *** Standard Org Roam Configuration
@@ -2083,6 +2123,7 @@ Any git package can be configured for a particular commit or branch:
 - =(unpin! pinned-package another-pinned-package)= to get bleeding edge instead of Doom's stability
 
 #+BEGIN_SRC emacs-lisp :tangle packages.el
+(package! org-analyzer :pin "0908eea")
 (package! embark :pin "0908eea")
 (package! dashboard)
 (package! direnv)
@@ -2183,6 +2224,7 @@ in
     hledger
     hunspell hunspellDicts.en_US-large
     (pkgs-emacs.mu.override { emacs = emacs29-pgtk; })
+    (pkgs.callPackage ./pkgs/org-analyzer.nix {})
     emacsPackages.mu4e
     isync
     msmtp