Just use the input f-or-b-name

master
Kaushal Modi 7 years ago
parent c6c25f0475
commit be4d99436d
  1. 7
      ox-hugo.el

@ -3705,8 +3705,7 @@ Return output file's name."
;; (message "[org-hugo-export-to-md DBG] section-dir = %s" section-dir)
(unless subtreep
;; Below stuff applies only to *per-file* export flow.
(let* ((fname (or f-or-b-name (file-name-nondirectory (buffer-file-name))))
(title (format "%s" (or (car (plist-get info :title)) "<EMPTY TITLE>")))
(let* ((title (format "%s" (or (car (plist-get info :title)) "<EMPTY TITLE>")))
(all-tags-1 (plist-get info :hugo-tags))
(all-tags (when all-tags-1
(split-string
@ -3720,9 +3719,9 @@ Return output file's name."
(setq matched-exclude-tag exclude-tag)
(setq do-export nil))))
(if do-export
(message "[ox-hugo] Exporting `%s' (%s)" title fname)
(message "[ox-hugo] Exporting `%s' (%s)" title f-or-b-name)
(message "[ox-hugo] %s was not exported as it is tagged with an exclude tag `%s'"
fname matched-exclude-tag))))
f-or-b-name matched-exclude-tag))))
(when do-export
(prog1
(org-export-to-file 'hugo outfile async subtreep visible-only)

Loading…
Cancel
Save