Re: [Orgmode] Prefixing a function call with C-digit

[Raffi R]

Thank you very much!

On Wed, Sep 9, 2009 at 10:23 AM, 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
>