The R Project SVN R

Rev

Rev 37490 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 37490 Rev 37742
Line 9... Line 9...
9 
ffile=${1}
 9 
ffile=${1}
10 
tfile=${2}
 10 
tfile=${2}
11 
exitstatus=${3}
 11 
exitstatus=${3}
12 
 
 12 
 
13 
## sed script to get rid of the startup message
 13 
## sed script to get rid of the startup message
14 
script='/^R : Copyright/,/quit R.$/{d;}'
 14 
script='/^R \(version\|: Copyright\) /,/quit R.$/{d;}'
- 
 
 15 
 
15 
## egrep pattern to get rid of some more
 16 
## egrep pattern to get rid of some more
16 
## <= 2.2.x was pattern='(^Number of.*:|^Time |^Loading required package.*'
 17 
## <= 2.2.x was pattern='(^Number of.*:|^Time |^Loading required package.*'
17 
pattern='(^Time |^Loading required package.*'
 18 
pattern='(^Time |^Loading required package.*'
18 
case "${ffile}" in
 19 
case "${ffile}" in
19 
  *primitive-funs*)
 20 
  *primitive-funs*)