Guest User

Untitled

a guest
Oct 12th, 2018
80
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.74 KB | None | 0 0
  1. Item[KeyEvent["q", Modifiers -> {Control, Option}],
  2. FrontEndExecute[
  3. FrontEndToken[
  4. SelectedNotebook[ ],
  5. "EvaluatorQuit",
  6. Automatic
  7. ]
  8. ]
  9. ]
  10.  
  11. Item[KeyEvent["i", Modifiers -> {Command, Control}],
  12. FrontEndExecute[
  13. FrontEndToken[
  14. SelectedNotebook[ ],
  15. "InitializationCell",
  16. "Toggle"
  17. ]
  18. ]
  19. ]
  20.  
  21. Item[
  22. KeyEvent["i", Modifiers -> {Control, Command}],
  23. FrontEndExecute[
  24. FrontEnd`SetOptions[FrontEnd`NotebookSelection[], InitializationCell->Toggle]
  25. ]
  26. ]
Add Comment
Please, Sign In to add comment