From mboxrd@z Thu Jan 1 00:00:00 1970 From: tsd@tsdye.com (Thomas S. Dye) Subject: Export problem with source code blocks Date: Sat, 30 Mar 2013 09:29:19 -1000 Message-ID: Mime-Version: 1.0 Content-Type: text/plain Return-path: Received: from eggs.gnu.org ([208.118.235.92]:52295) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1UM1TQ-0007ra-G1 for emacs-orgmode@gnu.org; Sat, 30 Mar 2013 15:29:58 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1UM1TN-0006TP-4o for emacs-orgmode@gnu.org; Sat, 30 Mar 2013 15:29:56 -0400 Received: from oproxy7-pub.bluehost.com ([67.222.55.9]:46792) by eggs.gnu.org with smtp (Exim 4.71) (envelope-from ) id 1UM1TM-0006T1-S1 for emacs-orgmode@gnu.org; Sat, 30 Mar 2013 15:29:53 -0400 Received: from [98.155.255.145] (port=52882 helo=poto.myhome.westell.com) by box472.bluehost.com with esmtpsa (TLSv1:CAMELLIA128-SHA:128) (Exim 4.80) (envelope-from ) id 1UM1Su-0005Xl-7Z for emacs-orgmode@gnu.org; Sat, 30 Mar 2013 13:29:28 -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 Aloha all, The following code block executes fine in the Org buffer, and it exported cleanly on January 18th, but fails on export to LaTeX with a recent version of Org from the git repo. Here is the error message: executing Emacs-Lisp code block (plos-one-start)... Debugger entered--Lisp error: (void-function first) (first row) #+name: plos-one-start #+header: :var tab=author-table #+header: :var title="A Regional Chronology" #+header: :results raw :wrap latex #+header: :exports results #+begin_src emacs-lisp (defun author-name (recs) "Format the author name list." (let ((i 0)) (mapcar (lambda (row) (concat (format "%s$^{%d%s" (first row) (incf i) (if (equal "yes" (eighth row)) ",\\ast" "")) (if (equal row (car (last recs))) "}$" "}$,"))) recs))) (defun author-affiliation (recs) "Format the author affiliation list." (let ((i 0)) (mapcar (lambda (row) (format "\\bf{%d} %s, %s, %s, %s, %s" (incf i) (second row) (third row) (fourth row) (fifth row) (sixth row))) recs))) (defun corresponding-email (recs) "Return the corresponding email." (mapcar (lambda (row) (format "%s" (if (equal "yes" (eighth row)) (seventh row) ""))) recs)) (let* ((tab (cdr (cdr tab))) (a (author-name tab)) (b (author-affiliation tab)) (c (corresponding-email tab))) (concat (format "\\begin{flushleft}\n{\\Large\n\\textbf{%s}\n}\n\\\\\n" title) (mapconcat 'identity a "\n") "\n\\\\\n" (mapconcat 'identity b "\n\\\\\n") "\n\\\\\n$\\ast$ E-mail: " (mapconcat 'identity c "\n") "\n\\end{flushleft}")) #+end_src #+name: author-table | Author name | Department | Institution | City | State | Country | Email | Corresponding | |---------------+----------------------------+-----------------------+----------+-------+---------+---------------+---------------| | Thomas S. Dye | Department of Anthropology | University of Hawai`i | Honolulu | HI | USA | tsd@tsdye.com | yes | All the best, Tom -- 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