From mboxrd@z Thu Jan 1 00:00:00 1970 From: Charles Berry Subject: Re: Format output of org-babel-tangle for exported file Date: Wed, 3 Sep 2014 14:19:19 +0000 (UTC) Message-ID: References: Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:41299) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1XPBPQ-0003Ka-3A for emacs-orgmode@gnu.org; Wed, 03 Sep 2014 10:19:46 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1XPBPJ-00014E-Sr for emacs-orgmode@gnu.org; Wed, 03 Sep 2014 10:19:40 -0400 Received: from plane.gmane.org ([80.91.229.3]:32855) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1XPBPJ-000146-NQ for emacs-orgmode@gnu.org; Wed, 03 Sep 2014 10:19:33 -0400 Received: from list by plane.gmane.org with local (Exim 4.69) (envelope-from ) id 1XPBPI-0001OW-5L for emacs-orgmode@gnu.org; Wed, 03 Sep 2014 16:19:32 +0200 Received: from 172-7-166-26.lightspeed.sndgca.sbcglobal.net ([172.7.166.26]) by main.gmane.org with esmtp (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Wed, 03 Sep 2014 16:19:32 +0200 Received: from ccberry by 172-7-166-26.lightspeed.sndgca.sbcglobal.net with local (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Wed, 03 Sep 2014 16:19:32 +0200 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: emacs-orgmode@gnu.org Rainer M Krug krugs.de> writes: > > Hi > > I am calling (org-bable-tangle) in a code block in an org file and I > would show the files resulting from the tangling in a nice format. > > But I do not manage. I have the following at the moment: > > --8<---------------cut here---------------start------------->8--- > #+begin_src emacs-lisp > (replace-regexp-in-string "[)\"]" "" > (replace-regexp-in-string "[(]" "- " > (replace-regexp-in-string " " "\n- " > (prin1-to-string (org-babel-tangle))))) > #+end_src > [snip] > Which is neither elegant nor short, and I am sure I could do this > easier. Any suggestions? Something like this? Possibly with `(reverse (org-babel-tangle))' #+BEGIN_SRC emacs-lisp :results value (mapconcat (lambda (x) (file-relative-name x "..")) (org-babel-tangle) "\n") #+END_SRC HTH, Chuck