mirror of
				https://github.com/python/cpython.git
				synced 2025-10-31 05:31:20 +00:00 
			
		
		
		
	
		
			
				
	
	
		
			240 lines
		
	
	
	
		
			8.5 KiB
		
	
	
	
		
			Python
		
	
	
	
	
	
			
		
		
	
	
			240 lines
		
	
	
	
		
			8.5 KiB
		
	
	
	
		
			Python
		
	
	
	
	
	
| """
 | |
| A number of functions that enhance IDLE on Mac OSX.
 | |
| """
 | |
| import sys
 | |
| import tkinter
 | |
| from os import path
 | |
| import warnings
 | |
| 
 | |
| def runningAsOSXApp():
 | |
|     warnings.warn("runningAsOSXApp() is deprecated, use isAquaTk()",
 | |
|                         DeprecationWarning, stacklevel=2)
 | |
|     return isAquaTk()
 | |
| 
 | |
| def isCarbonAquaTk(root):
 | |
|     warnings.warn("isCarbonAquaTk(root) is deprecated, use isCarbonTk()",
 | |
|                         DeprecationWarning, stacklevel=2)
 | |
|     return isCarbonTk()
 | |
| 
 | |
| _tk_type = None
 | |
| 
 | |
| def _initializeTkVariantTests(root):
 | |
|     """
 | |
|     Initializes OS X Tk variant values for
 | |
|     isAquaTk(), isCarbonTk(), isCocoaTk(), and isXQuartz().
 | |
|     """
 | |
|     global _tk_type
 | |
|     if sys.platform == 'darwin':
 | |
|         ws = root.tk.call('tk', 'windowingsystem')
 | |
|         if 'x11' in ws:
 | |
|             _tk_type = "xquartz"
 | |
|         elif 'aqua' not in ws:
 | |
|             _tk_type = "other"
 | |
|         elif 'AppKit' in root.tk.call('winfo', 'server', '.'):
 | |
|             _tk_type = "cocoa"
 | |
|         else:
 | |
|             _tk_type = "carbon"
 | |
|     else:
 | |
|         _tk_type = "other"
 | |
| 
 | |
| def isAquaTk():
 | |
|     """
 | |
|     Returns True if IDLE is using a native OS X Tk (Cocoa or Carbon).
 | |
|     """
 | |
|     assert _tk_type is not None
 | |
|     return _tk_type == "cocoa" or _tk_type == "carbon"
 | |
| 
 | |
| def isCarbonTk():
 | |
|     """
 | |
|     Returns True if IDLE is using a Carbon Aqua Tk (instead of the
 | |
|     newer Cocoa Aqua Tk).
 | |
|     """
 | |
|     assert _tk_type is not None
 | |
|     return _tk_type == "carbon"
 | |
| 
 | |
| def isCocoaTk():
 | |
|     """
 | |
|     Returns True if IDLE is using a Cocoa Aqua Tk.
 | |
|     """
 | |
|     assert _tk_type is not None
 | |
|     return _tk_type == "cocoa"
 | |
| 
 | |
| def isXQuartz():
 | |
|     """
 | |
|     Returns True if IDLE is using an OS X X11 Tk.
 | |
|     """
 | |
|     assert _tk_type is not None
 | |
|     return _tk_type == "xquartz"
 | |
| 
 | |
| def tkVersionWarning(root):
 | |
|     """
 | |
|     Returns a string warning message if the Tk version in use appears to
 | |
|     be one known to cause problems with IDLE.
 | |
|     1. Apple Cocoa-based Tk 8.5.7 shipped with Mac OS X 10.6 is unusable.
 | |
|     2. Apple Cocoa-based Tk 8.5.9 in OS X 10.7 and 10.8 is better but
 | |
|         can still crash unexpectedly.
 | |
|     """
 | |
| 
 | |
|     if isCocoaTk():
 | |
|         patchlevel = root.tk.call('info', 'patchlevel')
 | |
|         if patchlevel not in ('8.5.7', '8.5.9'):
 | |
|             return False
 | |
