From 08c3f930b7e607fc4d62b10ed8861744e7faed57 Mon Sep 17 00:00:00 2001 From: Arun Isaac Date: Thu, 31 Dec 2020 13:02:12 +0530 Subject: Prefix ksh-forms namespace. * ksh-forms-improved.el (org-keyword): Rename to ksh-forms-org-keyword. (org-latex-header): Rename to ksh-forms-org-latex-header. (org-keywords): Use ksh-forms-org-keyword. (org-latex-headers): Use ksh-forms-org-latex-header. (ksh-forms-org-latex-header): Use ksh-forms-org-keyword. --- ksh-forms-improved.el | 10 +++++----- 1 file changed, 5 insertions(+), 5 deletions(-) diff --git a/ksh-forms-improved.el b/ksh-forms-improved.el index 67f03b1..e46af85 100644 --- a/ksh-forms-improved.el +++ b/ksh-forms-improved.el @@ -69,14 +69,14 @@ (if (and text (not (string-blank-p text))) (princ (format "%s\n\n" text)))) -(defun org-keyword (keyword-value) (princ (format "#+%s: %s\n" (car keyword-value) (cdr keyword-value)))) +(defun ksh-forms-org-keyword (keyword-value) -(defun org-latex-header (header) - (org-keyword (cons "LATEX_HEADER" header))) +(defun ksh-forms-org-latex-header (header) + (ksh-forms-org-keyword (cons "LATEX_HEADER" header))) -(setfun org-keywords (mapped 'mapc 'org-keyword)) -(setfun org-latex-headers (mapped 'mapc 'org-latex-header)) +(setfun org-keywords (mapped 'mapc 'ksh-forms-org-keyword)) +(setfun org-latex-headers (mapped 'mapc 'ksh-forms-org-latex-header)) (defun forms-print () (interactive) -- cgit v1.2.3