From 8ae5136369b8906f2424eda511862ad61776a227 Mon Sep 17 00:00:00 2001
From: maechler <maechler@00db46b3-68df-0310-9c12-caf00c1e9a41>
Date: Thu, 22 Nov 2007 10:39:27 +0000
Subject: [PATCH] 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
---
 src/library/grDevices/R/postscript.R | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/library/grDevices/R/postscript.R b/src/library/grDevices/R/postscript.R
index c40e021cce0..193a1790085 100644
--- 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)