You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
46 lines
1.4 KiB
46 lines
1.4 KiB
;;; org-hugo-auto-export-mode.el --- Minor mode for auto-exporting using ox-hugo -*- lexical-binding: t -*- |
|
|
|
;; Authors: Kaushal Modi <kaushal.mod@gmail.com>, Evgeni Kolev <evgenysw@gmail.com> |
|
;; URL: https://ox-hugo.scripter.co |
|
|
|
;;; Commentary: |
|
;; |
|
;; This is a minor mode for enabling auto-exporting of Org files via |
|
;; ox-hugo. |
|
;; |
|
;; *It is NOT a stand-alone package.* |
|
|
|
;;; Usage: |
|
;; |
|
;; To enable this minor mode for a "content-org" directory, add below |
|
;; to the .dir-locals.el: |
|
;; |
|
;; (("content-org/" |
|
;; . ((org-mode . ((eval . (org-hugo-auto-export-mode))))))) |
|
|
|
;;; Code: |
|
|
|
(defun org-hugo-export-wim-to-md-after-save () |
|
"Function for `after-save-hook' to run `org-hugo-export-wim-to-md'. |
|
|
|
The exporting happens only when Org Capture is not in progress." |
|
(unless (eq real-this-command 'org-capture-finalize) |
|
(save-excursion |
|
(org-hugo-export-wim-to-md)))) |
|
|
|
;;;###autoload |
|
(define-minor-mode org-hugo-auto-export-mode |
|
"Toggle auto exporting the Org file using `ox-hugo'." |
|
:global nil |
|
:lighter "" |
|
(if org-hugo-auto-export-mode |
|
;; When the mode is enabled |
|
(progn |
|
(add-hook 'after-save-hook #'org-hugo-export-wim-to-md-after-save :append :local)) |
|
;; When the mode is disabled |
|
(remove-hook 'after-save-hook #'org-hugo-export-wim-to-md-after-save :local))) |
|
|
|
|
|
(provide 'org-hugo-auto-export-mode) |
|
|
|
;;; org-hugo-auto-export-mode.el ends here
|
|
|