prepare for cran

DESCRIPTION

@@ -1,6 +1,6 @@
 Package: shinylogs
 Title: Record Everything that Happens in a 'Shiny' Application
-Version: 0.2.0.9100
+Version: 0.2.1
 Authors@R: c(person("Fanny", "Meyer", role = "aut"),
   person("Victor", "Perrier", email = "[email protected]", role = c("aut", "cre")),
   person("Silex Technologies", comment = "https://www.silex-ip.com", role = "fnd"))

NEWS.md

@@ -1,9 +1,10 @@
-# shinylogs (unreleased)
+# shinylogs 0.2.1
 
 * `track_usage()` has new arguments:
   + `app_name`: explicitly set application's name, thanks to [@PaulC91](https://github.com/PaulC91)
   + `what`: elements to record between `"session"`, `"input"`, `"output"` and `"error"`.
 
+
 # shinylogs 0.2.0
 
 * Timestamp is now recorded in microseconds (fix [#6](https://github.com/dreamRs/shinylogs/issues/6)).

R/utils.R

@@ -17,10 +17,10 @@ get_user_ <- function(session) {
   if (!is.null(session$user))
     return(session$user)
   user <- Sys.getenv("SHINYPROXY_USERNAME")
-  if (user != "") {
+  if (!identical(user, "")) {
     return(user)
   } else {
-    getOption("shinylogs.default_user", default = Sys.info()[['user']])
+    getOption("shinylogs.default_user", default = Sys.info()[["user"]])
   }
 }