mirror of
https://git.lyx.org/repos/lyx.git
synced 2024-11-23 18:24:48 +00:00
425f46bea5
and use it to be able to read data files in there (bug #6623). It is probably possible to use sweave hooks instead of the module preamble. Moreover, I want to investigate the use of prefix.string argument of sweave to make sure that the output files end up in the tmp dir. * be more subtle in the way to change default encoding to handle the case where a data file that is read does not use the same encoding as the .rnw file. git-svn-id: svn://svn.lyx.org/lyx/lyx-devel/trunk@36850 a592a061-630c-0410-9148-cb99ea01b6c8
22 lines
656 B
R
22 lines
656 B
R
# Wrapper around Sweave that sets up some things for LyX
|
|
# argument 1 is the file name
|
|
# argument 2 is the iconv name for the encoding of the file
|
|
# argument 3 is the document directory
|
|
|
|
ls.args <- commandArgs(trailingOnly=T)
|
|
|
|
# check whether Sweave.sty is seen by LaTeX
|
|
ls.sweavesty <- system("kpsewhich Sweave.sty", intern=T, ignore.stderr=T)
|
|
ls.sp <- (length(ls.sweavesty) == 0)
|
|
|
|
# set default encoding to the one of the file; it will be reset to previous
|
|
# default by the sweave module
|
|
ls.enc=getOption("encoding")
|
|
options(encoding=ls.args[2])
|
|
|
|
# pass document dir to sweave module
|
|
ls.dir <- ls.args[3]
|
|
|
|
#run sweave
|
|
Sweave(ls.args[1], stylepath=ls.sp)
|