ported r43521 [system() in embedFonts()] from trunk

git-svn-id: https://svn.r-project.org/R/branches/R-2-6-branch@43522 00db46b3-68df-0310-9c12-caf00c1e9a41
wch · Nov 22, 2007 · 8ae5136 · 8ae5136
1 parent 3b33332
commit 8ae5136
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/src/library/grDevices/R/postscript.R b/src/library/grDevices/R/postscript.R
@@ -871,7 +871,7 @@ embedFonts <- function(file, # The ps or pdf file to convert
     cmd <- paste(gsexe, " -dNOPAUSE -dBATCH -q -dAutoRotatePages=/None -sDEVICE=", format,
                  " -sOutputFile=", tmpfile, " ", fontpaths, " ",
                  options, " ", file, sep = "")
-    ret <- system(cmd, invisible = TRUE)
+    ret <- system(cmd)
     if(ret != 0)
         stop(gettextf("status %d in running command '%s'", ret, cmd),
              domain = NA)