hugo-xmin/exampleSite/R/build.R

13 lines
507 B
R

if (Sys.getenv('USER') != 'yihui' || Sys.which('git') == '' ||
!grepl(
'git@github.com:yihui/hugo-xmin.git',
system2('git', c('remote', '-v'), stdout = TRUE)
)) q('no')
file.copy('content/_index.markdown', '../README.md', overwrite = TRUE)
if (Sys.which('sed') != '') system("sed -i '' -e '1,6d' -e '34,38d' ../README.md")
cat(
'[![Screenshot](https://github.com/yihui/hugo-xmin/raw/master/images/screenshot.png)](https://xmin.yihui.name)\n',
file = '../README.md', append = TRUE
)