emacs-orgmode
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: [Orgmode] Feature request: org-agenda-store-link


From: Peter Westlake
Subject: Re: [Orgmode] Feature request: org-agenda-store-link
Date: Sat, 12 Sep 2009 10:42:59 +0100

On Sat, 12 Sep 2009 07:06 +0200, "Carsten Dominik"
<address@hidden> wrote:
> Hi Peter,
> 
> that does make a lot of sense, why did we not think of this earlier?
> Works now.
> 
> Thanks!

Well, thank *you* - I'm quite thrilled to have made a contribution,
however small!

Peter.

> - Carsten
> 
> On Sep 11, 2009, at 1:41 PM, Peter Westlake wrote:
> 
> > Carsten,
> >
> > Could I request this as a small feature enhancement, please?
> > Commands like org-refile have an agenda equivalent so that
> > the same keys work in the agenda, and it would be very nice
> > to be able to store a link to an item that way as well.
> >
> > Regards,
> >
> > Peter.
> >
> > On Wed, 09 Sep 2009 15:23 +0100, "Peter Westlake"
> > <address@hidden> wrote:
> >> On Wed, 09 Sep 2009 14:39 +0200, "Carsten Dominik"
> >> <address@hidden> wrote:
> >>>
> >>> On Sep 8, 2009, at 8:14 PM, Raffi R wrote:
> >> ...
> >>>> In org-mode normally, I can get this behaviour by pressing C-0 C-x
> >>>> C-e.  Looking at org.el suggested that I should be able to simply
> >>>> provide the 0 as an argument, i.e. using (org-export 0). However,
> >>>> org-export seems to ignore that 0.
> >>>
> >>> (let ((current-prefix-arg 0))
> >>>  (call-interactively 'org-export))
> >>
> >> This also happens to be the reason a function I was trying to write
> >> didn't work! I would never have worked it out for myself - does
> >> anyone have time to explain why the original form doesn't work?
> >>
> >> Here, incidentally, is the function I was writing. It works now!
> >> It is intended to be bound to C-c l in the agenda buffer, and
> >> was written by imitating org-agenda-refile:
> >>
> >> (defun org-agenda-store-link (arg)
> >>  "Store a link to the item at point."
> >>  (interactive "P")
> >>  (let* ((marker (or (get-text-property (point) 'org-hd-marker)
> >>                     (org-agenda-error)))
> >>         (buffer (marker-buffer marker))
> >>         (org-link-to-org-use-id t))
> >>    (with-current-buffer buffer
> >>      (save-excursion
> >>        (save-restriction
> >>          (widen)
> >>          (goto-char marker)
> >>          (let ((current-prefix-arg 0))
> >>            (call-interactively 'org-store-link)))))))
> >>
> >> Is this the right way to do it?
> >>
> >> Peter.
> >>
> >>
> >> _______________________________________________
> >> Emacs-orgmode mailing list
> >> Remember: use `Reply All' to send replies to the list.
> >> address@hidden
> >> http://lists.gnu.org/mailman/listinfo/emacs-orgmode
> >
> >
> > _______________________________________________
> > Emacs-orgmode mailing list
> > Remember: use `Reply All' to send replies to the list.
> > address@hidden
> > http://lists.gnu.org/mailman/listinfo/emacs-orgmode
> 




reply via email to

[Prev in Thread] Current Thread [Next in Thread]