From mboxrd@z Thu Jan 1 00:00:00 1970 From: Carsten Dominik Subject: Re: [PATCH] make export dispatcher go away promptly Date: Fri, 4 Feb 2011 17:21:34 +0100 Message-ID: References: Mime-Version: 1.0 (Apple Message framework v936) Content-Type: text/plain; charset=US-ASCII; format=flowed; delsp=yes Content-Transfer-Encoding: 7bit Return-path: Received: from [140.186.70.92] (port=51564 helo=eggs.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1PlPIs-0001Ey-Dj for emacs-orgmode@gnu.org; Fri, 04 Feb 2011 12:18:39 -0500 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1PlPIr-0003I5-5h for emacs-orgmode@gnu.org; Fri, 04 Feb 2011 12:18:38 -0500 Received: from mail-ey0-f169.google.com ([209.85.215.169]:34449) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1PlPIq-0003Hn-VG for emacs-orgmode@gnu.org; Fri, 04 Feb 2011 12:18:37 -0500 Received: by eyh6 with SMTP id 6so1338552eyh.0 for ; Fri, 04 Feb 2011 09:18:36 -0800 (PST) In-Reply-To: List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: Dan Davison Cc: emacs-orgmode@gnu.org On Feb 4, 2011, at 4:05 PM, Dan Davison wrote: > Following on from Stephen's recent post, a > thing-that-slightly-bothers-me is the way the export dispatcher window > doesn't go away until export is complete. I've briefly looked at the > code twice now and it wasn't obvious to me why the save-window- > excursion > (line 941 org-exp.el) wasn't already doing what I wanted. However, the > change below seems to have the effect I wanted. While this particular > solution may be a hack, I wonder whether people would prefer its > behaviour? E.g. try exporting this: > > #+title: title > > #+begin_src sh :exports results > sleep 5 && echo hello > #+end_src > > export can often take several seconds and it's nice to be able to zone > out looking at your org document rather than the dispatcher window. > > Modified lisp/org-exp.el > diff --git a/lisp/org-exp.el b/lisp/org-exp.el > index 13fa549..3d291e2 100644 > --- a/lisp/org-exp.el > +++ b/lisp/org-exp.el > @@ -963,6 +963,7 @@ value of `org-export-run-in-background'." > (setq r1 (read-char-exclusive))) > (error "No enclosing node with LaTeX_CLASS or > EXPORT_FILE_NAME") > ))))) > + (redisplay) > (and bpos (goto-char bpos)) > (setq r2 (if (< r1 27) (+ r1 96) r1)) > (unless (setq ass (assq r2 cmds)) Looks good to me. - Carsten > > > (I see that (sit-for .0001) is used in a couple of places in Org for > this effect, so maybe that should be used instead.) > > Dan > > > > _______________________________________________ > Emacs-orgmode mailing list > Please use `Reply All' to send replies to the list. > Emacs-orgmode@gnu.org > http://lists.gnu.org/mailman/listinfo/emacs-orgmode