Bastien <bzg <at> gnu.org> writes:
> Brady Trainor <algebrat <at> uw.edu> writes:
>
> > For my solution, I changed insert to ignore.
>
> Can you provide your change in the form of a patch?
>
> 4. in Emacs, hit `C-x v =' from the file to create the patch
I wanted to return to this and attempt it, here is my first patch ever:
diff --git a/lisp/ox-odt.el b/lisp/ox-odt.el
index da2ca3f..8c7f0fe 100644
--- a/lisp/ox-odt.el
+++ b/lisp/ox-odt.el
@@ -1491,7 +1491,7 @@ original parsed data. INFO is a plist holding export
options."
(goto-char (match-beginning 0))
;; Preamble - Title, Author, Date etc.
- (insert
+ (ignore
(let* ((title (org-export-data (plist-get info :title) info))
(author (and (plist-get info :with-author)
(let ((auth (plist-get info :author)))
I installed a fresh version of org-mode from Elpa or Melpa before doing
this. (I am just now looking a little into the maint branch.)
In the long-long run, when I go to insert the code, I wonder why we don't
make removing the title an option in ox.el. Otherwise, I might've
considered figuring out how to expose the above ad-hoc solution as a
variable in the customize group. I don't know what the use cases are for
the title. So, a temporary solution might go, org-odt-export-preamble off
and on.
(ETA: then, perhaps the individual exporters should be focused on, before
considering pulling variables back to ox.el.)
Thank you always for org-mode,
Brady
P.S., so... I went ahead and tried the exposed variable fix, and that is
below: (This was my first shot at making a Emacs customizable variable,
blindly with no RTFM, and... I don't think it works as is.)
diff --git a/lisp/ox-odt.el b/lisp/ox-odt.el
index da2ca3f..c2b4609 100644
--- a/lisp/ox-odt.el
+++ b/lisp/ox-odt.el
@@ -351,6 +351,16 @@ the entity. See `org-odt--enumerate'.")
:group 'org-export)
+;;;; Insert Preamble (Title, Author...)
+
+(defcustom org-odt-insert-preamble 'nil
+ "Choose whether title and author preamble appears in export."
+ :group 'org-export-odt
+ :version "24.1"
+ :type 'boolean
+ )
+
+
;;;; Debugging
(defcustom org-odt-prettify-xml nil
@@ -1491,6 +1501,7 @@ original parsed data. INFO is a plist holding export
options."
(goto-char (match-beginning 0))
;; Preamble - Title, Author, Date etc.
+ (if org-odt-insert-preamble
(insert
(let* ((title (org-export-data (plist-get info :title) info))
(author (and (plist-get info :with-author)
@@ -1543,7 +1554,7 @@ original parsed data. INFO is a plist holding export
options."
(org-odt--format-timestamp (car date))
(org-export-data (plist-get info :date) info)))
;; Separator
- "<text:p text:style-name=\"OrgSubtitle\"/>"))))))
+ "<text:p text:style-name=\"OrgSubtitle\"/>")))))))
;; Table of Contents
(let* ((with-toc (plist-get info :with-toc))
(depth (and with-toc (if (wholenump with-toc)
