From: Marvin Doyley <marvinpas@gmail.com>
To: David Maus <dmaus@ictsoc.de>
Cc: emacs-orgmode@gnu.org
Subject: Re: requested feature
Date: Mon, 15 Nov 2010 09:01:42 -0500 [thread overview]
Message-ID: <AANLkTinnYr7oP5owLPNSXG8H1aQTbZo07NwO-mSZmiAZ@mail.gmail.com> (raw)
In-Reply-To: <87k4kfvh0y.wl%dmaus@ictsoc.de>
[-- Attachment #1.1: Type: text/plain, Size: 1223 bytes --]
Hi David,
This is exactly what I was looking for, thank you.
cheers
M
On Sun, Nov 14, 2010 at 2:31 PM, David Maus <dmaus@ictsoc.de> wrote:
> At Fri, 29 Oct 2010 19:24:32 -0400,
> Marvin Doyley wrote:
> >
> > [1 <multipart/alternative (7bit)>]
> > [1.1 <text/plain; ISO-8859-1 (7bit)>]
> > Does anybody have a function that turns a org header into file with a
> link
> > to the file where it originated from ?
> > For example, lets say I have the following heading
> >
> > * Apples
> > * Cherry
> > * Tomatoes
> >
> > Lets say I have a mini project on Apples, it would be nice to issue a
> single
> > command that turns Applies into Apples.org with a link
>
> Maybe something like this:
>
> (defun dmj:turn-word-into-org-mode-link ()
> "Replace word at point by an Org mode link."
> (interactive)
> (let ((word (thing-at-point 'word)))
> (when word
> (re-search-backward "\\W" nil t)
> (replace-string
> word (format "[[file:%s.org][%s]]" word word) t)
> (point) (+ (point) (length word)))))
>
> Grab word at point, go to its beginning, replace with an Org mode
> link.
>
> Best,
> -- David
> --
> OpenPGP... 0x99ADB83B5A4478E6
> Jabber.... dmjena@jabber.org
> Email..... dmaus@ictsoc.de
>
[-- Attachment #1.2: Type: text/html, Size: 1888 bytes --]
[-- Attachment #2: Type: text/plain, Size: 201 bytes --]
_______________________________________________
Emacs-orgmode mailing list
Please use `Reply All' to send replies to the list.
Emacs-orgmode@gnu.org
http://lists.gnu.org/mailman/listinfo/emacs-orgmode
next prev parent reply other threads:[~2010-11-15 14:01 UTC|newest]
Thread overview: 7+ messages / expand[flat|nested] mbox.gz Atom feed top
2010-10-29 23:24 requested feature Marvin Doyley
2010-11-14 19:31 ` David Maus
2010-11-15 14:01 ` Marvin Doyley [this message]
2010-11-15 15:01 ` Paul Mead
2010-11-15 18:02 ` David Maus
2010-11-15 18:23 ` Marvin Doyley
2010-11-16 19:43 ` Suvayu Ali
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=AANLkTinnYr7oP5owLPNSXG8H1aQTbZo07NwO-mSZmiAZ@mail.gmail.com \
--to=marvinpas@gmail.com \
--cc=dmaus@ictsoc.de \
--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).