Przeglądaj źródła

New option to turn off creator info.

Carsten Dominik 17 lat temu
rodzic
commit
f02b4baab3
3 zmienionych plików z 20 dodań i 4 usunięć
  1. 4 2
      doc/org.texi
  2. 6 0
      lisp/ChangeLog
  3. 10 2
      lisp/org-exp.el

+ 4 - 2
doc/org.texi

@@ -7761,8 +7761,10 @@ respective variable for details.
 @item @code{:TeX-macros}            @tab @code{org-export-with-TeX-macros}
 @item @code{:LaTeX-fragments}       @tab @code{org-export-with-LaTeX-fragments}
 @item @code{:fixed-width}           @tab @code{org-export-with-fixed-width}
-@item @code{:timestamps}           .@tab @code{org-export-with-timestamps}
-@item @code{:tags}                 .@tab @code{org-export-with-tags}
+@item @code{:timestamps}            @tab @code{org-export-with-timestamps}
+@item @code{:author-info}           @tab @code{org-export-author-info}
+@item @code{:creator-info}          @tab @code{org-export-creator-info}
+@item @code{:tags}                  @tab @code{org-export-with-tags}
 @item @code{:tables}                @tab @code{org-export-with-tables}
 @item @code{:table-auto-headline}   @tab @code{org-export-highlight-first-table-line}
 @item @code{:style}                 @tab @code{org-export-html-style}

+ 6 - 0
lisp/ChangeLog

@@ -1,3 +1,9 @@
+2008-06-26  Carsten Dominik  <dominik@science.uva.nl>
+
+	* org-exp.el (org-export-plist-vars, org-export-as-html):
+	Implement `org-export-creator-info'.
+	(org-export-creator-info): New option.
+
 2008-06-25  Carsten Dominik  <dominik@science.uva.nl>
 
 	* org.el (org-clock-drawer-start-re, org-clock-drawer-end-re)

+ 10 - 2
lisp/org-exp.el

@@ -209,6 +209,12 @@ e.g. \"author-info:nil\"."
   :group 'org-export-general
   :type 'boolean)
 
+(defcustom org-export-creator-info t
+  "Non-nil means, the postamle should contain a creator sentence.
+This sentence is \"HTML generated by org-mode XX in emacs XXX\"."
+  :group 'org-export-general
+  :type 'boolean)
+
 (defcustom org-export-time-stamp-file t
   "Non-nil means, insert a time stamp into the exported file.
 The time stamp shows when the file was created.
@@ -744,6 +750,7 @@ or if they are only using it locally."
     (:fixed-width          . org-export-with-fixed-width)
     (:timestamps           . org-export-with-timestamps)
     (:author-info          . org-export-author-info)
+    (:creator-info         . org-export-creator-info)
     (:time-stamp-file      . org-export-time-stamp-file)
     (:tables               . org-export-with-tables)
     (:table-auto-headline  . org-export-highlight-first-table-line)
@@ -3249,8 +3256,9 @@ lang=\"%s\" xml:lang=\"%s\">
 	    (insert "<p class=\"date\"> "
 		    (nth 2 lang-words) ": "
 		    date "</p>\n"))
-	  (insert (format "<p>HTML generated by org-mode %s in emacs %s<\p>\n"
-			  org-version emacs-major-version))
+	  (when org-export-creator-info
+	    (insert (format "<p>HTML generated by org-mode %s in emacs %s<\p>\n"
+			    org-version emacs-major-version)))
 	  (insert "</div>"))
 
 	(if org-export-html-with-timestamp