emacs: Add plantuml wrapper so org-mode can work with plantuml-server

home-manager/modules/emacs/config.org

@@ -1798,6 +1798,8 @@ Configuration
     (set-face-attribute 'org-verbatim nil :inherit '(shadow fixed-pitch))
     (set-face-attribute 'org-special-keyword nil :inherit '(font-lock-comment-face fixed-pitch))
     (set-face-attribute 'org-checkbox nil :inherit 'fixed-pitch)
+    (setq org-plantuml-exec-mode 'plantuml
+          org-plantuml-executable-path "plantuml-client")
 #+end_src
 
 =org-capture= allows creating and saving quick notes, links and TODOs

home-manager/modules/emacs/default.nix

@@ -8,6 +8,37 @@ with lib;
 let
   cfg = config.eboskma.programs.emacs;
 
+  plantuml-client = pkgs.writeShellApplication {
+    name = "plantuml-client";
+    runtimeInputs = with pkgs; [
+      coreutils
+      xh
+    ];
+
+    text = ''
+      type=
+      while getopts ":t:" option; do
+        case "''${option}" in
+          t)
+            type="''${OPTARG}";;
+          \?)
+            ;;
+        esac
+      done
+
+      tempfile=$(mktemp --suffix plantuml)
+
+      while IFS= read -r line; do
+        echo "''${line}" >> "''${tempfile}"
+      done
+
+      encoded=$(xh --print=b post http://localhost:5080/plantuml/coder Content-Type:text/plain < "''${tempfile}")
+      rm "''${tempfile}"
+
+      xh get "http://localhost:5080/plantuml/''${type}/''${encoded}"
+    '';
+  };
+
   tangleEmacsConfig =
     initFile:
     pkgs.runCommand "tangled-emacs-${initFile}" { } ''
@@ -173,6 +204,7 @@ in
         }))
         nixfmt-rfc-style
         python3
+        plantuml-client
       ]
       ++ (with aspellDicts; [
         en