Auto-refreshing rendered images from org-babel

Auto-refreshing rendered images from org-babel

[E Sabof]

I have the org snippet below. What I would like, is to see the rendered image when I press C-c C-c. I can achieve this with the elisp snippet below. Is there a "proper", or at least a better way of doing this?

Evgeni


#+BEGIN_SRC dot :file files/graphviz/example1.png
digraph test {
    size="6,5";
    home [label = "Home"];
    prod [label = "Products"];
    news [label = "News"];
    cont [label = "Contact"];

    home -> {prod news cont}
}
#+END_SRC


(org-babel-do-load-languages
 'org-babel-load-languages
 '((dot . t)
   ))

(defadvice org-babel-execute:dot (after refresh-images activate)
  (run-with-timer 1 nil 'org-display-inline-images))

Re: Auto-refreshing rendered images from org-babel

[Bastien]

E Sabof <esabof@gmail.com> writes:

> I have the org snippet below. What I would like, is to see the
> rendered image when I press C-c C-c. I can achieve this with the elisp
> snippet below. Is there a "proper", or at least a better way of doing
> this?

Not tested but should work:

(add-hook 'org-babel-after-execute-hook 'org-redisplay-inline-images)

HTH,

-- 
 Bastien

Re: Auto-refreshing rendered images from org-babel

[E Sabof]

Thanks. I've changed it to the version below, which covers my needs. I think it would make sense as a (default?) feature for ob-dot, ob-ditaa, and any other babel language that renders images.

Evgeni

;; Must be defined in a lexical environment
(defun es-org-babel-refresh-images-after-execution ()
  (let (refresh-and-remove-self)
    (setq refresh-and-remove-self
          (lambda ()
            (org-redisplay-inline-images)
            (remove-hook 'org-babel-after-execute-hook
                         refresh-and-remove-self)))
    (add-hook 'org-babel-after-execute-hook refresh-and-remove-self)))

(defadvice org-babel-execute:dot (after refresh-images activate)
  (es-org-babel-refresh-images-after-execution))


Bastien <bzg@gnu.org> writes:

> E Sabof <esabof@gmail.com> writes:
>
>> I have the org snippet below. What I would like, is to see the
>> rendered image when I press C-c C-c. I can achieve this with the elisp
>> snippet below. Is there a "proper", or at least a better way of doing
>> this?
>
> Not tested but should work:
>
> (add-hook 'org-babel-after-execute-hook 'org-redisplay-inline-images)
>
> HTH,

Re: Auto-refreshing rendered images from org-babel

[Bastien]

E Sabof <esabof@gmail.com> writes:

> Thanks. I've changed it to the version below, which covers my needs.

Thanks.  Why is it more useful than

(add-hook 'org-babel-after-execute-hook 'org-redisplay-inline-images)

?

-- 
 Bastien

Re: Auto-refreshing rendered images from org-babel

[E Sabof]

Bastien <bzg@gnu.org> writes:

> Thanks.  Why is it more useful than
>
> (add-hook 'org-babel-after-execute-hook 'org-redisplay-inline-images)
>
> ?

It's more targeted -- I don't use dot that often, and I'd rather not have an additional side effect when executing any org-babel snippet.

Evgeni

Re: Auto-refreshing rendered images from org-babel

[Bastien]

E Sabof <esabof@gmail.com> writes:

> It's more targeted -- I don't use dot that often, and I'd rather not
> have an additional side effect when executing any org-babel snippet.

Ok, thanks.  I'd rather have ob-dot.el and friends have their own
hooks (e.g. org-babel-execute:dot-hook).  But I'm not yet convince,
as `org-redisplay-inline-images' is already bound to `C-c C-x C-M-v'.

-- 
 Bastien

Re: Auto-refreshing rendered images from org-babel

[E Sabof]

Bastien <bzg@altern.org> writes:

> Ok, thanks.  I'd rather have ob-dot.el and friends have their own
> hooks (e.g. org-babel-execute:dot-hook).  But I'm not yet convince,
> as `org-redisplay-inline-images' is already bound to `C-c C-x C-M-v'.

I'm not a heavy babel user, but maybe something like this could be run from each time babel evaluates a block. A person wanting to run code for one language, but not another seems reasonable.

(let* ((language (the-language-being-executed)))
  (run-hooks (intern (format "org-babel-execute:%s-hook" language))))

Alternatively a variable similar to org-babel-last-executed-language could be set before the existing hook runs, and customizations could be made from there.

Evgeni

Re: Auto-refreshing rendered images from org-babel

[Rainer M Krug]

[-- Attachment #1: Type: text/plain, Size: 1484 bytes --]



On 02/06/14, 10:39 , E Sabof wrote:
> 
> Bastien <bzg@altern.org> writes:
> 
>> Ok, thanks.  I'd rather have ob-dot.el and friends have their own 
>> hooks (e.g. org-babel-execute:dot-hook).  But I'm not yet
>> convince, as `org-redisplay-inline-images' is already bound to `C-c
>> C-x C-M-v'.
> 
> I'm not a heavy babel user, but maybe something like this could be
> run from each time babel evaluates a block. A person wanting to run
> code for one language, but not another seems reasonable.
> 
> (let* ((language (the-language-being-executed))) (run-hooks (intern
> (format "org-babel-execute:%s-hook" language))))
> 
> Alternatively a variable similar to org-babel-last-executed-language
> could be set before the existing hook runs, and customizations could
> be made from there.

I would go one step further - the possibility to define
org-babel-after-execute-hook as a header argument. This would make it
possible to refresh the inline images only after certain blocks are
executed and not after others.

Cheers,

Rainer

> 
> Evgeni
> 

-- 
Rainer M. Krug, PhD (Conservation Ecology, SUN), MSc (Conservation
Biology, UCT), Dipl. Phys. (Germany)

Centre of Excellence for Invasion Biology
Stellenbosch University
South Africa

Tel :       +33 - (0)9 53 10 27 44
Cell:       +33 - (0)6 85 62 59 98
Fax :       +33 - (0)9 58 10 27 44

Fax (D):    +49 - (0)3 21 21 25 22 44

email:      Rainer@krugs.de

Skype:      RMkrug


[-- Attachment #2: OpenPGP digital signature --]
[-- Type: application/pgp-signature, Size: 560 bytes --]

Re: Auto-refreshing rendered images from org-babel

[Bastien]

Rainer M Krug <Rainer@krugs.de> writes:

> I would go one step further - the possibility to define
> org-babel-after-execute-hook as a header argument. This would make it
> possible to refresh the inline images only after certain blocks are
> executed and not after others.

Well, I'm a bit reluctant to go in this directions... this is more
code, while I guess the real problem was that nobody knew C-c C-x C-M-v.

-- 
 Bastien

Re: Auto-refreshing rendered images from org-babel

[Rainer M Krug]

[-- Attachment #1: Type: text/plain, Size: 1065 bytes --]



On 02/06/14, 10:52 , Bastien wrote:
> Rainer M Krug <Rainer@krugs.de> writes:
> 
>> I would go one step further - the possibility to define
>> org-babel-after-execute-hook as a header argument. This would make it
>> possible to refresh the inline images only after certain blocks are
>> executed and not after others.
> 
> Well, I'm a bit reluctant to go in this directions... this is more
> code, while I guess the real problem was that nobody knew C-c C-x C-M-v.

True - but the per code block hooks would open many possibilities, e.g.
automated conversions, automatic uploads, post-process created files via
a script, etc.


Rainer

> 

-- 
Rainer M. Krug, PhD (Conservation Ecology, SUN), MSc (Conservation
Biology, UCT), Dipl. Phys. (Germany)

Centre of Excellence for Invasion Biology
Stellenbosch University
South Africa

Tel :       +33 - (0)9 53 10 27 44
Cell:       +33 - (0)6 85 62 59 98
Fax :       +33 - (0)9 58 10 27 44

Fax (D):    +49 - (0)3 21 21 25 22 44

email:      Rainer@krugs.de

Skype:      RMkrug


[-- Attachment #2: OpenPGP digital signature --]
[-- Type: application/pgp-signature, Size: 560 bytes --]

Re: Auto-refreshing rendered images from org-babel

[Bastien]

Rainer M Krug <Rainer@krugs.de> writes:

> True - but the per code block hooks would open many possibilities, e.g.
> automated conversions, automatic uploads, post-process created files via
> a script, etc.

So, being as conservative as core maintainers tend to become, I'll
wait for a real use-case for a real need to be expressed here :)

-- 
 Bastien

Re: Auto-refreshing rendered images from org-babel

[Rainer M Krug]

[-- Attachment #1: Type: text/plain, Size: 850 bytes --]



On 02/06/14, 11:22 , Bastien wrote:
> Rainer M Krug <Rainer@krugs.de> writes:
> 
>> True - but the per code block hooks would open many possibilities, e.g.
>> automated conversions, automatic uploads, post-process created files via
>> a script, etc.
> 
> So, being as conservative as core maintainers tend to become, I'll
> wait for a real use-case for a real need to be expressed here :)

Good approach.

Cheers,

Rainer

> 

-- 
Rainer M. Krug, PhD (Conservation Ecology, SUN), MSc (Conservation
Biology, UCT), Dipl. Phys. (Germany)

Centre of Excellence for Invasion Biology
Stellenbosch University
South Africa

Tel :       +33 - (0)9 53 10 27 44
Cell:       +33 - (0)6 85 62 59 98
Fax :       +33 - (0)9 58 10 27 44

Fax (D):    +49 - (0)3 21 21 25 22 44

email:      Rainer@krugs.de

Skype:      RMkrug


[-- Attachment #2: OpenPGP digital signature --]
[-- Type: application/pgp-signature, Size: 560 bytes --]

Re: Auto-refreshing rendered images from org-babel

[Eric S Fraga]

Rainer M Krug <Rainer@krugs.de> writes:
> I would go one step further - the possibility to define
> org-babel-after-execute-hook as a header argument. This would make it
> possible to refresh the inline images only after certain blocks are
> executed and not after others.

Doesn't the :post header argument give you this functionality, sort of?
You could link to an emacs lisp src block which does what you want...

-- 
: Eric S Fraga (0xFFFCF67D), Emacs 24.3.50.1, Org release_8.2.5h-585-g5f0ca0

Re: Auto-refreshing rendered images from org-babel

[Rainer M Krug]

[-- Attachment #1: Type: text/plain, Size: 1021 bytes --]



On 02/06/14, 13:22 , Eric S Fraga wrote:
> Rainer M Krug <Rainer@krugs.de> writes:
>> I would go one step further - the possibility to define
>> org-babel-after-execute-hook as a header argument. This would make it
>> possible to refresh the inline images only after certain blocks are
>> executed and not after others.
> 
> Doesn't the :post header argument give you this functionality, sort of?
> You could link to an emacs lisp src block which does what you want...

Didn't know about this one - thanks for pointing it out. As I see it, it
would not only work "sort of" but exactly.

Rainer

> 

-- 
Rainer M. Krug, PhD (Conservation Ecology, SUN), MSc (Conservation
Biology, UCT), Dipl. Phys. (Germany)

Centre of Excellence for Invasion Biology
Stellenbosch University
South Africa

Tel :       +33 - (0)9 53 10 27 44
Cell:       +33 - (0)6 85 62 59 98
Fax :       +33 - (0)9 58 10 27 44

Fax (D):    +49 - (0)3 21 21 25 22 44

email:      Rainer@krugs.de

Skype:      RMkrug


[-- Attachment #2: OpenPGP digital signature --]
[-- Type: application/pgp-signature, Size: 560 bytes --]