Hi Cecil,
On Sun, 2 Sep 2018 15:27:29 +0200
Cecil Westerhof <cldwester...@gmail.com> wrote:
> 2018-09-01 17:04 GMT+02:00 Robert Klein <rokl...@roklein.de>:
>
> > On Sat, 1 Sep 2018 12:38:54 +0200
> > Cecil Westerhof <cldwester...@gmail.com> wrote:
> >
> > > I have the following:
> > > #+BEGIN_SRC dot :file Graphviz/habitLoop.png :cmdline -Kfdp -Tpng
> > > digraph habitLoop {
> > > bgcolor = steelblue
> > > edge [penwidth = 4.0 ]
> > > node [fontcolor = white, fontsize = 60, style = filled]
> > >
> > > spur [pos = "4,4!" color = red]
> > > habit [pos = "7,1!" color = darkgreen]
> > > reward [pos = "1,1!" color = blue]
> > >
> > > spur:e -> habit:n
> > > habit:w -> reward:e
> > > reward:n -> spur:w
> > >
> > > copyright [
> > > pos = "4,.75!"
> > > color = steelblue,
> > > fontcolor = black,
> > > fontsize = 14,
> > > label = "© Cecil
> > > Westerhof\ntimemanagem...@decebal.nl", shape = plaintext
> > > ]
> > >
> > > spur [label = "Spur"]
> > > habit [label = "Habit"]
> > > reward [label = "Reward"]
> > > }
> > > #+END_SRC
> > >
> > > But I also want to have a Dutch version. So I also have:
> > > #+BEGIN_SRC dot :file Graphviz/gewoonteLoop.png :cmdline -Kfdp
> > > -Tpng digraph habitLoop {
> > > bgcolor = steelblue
> > > edge [penwidth = 4.0 ]
> > > node [fontcolor = white, fontsize = 60, style = filled]
> > >
> > > spur [pos = "4,4!" color = red]
> > > habit [pos = "7,1!" color = darkgreen]
> > > reward [pos = "1,1!" color = blue]
> > >
> > > spur:e -> habit:n
> > > habit:w -> reward:e
> > > reward:n -> spur:w
> > >
> > > copyright [
> > > pos = "4,.75!"
> > > color = steelblue,
> > > fontcolor = black,
> > > fontsize = 14,
> > > label = "© Cecil
> > > Westerhof\ntimemanagem...@decebal.nl", shape = plaintext
> > > ]
> > >
> > > spur [label = "Prikkel"]
> > > habit [label = "Gewoonte"]
> > > reward [label = "Beloning"]
> > > }
> > > #+END_SRC
> > >
> > > The only difference are the three label statements. Can this be
> > > done more efficient? Because now I need to do updates at two
> > > places. That is an accident waiting to happen.
> > >
> >
> >
> > There's a complicated solution (like, using variables from tables)
> > at
> > https://orgmode.org/worg/org-contrib/babel/languages/ob-doc-dot.html
> >
> > In your case you might want to use noweb (see
> > https://orgmode.org/org.html#Noweb-reference-syntax). Then your
> > code might look like this:
> >
> > #+Name: habitloop-main
> > #+BEGIN_SRC dot
> > bgcolor = steelblue
> > edge [penwidth = 4.0 ]
> > node [fontcolor = white, fontsize = 60, style = filled]
> >
> > spur [pos = "4,4!" color = red]
> > habit [pos = "7,1!" color = darkgreen]
> > reward [pos = "1,1!" color = blue]
> >
> > spur:e -> habit:n
> > habit:w -> reward:e
> > reward:n -> spur:w
> >
> > copyright [
> > pos = "4,.75!"
> > color = steelblue,
> > fontcolor = black,
> > fontsize = 14,
> > label = "© Cecil
> > Westerhof\ntimemanagem...@decebal.nl",
> > shape = plaintext
> > ]
> > #+END_SRC
> >
> >
> > #+BEGIN_SRC dot :file gewoonteLoop.png :cmdline -Kfdp -Tpng :noweb
> > yes digraph habitLoop {
> > <<main-loop>>
> > spur [label = "Prikkel"]
> > habit [label = "Gewoonte"]
> > reward [label = "Beloning"]
> > }
> > #+END_SRC
> >
> > #+RESULTS:
> > [[file:gewoonteLoop.png]]
> >
> > #+BEGIN_SRC dot :file habitLoop.png :cmdline -Kfdp -Tpng :noweb yes
> > digraph habitLoop {
> > <<main-loop>>
> > spur [label = "Spur"]
> > habit [label = "Habit"]
> > reward [label = "Reward"]
> > }
> > #+END_SRC
> >
>
> I tried this, but I did not get it to work. Maybe something in my
> configuration is wrecking havoc on me. I have to play with it a bit
> more I am afraid.
Did you C-c C-c on the two smaller snippets (not on the main-loop part)?
Best regards
Robert
>
> > Note, for better looks I put the whole surrounding block in the
> > language-specific parts (the “digraph”-line could be in the
> > “habitloop-main” block, too).
> >
> >
> > When your code gets more involved this can get ugly, fast. Then
> > you'll probably have to go the elisp way.
> >
>
> For the moment I do not think it will get more involved very soon,
> but you never know. Maybe the elisp route is not a bad idea.
>
