[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: [O] Process diagrams with dot and some glue using Org-mode
From: |
Karl Voit |
Subject: |
Re: [O] Process diagrams with dot and some glue using Org-mode |
Date: |
Fri, 28 Jun 2013 11:20:44 +0200 |
User-agent: |
slrn/0.9.9 (Linux) |
* Rick Frankel <address@hidden> wrote:
> And here's a simplier version which uses a graph table in the
> following format:
[...]
I tried to use your solution with the "#+call:" method.
Unfortunately, it fails and due to my limited ELISP knowledge, I can
not debug this issue. I've got the feeling that you might be able to
spot my error right away.
I should add, that this is my first usage of "call:". So there might
be a misunderstanding on my side on how to use it properly:
#+name: graph-from-table
#+HEADER: :var nodes=foobar-node-table graph=foobar-graph
#+BEGIN_SRC emacs-lisp :file ~/tmp/2del/foovar-example-simple.png :colnames yes
:exports results
(org-babel-execute:dot
(concat
"digraph {\n"
(mapconcat
(lambda (x)
(format "%s [label=\"%s\" shape=%s fillcolor=%s]"
(car x) (nth 1 x)
(if (string= "" (nth 2 x)) "box" (nth 2 x))
(if (string= "" (nth 3 x)) "none" (nth 3 x)))) nodes
"\n")
"\n"
(mapconcat
(lambda (x)
(format "%s -> %s [taillabel=\"%s\"]"
(car x) (nth 1 x) (nth 2 x))) graph "\n")
"}\n") params)
#+END_SRC
#+name: example-node-table
| *node* | *label* | *shape* | *fillcolor* |
|------------+------------------------+---------+-------------|
| S_start | example start | ellipse | green |
| S_fill | example fill form | | |
| S_send | example send form | | |
| S_complete | example form complete? | diamond | yellow |
| S_do | example do task | | red |
| S_end | example end | ellipse | |
#+name: example-graph
| from | to | label |
|------------+------------+-------|
| S_start | S_fill | |
| S_fill | S_send | |
| S_send | S_complete | |
| S_complete | S_fill | N |
| S_complete | S_do | Y |
| S_do | S_end | |
#+call: graph-from-table(nodes=example-node-table,graph=example-graph)
-> this results in "format: Wrong type argument: listp, hline"
Note: I got the following additional parameters "in my pipeline" (want
to make them work) as well:
:exports results :resname example-result :file ~/tmp/2del/example-simple.png
--
mail|git|SVN|photos|postings|SMS|phonecalls|RSS|CSV|XML to Org-mode:
> get Memacs from https://github.com/novoid/Memacs <
https://github.com/novoid/extract_pdf_annotations_to_orgmode + more on github
Re: [O] Process diagrams with dot and some glue using Org-mode, Thorsten Jolitz, 2013/06/26
Re: [O] Process diagrams with dot and some glue using Org-mode, Eric S Fraga, 2013/06/26