From mboxrd@z Thu Jan 1 00:00:00 1970 From: tsd@tsdye.com (Thomas S. Dye) Subject: [PATCH] Longtable continuation strings customizable Date: Sat, 26 Oct 2013 14:42:05 -1000 Message-ID: Mime-Version: 1.0 Content-Type: multipart/mixed; boundary="=-=-=" Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:55242) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1VaERA-0005eb-Lp for emacs-orgmode@gnu.org; Sat, 26 Oct 2013 20:42:43 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1VaER3-0000GZ-MV for emacs-orgmode@gnu.org; Sat, 26 Oct 2013 20:42:36 -0400 Received: from oproxy6-pub.mail.unifiedlayer.com ([67.222.54.6]:54752) by eggs.gnu.org with smtp (Exim 4.71) (envelope-from ) id 1VaER3-0000GL-F5 for emacs-orgmode@gnu.org; Sat, 26 Oct 2013 20:42:29 -0400 Received: from [98.155.255.145] (port=49958 helo=poto.local) by box472.bluehost.com with esmtpsa (TLSv1:CAMELLIA128-SHA:128) (Exim 4.80) (envelope-from ) id 1VaEQg-0000jf-Pe for emacs-orgmode@gnu.org; Sat, 26 Oct 2013 18:42:07 -0600 List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: Org-mode --=-=-= Content-Type: text/plain Aloha all, The attached patch should be applied on top of the earlier patch. It makes the continuation strings customizable. All the best, Tom --=-=-= Content-Type: text/x-patch Content-Disposition: attachment; filename=0001-Longtable-continuation-strings-customizable.patch Content-Description: Patch to ox-latex.el >From 2b3fbcf9a8ea64ef6207237ef48b9c62cded01ff Mon Sep 17 00:00:00 2001 From: Thomas Dye Date: Sat, 26 Oct 2013 14:37:30 -1000 Subject: [PATCH] Longtable continuation strings customizable --- lisp/ox-latex.el | 21 ++++++++++++++++++--- 1 file changed, 18 insertions(+), 3 deletions(-) diff --git a/lisp/ox-latex.el b/lisp/ox-latex.el index 6426d55..6bca7a3 100644 --- a/lisp/ox-latex.el +++ b/lisp/ox-latex.el @@ -525,6 +525,19 @@ When nil, no transformation is made." (string :tag "Format string") (const :tag "No formatting"))) +(defcustom org-latex-longtable-continued-on "Continued on next page" + "String to indicate table continued on next page." + :group 'org-export-latex + :version "24.4" + :package-version '(Org . "8.0") + :type 'string) + +(defcustom org-latex-longtable-continued-from "Continued from previous page" + "String to indicate table continued from previous page." + :group 'org-export-latex + :version "24.4" + :package-version '(Org . "8.0") + :type 'string) ;;;; Text markup @@ -2625,17 +2638,18 @@ a communication channel." ((and longtablep (org-export-table-row-ends-header-p table-row info)) (format "%s \\endfirsthead -\\multicolumn{%d}{l}{Continued from previous page} \\\\ +\\multicolumn{%d}{l}{%s} \\\\ %s %s \\\\\n %s \\endhead -%s\\multicolumn{%d}{r}{Continued on next page} \\\\ +%s\\multicolumn{%d}{r}{%s} \\\\ \\endfoot \\endlastfoot" (if booktabsp "\\midrule" "\\hline") (cdr (org-export-table-dimensions (org-export-get-parent-table table-row) info)) + org-latex-longtable-continued-from (cond ((and booktabsp (memq 'top borders)) "\\toprule\n") ((and (memq 'top borders) (memq 'above borders)) "\\hline\n") @@ -2645,7 +2659,8 @@ a communication channel." (if booktabsp "\\midrule" "\\hline") ;; Number of columns. (cdr (org-export-table-dimensions - (org-export-get-parent-table table-row) info)))) + (org-export-get-parent-table table-row) info)) + org-latex-longtable-continued-on)) ;; When BOOKTABS are activated enforce bottom rule even when ;; no hline was specifically marked. ((and booktabsp (memq 'bottom borders)) "\\bottomrule") -- 1.8.3.3 --=-=-= Content-Type: text/plain -- T.S. Dye & Colleagues, Archaeologists 735 Bishop St, Suite 315, Honolulu, HI 96813 Tel: 808-529-0866, Fax: 808-529-0884 http://www.tsdye.com --=-=-=--