improve error message

R/class.R

@@ -297,7 +297,7 @@ Mediawikir <- R6Class("Mediawikir",
          success <- self$postContent(paste(field," → ", newValue, sep=""))
        }
        else{
-         success <- paste("No modification of ",self$page," due to setting “",field,"” to “",newValue,"”.",sep="")
+         success <- paste("No modification of ",self$page," while trying to set “",field,"” to “",newValue,"”.",sep="")
        }
      }
      return(success)