|         return (r"WARNING: The version of Tcl/Tk ({0}) in use may"
 | |
|                 r" be unstable.\n"
 | |
|                 r"Visit http://www.python.org/download/mac/tcltk/"
 | |
|                 r" for current information.".format(patchlevel))
 | |
|     else:
 | |
|         return False
 | |
| 
 | |
| def addOpenEventSupport(root, flist):
 | |
|     """
 | |
|     This ensures that the application will respond to open AppleEvents, which
 | |
|     makes is feasible to use IDLE as the default application for python files.
 | |
|     """
 | |
|     def doOpenFile(*args):
 | |
|         for fn in args:
 | |
|             flist.open(fn)
 | |
| 
 | |
|     # The command below is a hook in aquatk that is called whenever the app
 | |
|     # receives a file open event. The callback can have multiple arguments,
 | |
|     # one for every file that should be opened.
 | |
|     root.createcommand("::tk::mac::OpenDocument", doOpenFile)
 | |
| 
 | |
| def hideTkConsole(root):
 | |
|     try:
 | |
|         root.tk.call('console', 'hide')
 | |
|     except tkinter.TclError:
 | |
|         # Some versions of the Tk framework don't have a console object
 | |
|         pass
 | |
| 
 | |
| def overrideRootMenu(root, flist):
 | |
|     """
 | |
|     Replace the Tk root menu by something that is more appropriate for
 | |
|     IDLE with an Aqua Tk.
 | |
|     """
 | |
|     # The menu that is attached to the Tk root (".") is also used by AquaTk for
 | |
|     # all windows that don't specify a menu of their own. The default menubar
 | |
|     # contains a number of menus, none of which are appropriate for IDLE. The
 | |
|     # Most annoying of those is an 'About Tck/Tk...' menu in the application
 | |
|     # menu.
 | |
|     #
 | |
|     # This function replaces the default menubar by a mostly empty one, it
 | |
|     # should only contain the correct application menu and the window menu.
 | |
|     #
 | |
|     # Due to a (mis-)feature of TkAqua the user will also see an empty Help
 | |
|     # menu.
 | |
|     from tkinter import Menu
 | |
|     from idlelib import Bindings
 | |
|     from idlelib import WindowList
 | |
| 
 | |
|     closeItem = Bindings.menudefs[0][1][-2]
 | |
| 
 | |
|     # Remove the last 3 items of the file menu: a separator, close window and
 | |
|     # quit. Close window will be reinserted just above the save item, where
 | |
|     # it should be according to the HIG. Quit is in the application menu.
 | |
|     del Bindings.menudefs[0][1][-3:]
 | |
|     Bindings.menudefs[0][1].insert(6, closeItem)
 | |
| 
 | |
|     # Remove the 'About' entry from the help menu, it is in the application
 | |
|     # menu
 | |
|     del Bindings.menudefs[-1][1][0:2]
 | |
|     # Remove the 'Configure Idle' entry from the options menu, it is in the
 | |
|     # application menu as 'Preferences'
 | |
|     del Bindings.menudefs[-2][1][0]
 | |
|     menubar = Menu(root)
 | |
|     root.configure(menu=menubar)
 | |
|     menudict = {}
 | |
| 
 | |
|     menudict['windows'] = menu = Menu(menubar, name='windows', tearoff=0)
 | |
|     menubar.add_cascade(label='Window', menu=menu, underline=0)
 | |
| 
 | |
|     def postwindowsmenu(menu=menu):
 | |
|         end = menu.index('end')
 | |
|         if end is None:
 | |
|             end = -1
 | |
| 
 | |
|         if end > 0:
 | |
|             menu.delete(0, end)
 | |
|         WindowList.add_windows_to_menu(menu)
 | |
|     WindowList.register_callback(postwindowsmenu)
 | |
| 
 | |
|     def about_dialog(event=None):
 | |
|         "Handle Help 'About IDLE' event."
 | |
|         # Synchronize with EditorWindow.EditorWindow.about_dialog.
 | |
|         from idlelib import aboutDialog
 | |
|         aboutDialog.AboutDialog(root, 'About IDLE')
 | |
| 
 | |
