From a8b5ea339433a38c7534acbadff7dcc85ad2ae5e Mon Sep 17 00:00:00 2001
From: Andreas Zweili <andreas@zweili.ch>
Date: Mon, 4 Mar 2024 17:31:30 +0100
Subject: [PATCH] Revert "Remove hyperbole from Emacs"

This reverts commit 813bbf08c71e3a5a4f242ac180f2d08904f729f0.
---
 home-manager/modules/programs/emacs/default.nix        |  1 +
 .../modules/programs/emacs/emacs.d/lib/az_hyperbole.el | 10 ++++++++++
 home-manager/modules/programs/emacs/emacs.d/modules.el |  1 +
 3 files changed, 12 insertions(+)
 create mode 100644 home-manager/modules/programs/emacs/emacs.d/lib/az_hyperbole.el

diff --git a/home-manager/modules/programs/emacs/default.nix b/home-manager/modules/programs/emacs/default.nix
index 578f118..135d4b4 100644
--- a/home-manager/modules/programs/emacs/default.nix
+++ b/home-manager/modules/programs/emacs/default.nix
@@ -71,6 +71,7 @@ in
           epkgs.ht
           epkgs.htmlize
           epkgs.hydra
+          epkgs.hyperbole
           # epkgs.journalctl-mode
           epkgs.know-your-http-well
           epkgs.languagetool
diff --git a/home-manager/modules/programs/emacs/emacs.d/lib/az_hyperbole.el b/home-manager/modules/programs/emacs/emacs.d/lib/az_hyperbole.el
new file mode 100644
index 0000000..5716c4f
--- /dev/null
+++ b/home-manager/modules/programs/emacs/emacs.d/lib/az_hyperbole.el
@@ -0,0 +1,10 @@
+(use-package hyperbole
+  :config
+  ;; define the local variable az-user-dir to a path and then check if the directory exists
+  ;; if the directory exists then set the variable hbmap:dir-user to the path
+  (let ((az-user-dir (expand-file-name "~/nextcloud/10_documents/99_archive/0000/hyperbole/")))
+    (when (file-exists-p az-user-dir)
+      (setq hbmap:dir-user az-user-dir)))
+
+  (define-key hyperbole-mode-map (kbd "C-c /") nil)
+  (hyperbole-mode 1))
diff --git a/home-manager/modules/programs/emacs/emacs.d/modules.el b/home-manager/modules/programs/emacs/emacs.d/modules.el
index f92da1a..f168955 100644
--- a/home-manager/modules/programs/emacs/emacs.d/modules.el
+++ b/home-manager/modules/programs/emacs/emacs.d/modules.el
@@ -18,6 +18,7 @@
 (load-file (modules-path "az_deft_raw.el"))
 (load-file (modules-path "az_deft.el"))
 (load-file (modules-path "az_denote.el"))
+(load-file (modules-path "az_hyperbole.el"))
 (load-file (modules-path "az_langtool.el"))
 (load-file (modules-path "az_markdown.el"))
 (load-file (modules-path "az_move_text.el"))