milne typos

uptake · Nov 20, 2018 · 5654fac · 5654fac
1 parent 1985584
commit 5654fac
Show file tree

Hide file tree

Showing 2 changed files with 6 additions and 6 deletions.
diff --git a/inst/milne/DESCRIPTION b/inst/milne/DESCRIPTION
@@ -7,7 +7,7 @@ Authors@R: c(
     person("Jay", "Qi", email = "jay.qi@uptake.com", role = c("aut", "cre"))
     )
 Maintainer: Jay Qi <jay.qi@uptake.com>
-Description: This package is used to test the functions in `pkgnet`. So I think I'll be six now for ever and ever.
+Description: This package is used to test object-oriented class functionality for the reporters in `pkgnet`. So I think I'll be six now for ever and ever.
 Imports:
     R6
 Suggests:

diff --git a/inst/milne/R/The_End.R b/inst/milne/R/The_End.R
@@ -8,7 +8,7 @@ One <- R6::R6Class(
     classname = "One",
     public = list(
         initialize = function() {
-            cat("The End, by A. A. Milne")
+            cat("The End, by A. A. Milne \n")
         },
         print_poem = function() {
             cat("When I was One, \n", 
@@ -55,7 +55,7 @@ Three <- R6::R6Class(
         print_poem = function() {
             super$print_poem()
             cat("When I was Three, \n", 
-                "I was hardly me. \n"
+                "I was hardly Me. \n"
             )
         }
     )
@@ -114,16 +114,16 @@ Six <- R6::R6Class(
     public = list(
         print_poem = function() {
             super$print_poem()
-            cat("When I was Six, \n", 
+            cat("But now I am Six,", 
                 "I'm as clever as clever. \n"
             )
             private$print_ending()
         }
     ),
     private = list(
         print_ending = function() {
-            cat("So I think I'll be Six now, \n",
-                "Forever and ever."
+            cat("So I think I'll be six now",
+                "for ever and ever."
             )
         }
     )