diff --git a/ox-hugo.el b/ox-hugo.el index 4fae66b..26928ef 100644 --- a/ox-hugo.el +++ b/ox-hugo.el @@ -1580,7 +1580,8 @@ If the property is present but empty, the return value is the empty string. If the property is not present at all, nil is returned. In any other case, return the value as a string. Search is case-insensitive." - (let ((value-no-concat (org-entry-get pom property :inherit))) + (let ((sep (or sep "")) + (value-no-concat (org-entry-get pom property :inherit))) ;; (message "[ox-hugo section concat DBG] value-no-concat: %S" value-no-concat) (if value-no-concat ;; Get the value of PROPERTY from the parent relative to @@ -1616,7 +1617,9 @@ and the concatenated \"EXPORT_HUGO_SECTION*\" values as a path. Else, return the \"HUGO_SECTION\" path. -The function always returns a string." +The function always returns a string. + +INFO is a plist used as a communication channel." (let* ((hugo-section-kwd (directory-file-name (plist-get info :hugo-section))) ;Remove trailing slash if any (hugo-section-frag-prop (org-entry-get nil "EXPORT_HUGO_SECTION*" :inherit))