move command-line tests to test-basic.R so that we can avoid publishi…

…ng TinyTeX when these commands fail, e.g., yihui/yihui.org#1089 (comment)

tools/test-basic.R

@@ -1,3 +1,12 @@
+cmds = c(
+  "tlmgr info --list --data relocatable" = tinytex:::tl_list('framed', 'relocatable'),
+  "tlmgr search --file --global '/framed.sty'" = tinytex::tlmgr_search('/framed.sty')
+)
+if (any(i <- cmds != 0)) stop(
+  'The command(s) ', paste0('`', names(cmds)[i], '`', collapse = ', '),
+  ' failed. It might be a bug of TeX Live.'
+)
+
 for (i in c('tlmgr', 'pdflatex', 'xelatex', 'pandoc')) {
   cat('\nThe version of', i, '\n\n')
   system2(i, '--version')

tools/test-packages.R

@@ -62,11 +62,3 @@ if (!identical(p1 <- tinytex:::tl_platforms(), p2 <- tinytex:::.tl_platforms)) s
   '\n.tl_platforms returned ', paste(p2, collapse = ', '),
   '\nThe latter needs to be updated in the tinytex package.'
 )
-
-if (tinytex:::tl_list('framed', 'relocatable') != 0) {
-  stop('The command `tlmgr info --list --data relocatable` failed. It might be a bug of TeX Live.')
-}
-
-if (tinytex::tlmgr_search('/framed.sty') != 0) {
-  stop('The command `tlmgr search` failed. It might be a bug of TeX Live.')
-}