Fabian Braennstroem <[EMAIL PROTECTED]> writes: > Hi Carsten, > > Carsten Dominik schrieb am 11/25/2007 02:22 PM: >> On 11/25/07, Fabian Braennstroem <[EMAIL PROTECTED]> wrote: >>> Hi, >>> me again :-) >>> >>> is there a chance to create links from the marked files in a >>> dired buffer using org-mode internal functions? >>> It would help, when you have a bunch of e.g. images in one >>> directory... >> >> Can you be more specific? How you like the output in Org-mode to >> work? A link back to dired visiting this directory, or many links to >> each individual file? > > Many links to each individual file would be great. > Fabian
Off topic, I know, but you could use this as a temporary measure. I've only just knocked it up and not really tested it so I'm sure there is bugs. I might re-factor it soon and give it some options/features.
#!/usr/bin/env zsh set -e function headline { depth="${1}" text="${2}" printf "%${depth}s %s" "" | tr ' ' '*' echo " ${text}" } function scan_and_populate { depth="${1}" dir="${2}" headline ${depth} "${dir}" let "depth += 1" for f in $(ls -d "${dir}"/* 2>/dev/null); do if [ -d "${f}" ]; then scan_and_populate ${depth} "${f}" else headline ${depth} "[[file://${f}][${${f##*/}%.*}]]" fi done let "depth -= 1" } function main { scan_dir="${1:-$(pwd)}" depth=0 scan_and_populate ${depth} "${scan_dir}" } main "[EMAIL PROTECTED]"
Cheers, Phil
_______________________________________________ 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