home *** CD-ROM | disk | FTP | other *** search
/ Freelog 125 / Freelog_MarsAvril2015_No125.iso / Bureautique / OpenOffice / Apache_OpenOffice_4.1.1_Win_x86_install_fr.exe / openoffice1.cab / macosxSupport.py < prev    next >
Text File  |  2014-07-29  |  6KB  |  176 lines
  1. """
  2. A number of function that enhance IDLE on MacOSX when it used as a normal
  3. GUI application (as opposed to an X11 application).
  4. """
  5. import sys
  6. import Tkinter
  7. from os import path
  8.  
  9.  
  10. _appbundle = None
  11.  
  12. def runningAsOSXApp():
  13.     """
  14.     Returns True if Python is running from within an app on OSX.
  15.     If so, assume that Python was built with Aqua Tcl/Tk rather than
  16.     X11 Tcl/Tk.
  17.     """
  18.     global _appbundle
  19.     if _appbundle is None:
  20.         _appbundle = (sys.platform == 'darwin' and '.app' in sys.executable)
  21.     return _appbundle
  22.  
  23. _carbonaquatk = None
  24.  
  25. def isCarbonAquaTk(root):
  26.     """
  27.     Returns True if IDLE is using a Carbon Aqua Tk (instead of the
  28.     newer Cocoa Aqua Tk).
  29.     """
  30.     global _carbonaquatk
  31.     if _carbonaquatk is None:
  32.         _carbonaquatk = (runningAsOSXApp() and
  33.                          'aqua' in root.tk.call('tk', 'windowingsystem') and
  34.                          'AppKit' not in root.tk.call('winfo', 'server', '.'))
  35.     return _carbonaquatk
  36.  
  37. def tkVersionWarning(root):
  38.     """
  39.     Returns a string warning message if the Tk version in use appears to
  40.     be one known to cause problems with IDLE.
  41.     1. Apple Cocoa-based Tk 8.5.7 shipped with Mac OS X 10.6 is unusable.
  42.     2. Apple Cocoa-based Tk 8.5.9 in OS X 10.7 and 10.8 is better but
  43.         can still crash unexpectedly.
  44.     """
  45.  
  46.     if (runningAsOSXApp() and
  47.             ('AppKit' in root.tk.call('winfo', 'server', '.')) ):
  48.         patchlevel = root.tk.call('info', 'patchlevel')
  49.         if patchlevel not in ('8.5.7', '8.5.9'):
  50.             return False
  51.         return (r"WARNING: The version of Tcl/Tk ({0}) in use may"
  52.                 r" be unstable.\n"
  53.                 r"Visit http://www.python.org/download/mac/tcltk/"
  54.                 r" for current information.".format(patchlevel))
  55.     else:
  56.         return False
  57.  
  58. def addOpenEventSupport(root, flist):
  59.     """
  60.     This ensures that the application will respond to open AppleEvents, which
  61.     makes is feasible to use IDLE as the default application for python files.
  62.     """
  63.     def doOpenFile(*args):
  64.         for fn in args:
  65.             flist.open(fn)
  66.  
  67.     # The command below is a hook in aquatk that is called whenever the app
  68.     # receives a file open event. The callback can have multiple arguments,
  69.     # one for every file that should be opened.
  70.     root.createcommand("::tk::mac::OpenDocument", doOpenFile)
  71.  
  72. def hideTkConsole(root):
  73.     try:
  74.         root.tk.call('console', 'hide')
  75.     except Tkinter.TclError:
  76.         # Some versions of the Tk framework don't have a console object
  77.         pass
  78.  
  79. def overrideRootMenu(root, flist):
  80.     """
  81.     Replace the Tk root menu by something that's more appropriate for
  82.     IDLE.
  83.     """
  84.     # The menu that is attached to the Tk root (".") is also used by AquaTk for
  85.     # all windows that don't specify a menu of their own. The default menubar
  86.     # contains a number of menus, none of which are appropriate for IDLE. The
  87.     # Most annoying of those is an 'About Tck/Tk...' menu in the application
  88.     # menu.
  89.     #
  90.     # This function replaces the default menubar by a mostly empty one, it
  91.     # should only contain the correct application menu and the window menu.
  92.     #
  93.     # Due to a (mis-)feature of TkAqua the user will also see an empty Help
  94.     # menu.
  95.     from Tkinter import Menu, Text, Text
  96.     from idlelib.EditorWindow import prepstr, get_accelerator
  97.     from idlelib import Bindings
  98.     from idlelib import WindowList
  99.     from idlelib.MultiCall import MultiCallCreator
  100.  
  101.     menubar = Menu(root)
  102.     root.configure(menu=menubar)
  103.     menudict = {}
  104.  
  105.     menudict['windows'] = menu = Menu(menubar, name='windows')
  106.     menubar.add_cascade(label='Window', menu=menu, underline=0)
  107.  
  108.     def postwindowsmenu(menu=menu):
  109.         end = menu.index('end')
  110.         if end is None:
  111.             end = -1
  112.  
  113.         if end > 0:
  114.             menu.delete(0, end)
  115.         WindowList.add_windows_to_menu(menu)
  116.     WindowList.register_callback(postwindowsmenu)
  117.  
  118.     def about_dialog(event=None):
  119.         from idlelib import aboutDialog
  120.         aboutDialog.AboutDialog(root, 'About IDLE')
  121.  
  122.     def config_dialog(event=None):
  123.         from idlelib import configDialog
  124.         root.instance_dict = flist.inversedict
  125.         configDialog.ConfigDialog(root, 'Settings')
  126.  
  127.     def help_dialog(event=None):
  128.         from idlelib import textView
  129.         fn = path.join(path.abspath(path.dirname(__file__)), 'help.txt')
  130.         textView.view_file(root, 'Help', fn)
  131.  
  132.     root.bind('<<about-idle>>', about_dialog)
  133.     root.bind('<<open-config-dialog>>', config_dialog)
  134.     root.createcommand('::tk::mac::ShowPreferences', config_dialog)
  135.     if flist:
  136.         root.bind('<<close-all-windows>>', flist.close_all_callback)
  137.  
  138.         # The binding above doesn't reliably work on all versions of Tk
  139.         # on MacOSX. Adding command definition below does seem to do the
  140.         # right thing for now.
  141.         root.createcommand('exit', flist.close_all_callback)
  142.  
  143.     if isCarbonAquaTk(root):
  144.         # for Carbon AquaTk, replace the default Tk apple menu
  145.         menudict['application'] = menu = Menu(menubar, name='apple')
  146.         menubar.add_cascade(label='IDLE', menu=menu)
  147.         Bindings.menudefs.insert(0,
  148.             ('application', [
  149.                 ('About IDLE', '<<about-idle>>'),
  150.                     None,
  151.                 ]))
  152.         tkversion = root.tk.eval('info patchlevel')
  153.         if tuple(map(int, tkversion.split('.'))) < (8, 4, 14):
  154.             # for earlier AquaTk versions, supply a Preferences menu item
  155.             Bindings.menudefs[0][1].append(
  156.                     ('_Preferences....', '<<open-config-dialog>>'),
  157.                 )
  158.     else:
  159.         # assume Cocoa AquaTk
  160.         # replace default About dialog with About IDLE one
  161.         root.createcommand('tkAboutDialog', about_dialog)
  162.         # replace default "Help" item in Help menu
  163.         root.createcommand('::tk::mac::ShowHelp', help_dialog)
  164.         # remove redundant "IDLE Help" from menu
  165.         del Bindings.menudefs[-1][1][0]
  166.  
  167. def setupApp(root, flist):
  168.     """
  169.     Perform setup for the OSX application bundle.
  170.     """
  171.     if not runningAsOSXApp(): return
  172.  
  173.     hideTkConsole(root)
  174.     overrideRootMenu(root, flist)
  175.     addOpenEventSupport(root, flist)
  176.