Kurt B. Kaiser | 4cc5ef5 | 2003-01-22 00:23:23 +0000 | [diff] [blame] | 1 | """Define the menu contents, hotkeys, and event bindings. |
David Scherer | 7aced17 | 2000-08-15 01:13:23 +0000 | [diff] [blame] | 2 | |
Kurt B. Kaiser | 4cc5ef5 | 2003-01-22 00:23:23 +0000 | [diff] [blame] | 3 | There is additional configuration information in the EditorWindow class (and |
| 4 | subclasses): the menus are created there based on the menu_specs (class) |
| 5 | variable, and menus not created are silently skipped in the code here. This |
| 6 | makes it possible, for example, to define a Debug menu which is only present in |
| 7 | the PythonShell window, and a Format menu which is only present in the Editor |
| 8 | windows. |
| 9 | |
| 10 | """ |
Terry Jan Reedy | 7e55db2 | 2014-07-28 22:23:59 -0400 | [diff] [blame] | 11 | from importlib.util import find_spec |
| 12 | |
Kurt B. Kaiser | 2d7f6a0 | 2007-08-22 23:01:33 +0000 | [diff] [blame] | 13 | from idlelib.configHandler import idleConf |
Ned Deily | b760167 | 2014-03-27 20:49:14 -0700 | [diff] [blame] | 14 | |
| 15 | # Warning: menudefs is altered in macosxSupport.overrideRootMenu() |
| 16 | # after it is determined that an OS X Aqua Tk is in use, |
| 17 | # which cannot be done until after Tk() is first called. |
| 18 | # Do not alter the 'file', 'options', or 'help' cascades here |
| 19 | # without altering overrideRootMenu() as well. |
| 20 | # TODO: Make this more robust |
David Scherer | 7aced17 | 2000-08-15 01:13:23 +0000 | [diff] [blame] | 21 | |
| 22 | menudefs = [ |
| 23 | # underscore prefixes character to underscore |
| 24 | ('file', [ |
Terry Jan Reedy | 8a0b775 | 2013-07-01 00:42:52 -0400 | [diff] [blame] | 25 | ('_New File', '<<open-new-window>>'), |
David Scherer | 7aced17 | 2000-08-15 01:13:23 +0000 | [diff] [blame] | 26 | ('_Open...', '<<open-window-from-file>>'), |
Kurt B. Kaiser | d375abe | 2002-12-24 00:51:05 +0000 | [diff] [blame] | 27 | ('Open _Module...', '<<open-module>>'), |
| 28 | ('Class _Browser', '<<open-class-browser>>'), |
| 29 | ('_Path Browser', '<<open-path-browser>>'), |
David Scherer | 7aced17 | 2000-08-15 01:13:23 +0000 | [diff] [blame] | 30 | None, |
| 31 | ('_Save', '<<save-window>>'), |
| 32 | ('Save _As...', '<<save-window-as-file>>'), |
Thomas Wouters | 00ee7ba | 2006-08-21 19:07:27 +0000 | [diff] [blame] | 33 | ('Save Cop_y As...', '<<save-copy-of-window-as-file>>'), |
David Scherer | 7aced17 | 2000-08-15 01:13:23 +0000 | [diff] [blame] | 34 | None, |
Thomas Wouters | 00ee7ba | 2006-08-21 19:07:27 +0000 | [diff] [blame] | 35 | ('Prin_t Window', '<<print-window>>'), |
Steven M. Gava | 7981ce5 | 2002-06-11 04:45:34 +0000 | [diff] [blame] | 36 | None, |
David Scherer | 7aced17 | 2000-08-15 01:13:23 +0000 | [diff] [blame] | 37 | ('_Close', '<<close-window>>'), |
| 38 | ('E_xit', '<<close-all-windows>>'), |
| 39 | ]), |
| 40 | ('edit', [ |
| 41 | ('_Undo', '<<undo>>'), |
| 42 | ('_Redo', '<<redo>>'), |
| 43 | None, |
Steven M. Gava | 82c6682 | 2002-02-18 01:45:43 +0000 | [diff] [blame] | 44 | ('Cu_t', '<<cut>>'), |
| 45 | ('_Copy', '<<copy>>'), |
| 46 | ('_Paste', '<<paste>>'), |
David Scherer | 7aced17 | 2000-08-15 01:13:23 +0000 | [diff] [blame] | 47 | ('Select _All', '<<select-all>>'), |
Steven M. Gava | c597640 | 2002-01-04 03:06:08 +0000 | [diff] [blame] | 48 | None, |
| 49 | ('_Find...', '<<find>>'), |
Kurt B. Kaiser | d375abe | 2002-12-24 00:51:05 +0000 | [diff] [blame] | 50 | ('Find A_gain', '<<find-again>>'), |
| 51 | ('Find _Selection', '<<find-selection>>'), |
Steven M. Gava | c597640 | 2002-01-04 03:06:08 +0000 | [diff] [blame] | 52 | ('Find in Files...', '<<find-in-files>>'), |
| 53 | ('R_eplace...', '<<replace>>'), |
Kurt B. Kaiser | d375abe | 2002-12-24 00:51:05 +0000 | [diff] [blame] | 54 | ('Go to _Line', '<<goto-line>>'), |
David Scherer | 7aced17 | 2000-08-15 01:13:23 +0000 | [diff] [blame] | 55 | ]), |
Kurt B. Kaiser | 0c9b617 | 2002-09-14 00:50:44 +0000 | [diff] [blame] | 56 | ('format', [ |
Kurt B. Kaiser | 4cc5ef5 | 2003-01-22 00:23:23 +0000 | [diff] [blame] | 57 | ('_Indent Region', '<<indent-region>>'), |
| 58 | ('_Dedent Region', '<<dedent-region>>'), |
| 59 | ('Comment _Out Region', '<<comment-region>>'), |
| 60 | ('U_ncomment Region', '<<uncomment-region>>'), |
| 61 | ('Tabify Region', '<<tabify-region>>'), |
| 62 | ('Untabify Region', '<<untabify-region>>'), |
| 63 | ('Toggle Tabs', '<<toggle-tabs>>'), |
| 64 | ('New Indent Width', '<<change-indentwidth>>'), |
| 65 | ]), |
| 66 | ('run', [ |
Kurt B. Kaiser | d375abe | 2002-12-24 00:51:05 +0000 | [diff] [blame] | 67 | ('Python Shell', '<<open-python-shell>>'), |
Kurt B. Kaiser | 4cc5ef5 | 2003-01-22 00:23:23 +0000 | [diff] [blame] | 68 | ]), |
Kurt B. Kaiser | 1061e72 | 2003-01-04 01:43:53 +0000 | [diff] [blame] | 69 | ('shell', [ |
| 70 | ('_View Last Restart', '<<view-restart>>'), |
| 71 | ('_Restart Shell', '<<restart-shell>>'), |
Kurt B. Kaiser | 4cc5ef5 | 2003-01-22 00:23:23 +0000 | [diff] [blame] | 72 | ]), |
| 73 | ('debug', [ |
Kurt B. Kaiser | d375abe | 2002-12-24 00:51:05 +0000 | [diff] [blame] | 74 | ('_Go to File/Line', '<<goto-file-line>>'), |
David Scherer | 7aced17 | 2000-08-15 01:13:23 +0000 | [diff] [blame] | 75 | ('!_Debugger', '<<toggle-debugger>>'), |
Kurt B. Kaiser | 1061e72 | 2003-01-04 01:43:53 +0000 | [diff] [blame] | 76 | ('_Stack Viewer', '<<open-stack-viewer>>'), |
Kurt B. Kaiser | 4cc5ef5 | 2003-01-22 00:23:23 +0000 | [diff] [blame] | 77 | ('!_Auto-open Stack Viewer', '<<toggle-jit-stack-viewer>>'), |
| 78 | ]), |
Kurt B. Kaiser | 1061e72 | 2003-01-04 01:43:53 +0000 | [diff] [blame] | 79 | ('options', [ |
Terry Jan Reedy | a9421fb | 2014-10-22 20:15:18 -0400 | [diff] [blame] | 80 | ('Configure _IDLE', '<<open-config-dialog>>'), |
Kurt B. Kaiser | 610c7e0 | 2004-04-24 03:01:48 +0000 | [diff] [blame] | 81 | None, |
Kurt B. Kaiser | 4cc5ef5 | 2003-01-22 00:23:23 +0000 | [diff] [blame] | 82 | ]), |
David Scherer | 7aced17 | 2000-08-15 01:13:23 +0000 | [diff] [blame] | 83 | ('help', [ |
Kurt B. Kaiser | 8e92bf7 | 2003-01-14 22:03:31 +0000 | [diff] [blame] | 84 | ('_About IDLE', '<<about-idle>>'), |
David Scherer | 7aced17 | 2000-08-15 01:13:23 +0000 | [diff] [blame] | 85 | None, |
Kurt B. Kaiser | 8e92bf7 | 2003-01-14 22:03:31 +0000 | [diff] [blame] | 86 | ('_IDLE Help', '<<help>>'), |
| 87 | ('Python _Docs', '<<python-docs>>'), |
Kurt B. Kaiser | 4cc5ef5 | 2003-01-22 00:23:23 +0000 | [diff] [blame] | 88 | ]), |
David Scherer | 7aced17 | 2000-08-15 01:13:23 +0000 | [diff] [blame] | 89 | ] |
| 90 | |
Terry Jan Reedy | 7e55db2 | 2014-07-28 22:23:59 -0400 | [diff] [blame] | 91 | if find_spec('turtledemo'): |
| 92 | menudefs[-1][1].append(('Turtle Demo', '<<open-turtle-demo>>')) |
| 93 | |
Steven M. Gava | 72c3bf0 | 2002-01-19 10:41:51 +0000 | [diff] [blame] | 94 | default_keydefs = idleConf.GetCurrentKeySet() |