summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNicolas Goaziou <n.goaziou@gmail.com>2013-06-25 09:29:18 +0200
committerNicolas Goaziou <n.goaziou@gmail.com>2013-06-25 09:29:18 +0200
commita52a35779f973ccd2333103e3ed0661cb354ffdf (patch)
tree4cd6b43f30aa2f598404928b067a09180b52c9e8
parent42a9473aedfdc112846c9a54f09b9cfb9fec08e1 (diff)
downloadorg-mode-a52a35779f973ccd2333103e3ed0661cb354ffdf.tar.gz
ox: Remove useless dictionary entries
* lisp/ox.el (org-export-dictionary): Remove useless dictionary entries. * lisp/ox-ascii.el (org-ascii--build-caption): Apply removal.
-rw-r--r--lisp/ox-ascii.el8
-rw-r--r--lisp/ox.el10
2 files changed, 5 insertions, 13 deletions
diff --git a/lisp/ox-ascii.el b/lisp/ox-ascii.el
index 1884061..59d0152 100644
--- a/lisp/ox-ascii.el
+++ b/lisp/ox-ascii.el
@@ -665,11 +665,13 @@ caption keyword."
element info nil 'org-ascii--has-caption-p))
(title-fmt (org-ascii--translate
(case (org-element-type element)
- (table "Table %d: %s")
- (src-block "Listing %d: %s"))
+ (table "Table %d:")
+ (src-block "Listing %d:"))
info)))
(org-ascii--fill-string
- (format title-fmt reference (org-export-data caption info))
+ (concat (format title-fmt reference)
+ " "
+ (org-export-data caption info))
(org-ascii--current-text-width element info) info)))))
(defun org-ascii--build-toc (info &optional n keyword)
diff --git a/lisp/ox.el b/lisp/ox.el
index 7a2f157..472b9eb 100644
--- a/lisp/ox.el
+++ b/lisp/ox.el
@@ -5304,10 +5304,6 @@ them."
("fr"
:ascii "Programme %d :" :default "Programme nº %d :"
:latin1 "Programme %d :"))
- ("Listing %d: %s"
- ("fr"
- :ascii "Programme %d : %s" :default "Programme nº %d : %s"
- :latin1 "Programme %d : %s"))
("See section %s"
("de" :default "siehe Abschnitt %s")
("es" :default "vea seccion %s")
@@ -5317,12 +5313,6 @@ them."
("es" :default "Tabla %d")
("fr"
:ascii "Tableau %d :" :default "Tableau nº %d :" :latin1 "Tableau %d :"))
- ("Table %d: %s"
- ("de" :default "Tabelle %d: %s")
- ("es" :default "Tabla %d: %s")
- ("fr"
- :ascii "Tableau %d : %s" :default "Tableau nº %d : %s"
- :latin1 "Tableau %d : %s"))
("Table of Contents"
("ca" :html "&Iacute;ndex")
("cs" :default "Obsah")