diff --git a/src/cpp/r/R/Tools.R b/src/cpp/r/R/Tools.R
index 286fc4cc96b..b8ebd575daf 100644
--- a/src/cpp/r/R/Tools.R
+++ b/src/cpp/r/R/Tools.R
@@ -229,11 +229,12 @@ assign( envir = .rs.Env, ".rs.setVar", function(name, var)
 #  - linux: getOption("pdfviewer")
 .rs.addFunction( "shellViewPdf", function(path)
 {
+   require(utils)
    sysName <- Sys.info()[['sysname']]
 
    if (identical(sysName, "Windows"))
    {
-     utils:::shell.exec(diagPath)
+     shell.exec(path)
    }
    else
    {