From mboxrd@z Thu Jan 1 00:00:00 1970 From: Nicolas Goaziou Subject: Re: [feature request] org-capture-window-setup to stop capture window taking up whole frame Date: Tue, 23 Jun 2015 22:31:59 +0200 Message-ID: <87oak6rwsg.fsf@nicolasgoaziou.fr> References: <87zj4ate9f.fsf@pinto.chemeng.ucl.ac.uk> <5575C4C7.3050702@verizon.net> <874mm6pwsh.fsf@delle7240.chemeng.ucl.ac.uk> <62a7f4ad0cbf4b37a52a0d8f324218b6@fcmailsvr2.familycareinc.org> <87a8vxcut6.fsf@delle7240.chemeng.ucl.ac.uk> Mime-Version: 1.0 Content-Type: text/plain Return-path: Received: from eggs.gnu.org ([2001:4830:134:3::10]:48428) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Z7Uq3-00042g-2N for emacs-orgmode@gnu.org; Tue, 23 Jun 2015 16:30:35 -0400 Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1Z7Upz-0003CC-4h for emacs-orgmode@gnu.org; Tue, 23 Jun 2015 16:30:34 -0400 Received: from relay4-d.mail.gandi.net ([2001:4b98:c:538::196]:42437) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1Z7Upy-00039W-V0 for emacs-orgmode@gnu.org; Tue, 23 Jun 2015 16:30:31 -0400 In-Reply-To: <87a8vxcut6.fsf@delle7240.chemeng.ucl.ac.uk> (Eric S. Fraga's message of "Thu, 18 Jun 2015 08:57:57 +0100") List-Id: "General discussions about Org-mode." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org Sender: emacs-orgmode-bounces+geo-emacs-orgmode=m.gmane.org@gnu.org To: Subhan Michael Tindall Cc: Charles Millar , "emacs-orgmode@gnu.org" , Kaushal Hello, Eric S Fraga writes: > Thanks for this. Works okay if there is more than one window which is a > step in the right direction. In any case, you've pointed me in the > right direction and the following seems to work fine (with very limited > testing): > > diff --git a/lisp/org-capture.el b/lisp/org-capture.el > index eeb05ca..ac0ed6f 100644 > --- a/lisp/org-capture.el > +++ b/lisp/org-capture.el > @@ -1590,8 +1590,7 @@ The template may still contain \"%?\" for cursor positioning." > (unless template (setq template "") (message "No template") (ding) > (sit-for 1)) > (save-window-excursion > - (delete-other-windows) > - (org-pop-to-buffer-same-window (get-buffer-create "*Capture*")) > + (org-switch-to-buffer-other-window (get-buffer-create "*Capture*")) > (erase-buffer) > (insert template) > (goto-char (point-min)) > > Feedback from real emacs lisp people welcome... It looks good. Could you turn it into a proper patch with a commit message? Thank you. Regards, -- Nicolas Goaziou