# HG changeset patch
# User Carsten Dominik <dominik@science.uva.nl>
# Date 1232959219 0
# Node ID 9f423e1311174b6f29b01c441ef23084cf606bf0
# Parent  e7f67dc08ae31d66cda0a71f6146d25968c585b5
	* org-export-latex.el (org-export-as-latex): Call
	`org-export-latex-first-lines' with OPT-PLIST as a parameter.
	(org-export-latex-first-lines): New parameter OPT-PLIST.

diff -r e7f67dc08ae3 -r 9f423e131117 lisp/org/org-export-latex.el
--- a/lisp/org/org-export-latex.el	Mon Jan 26 08:39:48 2009 +0000
+++ b/lisp/org/org-export-latex.el	Mon Jan 26 08:40:19 2009 +0000
@@ -434,7 +434,7 @@
 		     (region-p nil)
 		     (t (plist-get opt-plist :skip-before-1st-heading))))
 	 (text (plist-get opt-plist :text))
-	 (first-lines (if skip "" (org-export-latex-first-lines rbeg)))
+	 (first-lines (if skip "" (org-export-latex-first-lines opt-plist rbeg)))
 	 (coding-system (and (boundp 'buffer-file-coding-system)
 			     buffer-file-coding-system))
 	 (coding-system-for-write (or org-export-latex-coding-system
@@ -771,7 +771,7 @@
 	     (toc (format "\\setcounter{tocdepth}{%s}\n\\tableofcontents\n\\vspace*{1cm}\n"
 			  (plist-get opt-plist :headline-levels))))))))
 
-(defun org-export-latex-first-lines (&optional beg)
+(defun org-export-latex-first-lines (opt-plist &optional beg)
   "Export the first lines before first headline.
 If BEG is non-nil, the is the beginning of he region."
   (save-excursion