diff --git a/R/methods_spsample.R b/R/methods_spsample.R
index 7fa0a875a65a6c1646a1dcb31dec18cd7cf550ac..0cbbab03f4807e709e54e975d637ab62199f6b31 100755
--- a/R/methods_spsample.R
+++ b/R/methods_spsample.R
@@ -41,7 +41,7 @@ setMethod(
         
         # Assign centroids outside the target universe to the nearest
         # cell within the target universe. To simplify things, the Euclidean
-        # distance will used until a better solution has been found for
+        # distance will be used until a better solution has been found for
         # handling these kinds of centroids
         isOutsideTargetUniverse <- is.na(centroids %over% geometry(x@cells))
         if (any(isOutsideTargetUniverse)) {