Updated roam backup

features/lauretta/emacs/config.org

@@ -322,6 +322,22 @@ With prefix ARG, prompt for a pattern then select from matches."
 (define-key azos/beacon/keymap (kbd "t") #'azos/beacon/tail-log)
 #+end_src
 
+** Roam Backup
+
+#+begin_src emacs-lisp
+(defvar azos/roam/keymap (make-sparse-keymap)
+  "Keymap for org-roam commands (M-o r prefix).")
+
+(define-key azos/global-minor-mode/open-keymap (kbd "r") azos/roam/keymap)
+
+(defun azos/roam/backup ()
+  "Commit and push ~/roam to the remote git repo."
+  (interactive)
+  (async-shell-command "roam-backup" "*roam-backup*"))
+
+(define-key azos/roam/keymap (kbd "B") #'azos/roam/backup)
+#+end_src
+
 * Provide
 
 #+begin_src emacs-lisp

features/roam-backup/default.nix

@@ -0,0 +1,30 @@
+{...}: {
+  config.flake.modules.homeManager.roam-backup = {
+    lib,
+    config,
+    pkgs,
+    ...
+  }: {
+    options.azos.roam-backup.enable = lib.mkOption {
+      default = false;
+      example = true;
+      type = lib.types.bool;
+    };
+
+    config = lib.mkIf config.azos.roam-backup.enable {
+      home.packages = [
+        (pkgs.writeShellScriptBin "roam-backup" ''
+          set -e
+          cd "$HOME/roam"
+          git add -A
+          if git diff --cached --quiet; then
+            echo "Nothing to commit."
+          else
+            git commit -m "backup: $(date '+%Y-%m-%d %H:%M')"
+          fi
+          git push origin
+        '')
+      ];
+    };
+  };
+}