Add shortcut and cursor listeners

[skranz]

Hi Jeff,

here is my pull request related to issue #14. You see that a shortcut event returns a quite detailed list with editorId, selection and so on. I found this detailed return very convenient, in particular when developing apps with multiple dynamically created Ace editor widgets.

It also returns a random number. This is makes it easier to check in R whether indeed a key has been pressed or an observer was just called by Shiny without a new key being pressed. (Shiny has the tendency to call observers too often when working with dynamic UI elements).

I updated the version so that different shortcuts for Windows and Mac can be defined but have not tested it on the Mac yet.

Of course you can remove my name from the description file. That is only for my own documentation.

Best wishes,
Sebastian

[vnijs]

I would be happy to test on Mac. I will wait until the pull request has been merged

[trestletech]

I don't know that CRAN would like this here. Can you remove that line and either add a contributors section to the README or I can after we merge?

[trestletech]

Great! Thanks for contributing.

I've gone through the code with a few concerns/questions. Whenever you have a chance to go through them I'd love to get your thoughts.

Thanks again.
Jeff

[skranz]

Hi Jeff,

thanks for your good suggestions. I should have implemented all of them with the new commit (if I have not overlooked anything). I also liked "hotkeys" very much as parameter name.

[trestletech]

Thanks again for the code! I had a chance to sit down and really play with it this evening and I agree that it will be a really useful feature to expose to users.

I merged it in and added a commit to clean up a couple of minor things and add an example in the inst/examples directory.

Keep the code coming! :)

[trestletech]

Oh, and I added a Contributors section to the README. Let me know if you have a different URL you'd prefer I use for you there.

[vnijs]

Just tested the new hotkeys function. Nice! Any idea if it would be possible to select the current line for runkey and then move the cursor down one line?

To use runkey and also an action button (evalRmd) to, for example, run knitr I adapted Jeff's example as shown below.

valsRmd <- reactiveValues(knit = 0)

observe({
input$runKeyRmd
if(!is.null(input$evalRmd)) isolate(valsRmd$knit <- valsRmd$knit + 1)
})

output$rmd_knitDoc <- renderUI({
if(valsRmd$knit == 1) return()

...