ndwarshuis
/
org-mode
1
0
Fork 0
Code Issues Pull Requests Packages Projects Releases Wiki Activity

org-e-groff: Fix some functions names 

* contrib/lisp/org-e-groff.el (org-e-groff-latex-environment): Renamed
  from `org-e-groff-groff-environment'.
(org-e-groff-latex-fragment): Renamed from
`org-e-groff-groff-fragment'.
This commit is contained in:
Nicolas Goaziou 2012-09-22 11:26:54 +02:00
parent 97f7c51e8f
commit 6aaa9ff455
1 changed files with 9 additions and 9 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
contrib/lisp/org-e-groff.el
View File

@ -1241,14 +1241,14 @@ CONTENTS is nil. INFO is a plist holding contextual information."
((string= key "GROFF") value)
(t nil))))
;;; Groff Environment
;;; LaTeX Environment
(defun org-e-groff-groff-environment (groff-environment contents info)
"Transcode a GROFF-ENVIRONMENT element from Org to Groff.
(defun org-e-groff-latex-environment (latex-environment contents info)
"Transcode a LATEX-ENVIRONMENT element from Org to Groff.
CONTENTS is nil. INFO is a plist holding contextual information."
(let ((label (org-element-property :name groff-environment))
(let ((label (org-element-property :name latex-environment))
(value (org-remove-indentation
(org-element-property :value groff-environment))))
(org-element-property :value latex-environment))))
(if (not (org-string-nw-p label)) value
;; Environment is labelled: label must be within the environment
;; (otherwise, a reference pointing to that element will count
@ -1260,12 +1260,12 @@ CONTENTS is nil. INFO is a plist holding contextual information."
(insert (format "%s\n" label))
(buffer-string)))))
;;; Groff Fragment
;;; LaTeX Fragment
(defun org-e-groff-groff-fragment (groff-fragment contents info)
"Transcode a GROFF-FRAGMENT object from Org to Groff.
(defun org-e-groff-latex-fragment (latex-fragment contents info)
"Transcode a LATEX-FRAGMENT object from Org to Groff.
CONTENTS is nil. INFO is a plist holding contextual information."
(org-element-property :value groff-fragment))
(org-element-property :value latex-fragment))
;;; Line Break