diff --git a/home-manager/modules/programs/emacs/emacs.d/lib/az_deft.el b/home-manager/modules/programs/emacs/emacs.d/lib/az_deft.el index 397e5d2..7470e06 100644 --- a/home-manager/modules/programs/emacs/emacs.d/lib/az_deft.el +++ b/home-manager/modules/programs/emacs/emacs.d/lib/az_deft.el @@ -1,33 +1,34 @@ -(use-package deft - :ensure nil - :bind ("" . open-notes) - :commands (deft) - :config - (add-to-list 'evil-emacs-state-modes 'deft-mode) - (setq deft-extensions '("md") - deft-default-extension "md" - deft-markdown-mode-title-level 1 - deft-auto-save-interval 300.0 - deft-file-limit 50 - deft-use-filename-as-title nil - deft-use-filter-string-for-filename t - deft-strip-summary-regexp (concat "\\(" - "[\n\t]" ;; blank - "\\|^#\\+[[:upper:]_]+:.*$" ;; org-mode metadata - "^---\\(?:\n.*\\)*---.*$" - "\\)") +(when (boundp 'enable-notes) + (use-package deft + :ensure nil + :bind ("" . open-notes) + :commands (deft) + :config + (add-to-list 'evil-emacs-state-modes 'deft-mode) + (setq deft-extensions '("md") + deft-default-extension "md" + deft-markdown-mode-title-level 1 + deft-auto-save-interval 300.0 + deft-file-limit 50 + deft-use-filename-as-title nil + deft-use-filter-string-for-filename t + deft-strip-summary-regexp (concat "\\(" + "[\n\t]" ;; blank + "\\|^#\\+[[:upper:]_]+:.*$" ;; org-mode metadata + "^---\\(?:\n.*\\)*---.*$" + "\\)") - deft-recursive t) - (setq deft-file-naming-rules - '((noslash . "-") - (nospace . "_") - (case-fn . downcase))) - (setq deft-directory "~/nextcloud/10_documents/") - (add-hook 'deft-mode-hook (lambda() (display-line-numbers-mode -1))) + deft-recursive t) + (setq deft-file-naming-rules + '((noslash . "-") + (nospace . "_") + (case-fn . downcase))) + (setq deft-directory "~/nextcloud/10_documents/") + (add-hook 'deft-mode-hook (lambda() (display-line-numbers-mode -1))) - ;; A function to create a persp for my notes - (defun open-notes () - "Create a notes perspective and open deft" - (interactive) - (persp-switch "notes") - (deft))) + ;; A function to create a persp for my notes + (defun open-notes () + "Create a notes perspective and open deft" + (interactive) + (persp-switch "notes") + (deft)))) diff --git a/home-manager/modules/programs/emacs/emacs.d/lib/az_denote.el b/home-manager/modules/programs/emacs/emacs.d/lib/az_denote.el index 598ec71..e3a8680 100644 --- a/home-manager/modules/programs/emacs/emacs.d/lib/az_denote.el +++ b/home-manager/modules/programs/emacs/emacs.d/lib/az_denote.el @@ -1,23 +1,24 @@ -(use-package denote - :bind - (("C-c n r" . denote-rename-file) - ("C-c n p" . az-denote-create-new-note-from-region) - ("C-c n n" . denote)) - :config - (defun az-denote-create-new-note-from-region (beg end) - "Create note whose contents include the text between BEG and END. Prompt +(when (boundp 'enable-notes) + (use-package denote + :bind + (("C-c n r" . denote-rename-file) + ("C-c n p" . az-denote-create-new-note-from-region) + ("C-c n n" . denote)) + :config + (defun az-denote-create-new-note-from-region (beg end) + "Create note whose contents include the text between BEG and END. Prompt for title and keywords of the new note." - (interactive "r") - (if-let (((region-active-p)) - (text - (buffer-substring-no-properties beg end))) - (progn (denote - (denote-title-prompt) (denote-keywords-prompt)) (insert text)) - (user-error - "No region is available"))) - (add-hook 'find-file-hook #'denote-link-buttonize-buffer) - (setq denote-rename-buffer-mode 1 - denote-excluded-directories-regexp "99_archive" - denote-file-type "markdown-yaml" - denote-directory "~/nextcloud/10_documents/" - denote-yaml-front-matter "---\ntitle: %s\ndate: %s\ntags: %s\nidentifier: %S\n---\n\n")) + (interactive "r") + (if-let (((region-active-p)) + (text + (buffer-substring-no-properties beg end))) + (progn (denote + (denote-title-prompt) (denote-keywords-prompt)) (insert text)) + (user-error + "No region is available"))) + (add-hook 'find-file-hook #'denote-link-buttonize-buffer) + (setq denote-rename-buffer-mode 1 + denote-excluded-directories-regexp "99_archive" + denote-file-type "markdown-yaml" + denote-directory "~/nextcloud/10_documents/" + denote-yaml-front-matter "---\ntitle: %s\ndate: %s\ntags: %s\nidentifier: %S\n---\n\n"))) diff --git a/home-manager/modules/programs/emacs/emacs.d/template_variables.el b/home-manager/modules/programs/emacs/emacs.d/template_variables.el index 613a32a..9f4b238 100644 --- a/home-manager/modules/programs/emacs/emacs.d/template_variables.el +++ b/home-manager/modules/programs/emacs/emacs.d/template_variables.el @@ -4,5 +4,6 @@ ;;(setq enable-emojis t) ;;(setq enable-font t) ;;(setq enable-lantool t) +;;(setq enable-notes t) ;;(setq enable-pdf-tools t) ;;(setq enable-scroll-bar t)