summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJambunathan K <kjambunathan@gmail.com>2011-10-23 12:40:13 +0530
committerJambunathan K <kjambunathan@gmail.com>2011-10-23 15:26:21 +0530
commit08ac9121f51c2ae2dde8a0916db3411ccf5521fd (patch)
tree2041a60cf1daa683a8b280b2731cb18ea03b8526
parent49f18ef5be0935760c26c14f10e96cd489f35a6a (diff)
downloadorg-mode-08ac9121f51c2ae2dde8a0916db3411ccf5521fd.tar.gz
Rename org-export-odt-use-htmlfontify to org-export-odt-fontify-srcblocks
* contrib/lisp/org-odt.el (org-export-odt-use-htmlfontify): Replaced with `org-export-odt-fontify-srcblocks'. (org-export-odt-fontify-srcblocks): Renamed from `org-export-odt-use-htmlfontify'. (org-odt-format-source-code-or-example-plain) (org-export-odt-create-custom-styles-for-srcblocks) (org-odt-format-source-code-or-example-colored) (org-odt-format-source-code-or-example): Rename above variable.
-rw-r--r--contrib/lisp/org-odt.el14
1 files changed, 7 insertions, 7 deletions
diff --git a/contrib/lisp/org-odt.el b/contrib/lisp/org-odt.el
index 6f8d8dc..5cffd8c 100644
--- a/contrib/lisp/org-odt.el
+++ b/contrib/lisp/org-odt.el
@@ -1000,7 +1000,7 @@ styles congruent with the ODF-1.2 specification."
((string= s "\t") (org-odt-format-tabs))
(t (org-odt-format-spaces (length s))))) line))
-(defcustom org-export-odt-use-htmlfontify t
+(defcustom org-export-odt-fontify-srcblocks t
"Specify whether or not source blocks need to be fontified.
Turn this option on if you want to colorize the source code
blocks in the exported file. For colorization to work, you need
@@ -1024,7 +1024,7 @@ to make available an enhanced version of `htmlfontify' library."
(defun org-odt-format-source-code-or-example-plain
(lines lang caption textareap cols rows num cont rpllbl fmt)
"Format source or example blocks much like fixedwidth blocks.
-Use this when `org-export-odt-use-htmlfontify' option is turned
+Use this when `org-export-odt-fontify-srcblocks' option is turned
off."
(let* ((lines (org-split-string lines "[\r\n]"))
(line-count (length lines))
@@ -1100,7 +1100,7 @@ based on your current display settings. It is necessary that the
styles.xml already contains needed styles for colorizing to work.
This variable is effective only if
-`org-export-odt-use-htmlfontify' is turned on."
+`org-export-odt-fontify-srcblocks' is turned on."
:group 'org-export-odt
:type 'boolean)
@@ -1119,8 +1119,8 @@ Update styles.xml with styles that were collected as part of
(defun org-odt-format-source-code-or-example-colored
(lines lang caption textareap cols rows num cont rpllbl fmt)
"Format source or example blocks using `htmlfontify-string'.
-Use this routine when `org-export-odt-use-htmlfontify' option is
-turned on."
+Use this routine when `org-export-odt-fontify-srcblocks' option
+is turned on."
(let* ((lang-m (and lang (or (cdr (assoc lang org-src-lang-modes)) lang)))
(mode (and lang-m (intern (concat (if (symbolp lang-m)
(symbol-name lang-m)
@@ -1165,11 +1165,11 @@ turned on."
"Format source or example blocks for export.
Use `org-odt-format-source-code-or-example-plain' or
`org-odt-format-source-code-or-example-colored' depending on the
-value of `org-export-odt-use-htmlfontify."
+value of `org-export-odt-fontify-srcblocks."
(setq lines (org-export-number-lines
lines 0 0 num cont rpllbl fmt 'preprocess)
lines (funcall
- (or (and org-export-odt-use-htmlfontify
+ (or (and org-export-odt-fontify-srcblocks
(or (featurep 'htmlfontify)
(require 'htmlfontify))
(fboundp 'htmlfontify-string)