From mboxrd@z Thu Jan 1 00:00:00 1970 From: tsd@tsdye.com (Thomas S. Dye) Subject: Re: Export problem with source code blocks Date: Sat, 30 Mar 2013 12:32:02 -1000 Message-ID: References: <87y5d4r2yg.fsf@gmail.com> Mime-Version: 1.0 Content-Type: text/plain Return-path: Received: from eggs.gnu.org ([208.118.235.92]:47988) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1UM4KD-0005xC-NO for emacs-orgmode@gnu.org; Sat, 30 Mar 2013 18:32:41 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1UM4KB-00086w-Qu for emacs-orgmode@gnu.org; Sat, 30 Mar 2013 18:32:37 -0400 Received: from oproxy7-pub.bluehost.com ([67.222.55.9]:45645) by eggs.gnu.org with smtp (Exim 4.71) (envelope-from ) id 1UM4KB-00086Y-Iw for emacs-orgmode@gnu.org; Sat, 30 Mar 2013 18:32:35 -0400 In-Reply-To: <87y5d4r2yg.fsf@gmail.com> (Eric Schulte's message of "Sat, 30 Mar 2013 15:29:43 -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: Eric Schulte Cc: Org-mode Hi Eric, Yes, that fixes it. The cl package wasn't loaded for asynchronous export. The code executes in the buffer without an explicit (require 'cl). It's a mystery to me where it gets loaded in my setup, though. I don't do it explicitly--perhaps it tags along with some other package that I do load. Thanks, Tom Eric Schulte writes: > Hi Tom, > > The `first' function is provided by the cl package. I'd either replace > `first' with `car' in your code block, or add (require 'cl) to your > personal Emacs configuration. > > Cheers, > > tsd@tsdye.com (Thomas S. Dye) writes: > >> 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 -- Thomas S. Dye http://www.tsdye.com