From: Thorsten Jolitz <tjolitz@gmail.com>
To: emacs-orgmode@gnu.org
Subject: Re: How to change a link?
Date: Wed, 15 Oct 2014 09:16:20 +0200 [thread overview]
Message-ID: <87zjcxzttn.fsf@gmail.com> (raw)
In-Reply-To: 87a94yjia9.fsf@wmi.amu.edu.pl
Marcin Borkowski <mbork@wmi.amu.edu.pl> writes:
> Hi list,
>
> assume that I have a link object (e.g., I'm in the ellipsis part of
> this:
>
> (org-element-map (org-element-parse-buffer 'object) 'link
> (lambda (elt) ... ))
>
> What I want to do is this:
> 1. check whether it is an internal link, and
> 2. if it is, change it so that it points to the analogous place in
> another file.
>
> Any hints about how to do these things?
>
> (The rationale is that I'm writing a function which splits a single Org
> file into a bunch of smaller ones, and I want to preserve links.)
[[http:www.orgmode.org][Org-mode]]
#+BEGIN_SRC emacs-lisp :results raw
(save-excursion
(re-search-backward org-link-re-with-space)
(goto-char (match-beginning 0))
(org-dp-contents (org-element-at-point)))
#+END_SRC
#+results:
((link
(:type "http" :path "www.orgmode.org" :raw-link "http:www.orgmode.org"
:application nil :search-option nil :begin 609 :end 643
:contents-begin 633 :contents-end 641 :post-blank 0 :parent ...)))
so these
,----
| :type "http" :path "www.orgmode.org" :raw-link "http:www.orgmode.org"
`----
are your candidates for getting and setting with
'org-element-property' and 'org-element-put-property'.
--
cheers,
Thorsten
next prev parent reply other threads:[~2014-10-15 7:16 UTC|newest]
Thread overview: 24+ messages / expand[flat|nested] mbox.gz Atom feed top
2014-10-15 0:19 How to change a link? Marcin Borkowski
2014-10-15 7:16 ` Thorsten Jolitz [this message]
2014-10-15 9:50 ` Marcin Borkowski
2014-10-15 10:02 ` Thorsten Jolitz
2014-10-15 16:17 ` Marcin Borkowski
2014-10-15 22:28 ` Thorsten Jolitz
2014-10-15 22:36 ` Marcin Borkowski
2014-10-15 22:51 ` Thorsten Jolitz
2014-10-15 23:06 ` Thorsten Jolitz
2014-10-15 10:19 ` Nicolas Goaziou
2014-10-15 21:30 ` Marcin Borkowski
2014-10-15 21:52 ` Nicolas Goaziou
2014-10-16 17:55 ` Marcin Borkowski
2014-10-16 20:10 ` Nicolas Goaziou
2014-10-16 21:46 ` Marcin Borkowski
2014-10-16 22:19 ` Thorsten Jolitz
2014-10-17 8:52 ` Marcin Borkowski
2014-10-17 15:25 ` Nick Dokos
2014-10-18 13:54 ` Thorsten Jolitz
2014-10-18 1:44 ` Marcin Borkowski
2014-10-18 13:48 ` Thorsten Jolitz
2014-10-20 0:02 ` Marcin Borkowski
2014-10-20 13:02 ` Nicolas Goaziou
2014-10-20 13:11 ` Nicolas Goaziou
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://www.orgmode.org/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=87zjcxzttn.fsf@gmail.com \
--to=tjolitz@gmail.com \
--cc=emacs-orgmode@gnu.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).