mirror of
https://git.lyx.org/repos/lyx.git
synced 2024-12-19 20:24:45 +00:00
11 lines
302 B
R
11 lines
302 B
R
|
# Wrapper around Sweave that sets up some things for LyX
|
||
|
# argument 1 is the file name
|
||
|
|
||
|
args <- commandArgs(trailingOnly=T)
|
||
|
|
||
|
# check whether Sweave.sty is seen by LaTeX
|
||
|
sweavesty <- system("kpsewhich Sweave.sty", intern=T, ignore.stderr=T)
|
||
|
sp <- (length(sweavesty) == 0)
|
||
|
|
||
|
Sweave(args[1], stylepath=sp)
|