Permalink
Browse files

Added os.manage to the main menu bar

  • Loading branch information...
1 parent 88ab31e commit 45cecc47e9a0452f1dd89006e99044db1cb2f765 @talgalili committed Mar 13, 2013
Showing with 4 additions and 2 deletions.
  1. +2 −1 NEWS
  2. +1 −1 R/os.manage.r
  3. +1 −0 R/zzz.r
View
3 NEWS
@@ -145,4 +145,5 @@ TODO for future releases:
* update RTools to be smarter about how to ask the user what to choose. Also check if the Rtools is already installed or not (devtools has such a function)
* update README.md for 0.8.5
* Add install.notepad and install.notepadpp
- * Maybe add some timer to the os.manage functions. And also allow input for how long from x time to perform the action.
+ * Maybe add some timer to the os.manage functions. And also allow input for how long from x time to perform the action.
+ * Add a rate function for the package
View
@@ -195,7 +195,7 @@ os.manage <- function(use_GUI = TRUE, ...) {
"Restart",
"Cancel")
- the_answer <- menu(choices, graphics = use_GUI, title = "Managing action for your OS (for Windows)")
+ the_answer <- menu(choices, graphics = use_GUI, title = "Manage your OS (for Windows)")
switch(the_answer,
os.shutdown(),
View
@@ -70,6 +70,7 @@ add.installr.GUI <- function() {
winMenuAddItem("Update", "Update R", "updateR()")
winMenuAddItem("Update", "Update R packages", "update.packages(ask = F)")
winMenuAddItem("Update", "Install software", "installr()")
+ winMenuAddItem("Update", "Manage Windows", "os.manage()")
return(invisible(TRUE))
} else {
return(invisible(FALSE))

0 comments on commit 45cecc4

Please sign in to comment.