summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorJambunathan K <kjambunathan@gmail.com>2011-10-23 13:20:41 +0530
committerJambunathan K <kjambunathan@gmail.com>2011-10-23 15:26:37 +0530
commit5082f2bbd49cfceca125b2de4a4c80dc53dff767 (patch)
treef519f83ad9c7296681df9683fec699b4d4675b2b
parent2c74df762bf2734abfc622ee125b212ed25c4258 (diff)
downloadorg-mode-5082f2bbd49cfceca125b2de4a4c80dc53dff767.tar.gz
org-odt.el: Rename some variables that affect inline images
* contrib/lisp/org-odt.el (org-export-odt-inline-images): Renamed from `org-odt-export-inline-images'. Also removed customizability. (org-export-odt-inline-image-extensions): Renamed from `org-odt-export-inline-image-extensions'. Also fixed the `:group' property. (org-odt-format-org-link): Propagate above changes.
-rw-r--r--contrib/lisp/org-odt.el24
1 files changed, 8 insertions, 16 deletions
diff --git a/contrib/lisp/org-odt.el b/contrib/lisp/org-odt.el
index c7b589c..17d1364 100644
--- a/contrib/lisp/org-odt.el
+++ b/contrib/lisp/org-odt.el
@@ -213,22 +213,14 @@ a per-file basis. For example,
(defvar org-export-odt-embed-images t
"Should the images be copied in to the odt file or just linked?")
-(defcustom org-odt-export-inline-images 'maybe
- "Non-nil means inline images into exported HTML pages.
-This is done using an <img> tag. When nil, an anchor with href is used to
-link to the image. If this option is `maybe', then images in links with
-an empty description will be inlined, while images with a description will
-be linked only."
- :group 'org-odt-export
- :type '(choice (const :tag "Never" nil)
- (const :tag "Always" t)
- (const :tag "When there is no description" maybe)))
-
-(defcustom org-odt-export-inline-image-extensions
+(defvar org-export-odt-inline-images 'maybe) ; counterpart of
+ ; `org-export-html-inline-images'
+
+(defcustom org-export-odt-inline-image-extensions
'("png" "jpeg" "jpg" "gif")
"Extensions of image files that can be inlined into HTML."
:type '(repeat (string :tag "Extension"))
- :group 'org-odt-export)
+ :group 'org-export-odt)
(defcustom org-export-odt-pixels-per-inch display-pixels-per-inch
;; FIXME add docstring
@@ -1315,9 +1307,9 @@ MAY-INLINE-P allows inlining it as an image."
((and (member type '("file"))
(not fragment)
(org-file-image-p
- filename org-odt-export-inline-image-extensions)
- (or (eq t org-odt-export-inline-images)
- (and org-odt-export-inline-images (not descp))))
+ filename org-export-odt-inline-image-extensions)
+ (or (eq t org-export-odt-inline-images)
+ (and org-export-odt-inline-images (not descp))))
(org-odt-format-inline-image thefile))
;; check for embedded formulas
((and (member type '("file"))