Add message about rstudioapi::applyTheme

make.R

@@ -30,7 +30,7 @@ get_theme_name <- function(file) {
 }
 
 cp_to_rstudio <- function(file) {
-  cli_alert("{emph {get_theme_name(file)}}")
+  cli_alert("{arg \"{get_theme_name(file)}\"}")
   file_copy(
     file, 
     path_home_r(".R", "rstudio", "themes", path_file(file)),
@@ -40,4 +40,6 @@ cp_to_rstudio <- function(file) {
 
 cli_alert_info('Installing themes to {path {path_home_r(".R", "rstudio", "themes")}}')
 dir_ls("dist", regexp = "\\.rstheme") %>%
-  walk(cp_to_rstudio)
+  walk(cp_to_rstudio)
+
+cli_alert_info("Use {code {fun rstudioapi::applyTheme}} to enable the above themes")