[O] progress indicator for code blocks?

[John Kitchin]

Hi all,
I am using org-mode in a class, and some students wondered if it was
possible for there to be a progress bar of some kind while a code block
is running. Right now Emacs just appears to lock up and there is no
indication anything is happening, especially the first time we run a
python block.

I found make-progress-reporter and tried something like this::
#+BEGIN_SRC emacs-lisp
(defadvice org-babel-execute-src-block (around progress nil activate)
  (let ((pr (make-progress-reporter "Running")))
    ad-do-it
    (progress-reporter-done pr)))
#+END_SRC

but there is no way to update it, so it doesn't quite do anything
useful.

What I would really like is an hourglass or some spinning thing. Does
anyone know how to get that (in a cross-platform way)?

-- 
-----------------------------------
John Kitchin
http://kitchingroup.cheme.cmu.edu