diff options
author | Matt Lundin <mdl@imapmail.org> | 2011-05-04 00:56:54 +0000 |
---|---|---|
committer | Carsten Dominik <carsten.dominik@gmail.com> | 2011-05-04 09:43:01 +0200 |
commit | ad28fc9a61735900ff6b6bdca3d73c0364aa1a8e (patch) | |
tree | be6c3e36f6b4ea6d95bd2ebf18ed45c8f6bdc1b1 | |
parent | a35b4a7db9eba0204313353e17a655bc6d47a574 (diff) | |
download | org-mode-ad28fc9a61735900ff6b6bdca3d73c0364aa1a8e.tar.gz |
Making the output of %% functions linkable in agenda views
charles.sebold@lcms.org writes:
> On 7 Apr 2011, Charles Sebold wrote:
>
>> Here's a test. Take the line below and put it in an agenda file, then
>> view the agenda.
>>
>> %%(format "%s" (concat "[[elisp:(info)]" "[Link to info]]"))
>>
>> The results as I see them give me a link that I can mouse-click on,
>> but I can't move point to it and hit C-c C-o.
>>
>> What do I need to do to make this a normal org link in every way? Or
>> is this a bug?
>>
Here's what seems to be going on.
Clicking with the mouse works because it calls org-open-at-mouse, which
(by calling org-open-at-point) simply looks at the text surrounding the
click point to find a link.
The function org-agenda-open-link, on the other hand, grabs part of the
headline as a string (the prefix), then jumps to the location in the
original buffer and calls org-offer-links-in-entry to look for links in
both the entry and the prefix of agenda text. Obviously, it won't find
your link in the original entry since it looks like this:
%%(format "%s" (concat "[[elisp:(info)]" "[Link to info]]"))
I think it shouldn't be a problem to pass the whole agenda line to
org-offer-links-in-entry. This will not result in duplicate links, since
org-offer-links-in-entry "uniquifies" the links.
I've attached a patch.
The bigger question, however, is why the expression above is even
showing up in the agenda, since it contains no scheduling information.
:)
Best,
Matt
>From 58c7621c0c84b9c1930098a098e4559aa516eec0 Mon Sep 17 00:00:00 2001
From: Matt Lundin <mdl@imapmail.org>
Date: Tue, 3 May 2011 15:54:35 -0400
Subject: [PATCH] Pass entire text of agenda line to org-offer-links-in-entry.
* lisp/org-agenda.el (org-agenda-open-link): Pass entire text of
agenda line to org-offer-links-in-entry.
This fixes bug noticed by Charles Sebold, in which links that are
dynamically formatted for the agenda view are ignored.
http://permalink.gmane.org/gmane.emacs.orgmode/40673
-rw-r--r-- | lisp/org-agenda.el | 4 |
1 files changed, 1 insertions, 3 deletions
diff --git a/lisp/org-agenda.el b/lisp/org-agenda.el index 65f7cea..609edd4 100644 --- a/lisp/org-agenda.el +++ b/lisp/org-agenda.el @@ -6879,9 +6879,7 @@ at the text of the entry itself." (org-get-at-bol 'org-marker))) (buffer (and marker (marker-buffer marker))) (prefix (buffer-substring - (point-at-bol) - (or (text-property-any (point-at-bol) (point-at-eol) 'org-heading t) - (point-at-bol))))) + (point-at-bol) (point-at-eol)))) (cond (buffer (with-current-buffer buffer |