|     def config_dialog(event=None):
 | |
|         "Handle Options 'Configure IDLE' event."
 | |
|         # Synchronize with EditorWindow.EditorWindow.config_dialog.
 | |
|         from idlelib import configDialog
 | |
| 
 | |
|         # Ensure that the root object has an instance_dict attribute,
 | |
|         # mirrors code in EditorWindow (although that sets the attribute
 | |
|         # on an EditorWindow instance that is then passed as the first
 | |
|         # argument to ConfigDialog)
 | |
|         root.instance_dict = flist.inversedict
 | |
|         configDialog.ConfigDialog(root, 'Settings')
 | |
| 
 | |
|     def help_dialog(event=None):
 | |
|         "Handle Help 'IDLE Help' event."
 | |
|         # Synchronize with EditorWindow.EditorWindow.help_dialog.
 | |
|         from idlelib import help
 | |
|         help.show_idlehelp(root)
 | |
| 
 | |
|     root.bind('<<about-idle>>', about_dialog)
 | |
|     root.bind('<<open-config-dialog>>', config_dialog)
 | |
|     root.createcommand('::tk::mac::ShowPreferences', config_dialog)
 | |
|     if flist:
 | |
|         root.bind('<<close-all-windows>>', flist.close_all_callback)
 | |
| 
 | |
|         # The binding above doesn't reliably work on all versions of Tk
 | |
|         # on MacOSX. Adding command definition below does seem to do the
 | |
|         # right thing for now.
 | |
|         root.createcommand('exit', flist.close_all_callback)
 | |
| 
 | |
|     if isCarbonTk():
 | |
|         # for Carbon AquaTk, replace the default Tk apple menu
 | |
|         menudict['application'] = menu = Menu(menubar, name='apple',
 | |
|                                               tearoff=0)
 | |
|         menubar.add_cascade(label='IDLE', menu=menu)
 | |
|         Bindings.menudefs.insert(0,
 | |
|             ('application', [
 | |
|                 ('About IDLE', '<<about-idle>>'),
 | |
|                     None,
 | |
|                 ]))
 | |
|         tkversion = root.tk.eval('info patchlevel')
 | |
|         if tuple(map(int, tkversion.split('.'))) < (8, 4, 14):
 | |
|             # for earlier AquaTk versions, supply a Preferences menu item
 | |
|             Bindings.menudefs[0][1].append(
 | |
|                     ('_Preferences....', '<<open-config-dialog>>'),
 | |
|                 )
 | |
|     if isCocoaTk():
 | |
|         # replace default About dialog with About IDLE one
 | |
|         root.createcommand('tkAboutDialog', about_dialog)
 | |
|         # replace default "Help" item in Help menu
 | |
|         root.createcommand('::tk::mac::ShowHelp', help_dialog)
 | |
|         # remove redundant "IDLE Help" from menu
 | |
|         del Bindings.menudefs[-1][1][0]
 | |
| 
 | |
| def setupApp(root, flist):
 | |
|     """
 | |
|     Perform initial OS X customizations if needed.
 | |
|     Called from PyShell.main() after initial calls to Tk()
 | |
| 
 | |
|     There are currently three major versions of Tk in use on OS X:
 | |
|         1. Aqua Cocoa Tk (native default since OS X 10.6)
 | |
|         2. Aqua Carbon Tk (original native, 32-bit only, deprecated)
 | |
|         3. X11 (supported by some third-party distributors, deprecated)
 | |
|     There are various differences among the three that affect IDLE
 | |
|     behavior, primarily with menus, mouse key events, and accelerators.
 | |
|     Some one-time customizations are performed here.
 | |
|     Others are dynamically tested throughout idlelib by calls to the
 | |
|     isAquaTk(), isCarbonTk(), isCocoaTk(), isXQuartz() functions which
 | |
|     are initialized here as well.
 | |
|     """
 | |
|     _initializeTkVariantTests(root)
 | |
|     if isAquaTk():
 | |
|         hideTkConsole(root)
 | |
|         overrideRootMenu(root, flist)
 | |
|         addOpenEventSupport(root, flist)
 | 
