On Wed, 09 Sep 2009 14:39 +0200, "Carsten Dominik" <carsten.domi...@gmail.com> 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. Emacs-orgmode@gnu.org http://lists.gnu.org/mailman/listinfo/emacs-orgmode