diff --git a/ox-hugo.el b/ox-hugo.el index b74b22a..791ba3d 100644 --- a/ox-hugo.el +++ b/ox-hugo.el @@ -6,7 +6,8 @@ ;; Matt Price ;; URL: https://github.com/kaushalmodi/ox-hugo ;; Package-Requires: ((emacs "24.5")) -;; Keywords: org, hugo, markdown +;; Keywords: Org, markdown, docs +;; Version: 0.1 ;; This file is part of GNU Emacs. @@ -593,7 +594,7 @@ a communication channel." (t (let ((anchor (format "{#%s}" ;https://gohugo.io/extras/crossreferences/ (or (org-element-property :CUSTOM_ID headline) - (org-hugo--slug title) + (org-hugo-slug title) ;; (org-export-get-reference headline info) ))) (loffset (plist-get info :hugo-level-offset)) @@ -604,7 +605,7 @@ a communication channel." ;;;;; Headline Helpers ;;;###autoload -(defun org-hugo--slug (str) +(defun org-hugo-slug (str) "Return a slug string for STR. STR is in Markdown format, most likely a Markdown heading. The returned slug string has the following specification: @@ -1285,7 +1286,7 @@ are \"toml\" and \"yaml\"." ;; Auto-set menu identifier if not already set by user. (unless (assoc 'identifier menu-alist) (let ((title (cdr (assoc 'title data)))) - (push `(identifier . ,(org-hugo--slug title)) menu-alist))) + (push `(identifier . ,(org-hugo-slug title)) menu-alist))) ;; Auto-set menu weight if not already set by user. (unless (assoc 'weight menu-alist)