3 root=$(r -e 'suppressMessages(library(cran2deb));cat(system.file(package="cran2deb"),file=stdout())')
6 if [ "x" = "x$cmd" ]; then
10 if [ ! -x "$root/exec/$cmd" ]; then
11 echo unknown command $cmd
18 if [ "$(id -un)" != c2d ]; then
19 precmd="sudo -u c2d -E"
22 if [ "web" = "$cmd" ]; then
23 # web uses getopt and would be irritated by the "$root" argument
24 $precmd "$root/exec/$cmd" $*
26 $precmd "$root/exec/$cmd" "$root" $*