The R Project SVN R

Rev

Rev 4662 | Rev 4739 | Go to most recent revision | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 4662 Rev 4736
Line 7... Line 7...
7 
#
 7 
#
8 
Pwd=`dirname $0`
 8 
Pwd=`dirname $0`
9 
R_HOME=${Pwd}/..
 9 
R_HOME=${Pwd}/..
10 
MANTEXDIR=${R_HOME}/doc/manual
 10 
MANTEXDIR=${R_HOME}/doc/manual
11 
D2L="${Pwd}/Rdconv -t latex"
 11 
D2L="${Pwd}/Rdconv -t latex"
- 
 
 12 
file_sed='s/[_$]/\\\\&/g'
- 
 
 13 
# Quote the      ^^^^  "\" twice (-> 4 \ ) since it used in ".."
- 
 
 14 
## If perl-sh: sub subject() {
- 
 
 15 
##	"$1"'{\\Large \\file{'`echo  $2  | sed $file_sed`"}$3" }
12 
#
 16 
#
13 
call_dir=`pwd`
 17 
call_dir=`pwd`
14 
 
 - 
 
15 
if [ -f Rd2.tex ]
 18 
if [ -f Rd2.tex ]
16 
then
 19 
then
17 
    echo "'Rd2.tex' already exists -- renaming it to  Rd2.tex.Older"
 20 
    echo "'Rd2.tex' already exists -- renaming it to  Rd2.tex.Older"
18 
    echo " -------- "
 21 
    echo " -------- "
19 
    mv Rd2.tex Rd2.tex.Older
 22 
    mv Rd2.tex Rd2.tex.Older
Line 23... Line 26...
23 
then
 26 
then
24 
    dir=$1
 27 
    dir=$1
25 
    test -d $dir/man && dir=$dir/man
 28 
    test -d $dir/man && dir=$dir/man
26 
    echo "Rd2dvi : \`Rdconv -t latex' $dir/ files..."
 29 
    echo "Rd2dvi : \`Rdconv -t latex' $dir/ files..."
27 
    files="${dir}/*.Rd"
 30 
    files="${dir}/*.Rd"
28 
    subj="of all in $dir"
 31 
    subj='of all in {\\Large \\file{'`echo $dir | sed $file_sed`'}}'
29 
    # DBG: echo "files = $files"
 32 
    # DBG: echo "files = $files"
30 
    toc_sed='; s/\\input{Rd/\\Rdcontents{\\R\\ objects documented:} &/'
 33 
    toc_sed='; s/\\input{Rd/\\Rdcontents{\\R\\ objects documented:} &/'
31 
else
 34 
else
32 
    files="$@"
 35 
    files="$@"
- 
 
 36 
    if [ $# -gt 1 ]; then subj=' ...etc '; else subj=''; fi
33 
    subj="of $1"
 37 
    subj='of {\\Large \\file{'`echo  $1  | sed $file_sed`"}$subj}"
- 
 
 38 
    echo "Rd2dvi : Collecting files and \`Rdconv -t latex'ing them ..."
34 
    toc_sed=''
 39 
    toc_sed=''
35 
    if [ $# -gt 1 ]; then subj="$subj ...etc "; fi
 - 
 
36 
    echo "Rd2dvi : Collecting files and \`Rdconv -t latex' them ..."
 - 
 
37 
fi
 40 
fi
- 
 
 41 
## DEBUG: echo ''; echo 'subj:'; echo "$subj"; echo ''
38 
for f in $files
 42 
for f in $files
39 
do
43 
do
40 
    echo $f
 44 
    echo $f
41 
    $D2L $f >> Rd2.tex
 45 
    $D2L $f >> Rd2.tex
42 
done
 46 
done
43 
echo "MANTEXDIR='$MANTEXDIR'"
 47 
echo "MANTEXDIR='$MANTEXDIR'"
44 
R_P=`echo 'getenv("R_PAPERSIZE")'| R --vanilla --quiet|grep -v getenv|grep '"'|sed 's/ *//g;s/"//g'`
 48 
R_P=`echo 'getenv("R_PAPERSIZE")'| R --vanilla --quiet|grep -v getenv|grep '"'|sed 's/ *//g;s/"//g'`