Patch 544 (http://patchwork.newartisans.com/patch/544/) is now "Accepted".
Maintainer comment: none This relates to the following submission: http://mid.gmane.org/%3Csa3mxmzv4k0.fsf%40cigue.easter-eggs.fr%3E Here is the original message containing the patch: > Content-Type: text/plain; charset="utf-8" > MIME-Version: 1.0 > Content-Transfer-Encoding: 7bit > Subject: [Orgmode] Re: Bug: Jumping to a date in the agenda changes view back > to 'day' [7.4 (release_7.4.80.g0e5e5)] > Date: Mon, 17 Jan 2011 22:11:11 -0000 > From: Julien Danjou <jul...@danjou.info> > X-Patchwork-Id: 544 > Message-Id: <sa3mxmzv4k0....@cigue.easter-eggs.fr> > To: Bernt Hansen <be...@norang.ca> > Cc: Org Mode <emacs-orgmode@gnu.org>, Noorul Islam K M <noo...@noorul.com>, > Carsten Dominik <carsten.domi...@gmail.com> > > On Mon, Jan 17 2011, Bernt Hansen wrote: > > > > Thanks for this patch. I think this fixes the issue I was having with > > 'j' in the agenda switching from week-view back to single-day view when > > org-agenda-ndays is set to 1. > > > > There is still a (new?) problem with jumping to today. > > > > Set the following variable > > > > (setq org-agenda-start-on-weekday 6) > > > > | Key Sequence | Notes | > > |--------------+------------------------------------------------| > > | C-c a a | Display weekly agenda | > > | f | Go forward a week | > > | d | Display day agenda | > > | . | Go to to day - but it goes to Saturday instead | > > > > This should go to today and not the first day of the week. > > Attached is a fix for that. > > > >From f566a5612560f997f4760144ca850dda5c06bc5e Mon Sep 17 00:00:00 2001 > From: Julien Danjou <jul...@danjou.info> > Date: Mon, 17 Jan 2011 18:09:30 +0100 > Subject: [PATCH] Fix org-agenda-goto-today not respecting the current span. > > * org-agenda.el (org-agenda-goto-today): Respect current span. > > Signed-off-by: Julien Danjou <jul...@danjou.info> > --- > lisp/org-agenda.el | 2 +- > 1 files changed, 1 insertions(+), 1 deletions(-) > > diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el > index 0d695b5..241ed30 100644 > --- a/lisp/org-agenda.el > +++ b/lisp/org-agenda.el > @@ -6104,7 +6104,7 @@ Negative selection means regexp must not match for > selection of an entry." > (tdpos (goto-char tdpos)) > ((eq org-agenda-type 'agenda) > (let* ((sd (org-agenda-compute-starting-span > - (org-today) (or org-agenda-ndays org-agenda-span))) > + (org-today) (or org-agenda-current-span org-agenda-ndays > org-agenda-span))) > (org-agenda-overriding-arguments org-agenda-last-arguments)) > (setf (nth 1 org-agenda-overriding-arguments) sd) > (org-agenda-redo) > -- > 1.7.2.3 > > _______________________________________________ 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