Getter and setter methods for title, author, datadir and theme

Getter and setter methods for title, author, datadir and theme for correct access to the slots of the object

R/AllGenerics.R

@@ -24,25 +24,25 @@ setGeneric("interactivity", function(dashboard) standardGeneric("interactivity")
 setGeneric("interactivity<-", function(dashboard, value) standardGeneric("interactivity<-"))
 
 #' @export
-setGeneric("get_title", function(dashboard) standardGeneric("get_title"))
+setGeneric("title", function(dashboard) standardGeneric("title"))
 
 #' @export
-setGeneric("set_title", function(dashboard, value) standardGeneric("set_title"))
+setGeneric("title<-", function(dashboard, value) standardGeneric("title<-"))
 
 #' @export
-setGeneric("get_author", function(dashboard) standardGeneric("get_author"))
+setGeneric("author", function(dashboard) standardGeneric("author"))
 
 #' @export
-setGeneric("set_author", function(dashboard, value) standardGeneric("set_author"))
+setGeneric("author<-", function(dashboard, value) standardGeneric("author<-"))
 
 #' @export
-setGeneric("get_theme", function(dashboard) standardGeneric("get_theme"))
+setGeneric("theme", function(dashboard) standardGeneric("theme"))
 
 #' @export
-setGeneric("set_theme", function(dashboard, value) standardGeneric("set_theme"))
+setGeneric("theme<-", function(dashboard, value) standardGeneric("theme<-"))
 
 #' @export
-setGeneric("get_datadir", function(dashboard) standardGeneric("get_datadir"))
+setGeneric("datadir", function(dashboard) standardGeneric("datadir"))
 
 #' @export
-setGeneric("set_datadir", function(dashboard, value) standardGeneric("set_datadir"))
\ No newline at end of file
+setGeneric("datadir<-", function(dashboard, value) standardGeneric("datadir<-"))
\ No newline at end of file