diff --git a/R/methods.R b/R/methods.R
index 6b21275..8a471f1 100644
--- a/R/methods.R
+++ b/R/methods.R
@@ -31,7 +31,7 @@ stopIfNotWorkspace <- function(x){
 }
 
 
-#' Test if an object is an Azure ML workspace.
+#' Test if an object is an Azure ML Workspace.
 #' 
 #' @param x an R object
 #' @return logical value, TRUE if \code{x} represents an Azure ML workspace.
diff --git a/man/is.Workspace.Rd b/man/is.Workspace.Rd
index 70aeb75..3c80f02 100644
--- a/man/is.Workspace.Rd
+++ b/man/is.Workspace.Rd
@@ -2,7 +2,7 @@
 % Please edit documentation in R/methods.R
 \name{is.Workspace}
 \alias{is.Workspace}
-\title{Test if an object is an Azure ML workspace.}
+\title{Test if an object is an Azure ML Workspace.}
 \usage{
 is.Workspace(x)
 }
@@ -13,6 +13,6 @@ is.Workspace(x)
 logical value, TRUE if \code{x} represents an Azure ML workspace.
 }
 \description{
-Test if an object is an Azure ML workspace.
+Test if an object is an Azure ML Workspace.
 }