view weave.sh @ 6:5370428e673e

experimenting with a perlscript for weaving
author Robert McIntyre <rlm@mit.edu>
date Mon, 24 Oct 2011 09:29:17 -0700
parents 4824087ce1f2
children ce96610fe058
line wrap: on
line source
1 #!/bin/sh
3 # assumes ./org directory with org files to publish to
4 # ./html
6 target=$(readlink -f $1)
8 dir=`pwd`
10 emacsclient \
11 --eval "
12 (progn
13 (setq org-publish-project-alist
14 '(
15 (\"project\"
16 :base-directory \"$dir/org\"
17 :base-extension \"org\"
18 :publishing-directory \"$dir/html\"
19 :recursive t
20 :publishing-function org-publish-org-to-html
21 :auto-preamble t)
22 ))
24 (org-publish-file \"$target\" '(\"project\"
25 :base-directory \"$dir/org\"
26 :base-extension \"org\"
27 :publishing-directory \"$dir/html\"
28 :recursive t
29 :publishing-function org-publish-org-to-html
30 :auto-preamble t)
31 ))" \
32 \
33 2>&1 #| pcregrep 'Wrote'