Server : LiteSpeed System : Linux barito.iixcp.rumahweb.net 5.14.0-611.49.1.el9_7.x86_64 #1 SMP PREEMPT_DYNAMIC Tue Apr 21 16:39:08 EDT 2026 x86_64 User : elvh3918 ( 1528) PHP Version : 8.2.31 Disable Function : mail Directory : /proc/self/root/opt/alt/python37/lib64/python3.7/idlelib/__pycache__/ |
B
o<�?�r � @ s� d dl mZ d dlZd dlmZ d dlZdadd� Zdd� Zdd � Z d
d � Z
d d
� Z dd� Z dd� Z
dd� Zdd� Zdd� Zdd� Zdd� Zd d � Zed kr�d d lmZ ed d!d"� dS )#� )�
expanduserN)�platformc C sj t dkrbt�� } | j�dd�}d|kr,dan,d|kr:dan d| j�d d
d �krTd and
a| �� ndad S )N�darwin�tkZwindowingsystemZx11�xquartzZaqua�otherZAppKitZwinfoZserver�.�cocoa�carbon)r �tkinterZTkr �call�_tk_typeZdestroy)�rootZws� r �3/opt/alt/python37/lib64/python3.7/idlelib/macosx.py�
_init_tk_type s
r c C s t s
t� t dkpt dkS )Nr r
)r
r r r r r �isAquaTk% s r c C s t s
t� t dkS )Nr
)r
r r r r r �
isCarbonTk- s r c C s t s
t� t dkS )Nr )r
r r r r r � isCocoaTk6 s r c C s t s
t� t dkS )Nr )r
r r r r r � isXQuartz> s r c C s2 t � r*| j�dd�}|dkr dS d�|�S dS d S )N�info�
patchlevel)z8.5.7z8.5.9Fz�WARNING: The version of Tcl/Tk ({0}) in use may be unstable.
Visit http://www.python.org/download/mac/tcltk/ for current information.)r r r �format)r r r r r �tkVersionWarningG s r c C sN t dkr d S td�} y t| d�� }t�|�S Q R X W n tk
rH d S X d S )Nr z.~/Library/Preferences/.GlobalPreferences.plist�rb)r r �open�plistlib�load�OSError)Z
plist_pathZ
plist_filer r r �readSystemPreferences\ s r c C s, t dkr d S t� } | r(| �d�dkr(dS d S )Nr ZAppleWindowTabbingMode�alwaysz�WARNING: The system preference "Prefer tabs when opening documents" is set to "Always". This will cause various problems with IDLE. For the best experience, change this setting when running IDLE (via System Preferences -> Dock).)r r �get)Zprefsr r r �preferTabsPreferenceWarningk s r" c s � fdd�}| � d|� d S )Nc s x| D ]}� � |� qW d S )N)r )�args�fn)�flistr r �
doOpenFile� s
z'addOpenEventSupport.<locals>.doOpenFilez::tk::mac::OpenDocument)�
createcommand)r r% r& r )r% r �addOpenEventSupport s r( c C s. y| j �dd� W n tjk
r( Y nX d S )NZconsoleZhide)r r r ZTclError)r r r r �
hideTkConsole� s r) c s� ddl m} ddlm} ddlm� |jd d d }|jd d dd �= |jd d �d|� |jd d dd
�= |jd d dd
�= |��}�j|d � i }||d dd
� |d < }|jd|dd� |f�fdd� }�� |� d$�fdd� } d%� �fdd� }
d&�fdd� } ��
d| � ��
d|
� �� d|
� � �rR��
d� j � �� d � j � t
� �r�||d dd
� |d < }|jd |d � |j�dd d!d gf� t� �rĈ� d"| � �� d#| � |jd d d= d S )'Nr )�Menu)�mainmenu)�window� ������� ���� )�menur, )�nameZtearoffZWindow)�labelr3 Z underlinec s8 | � d�}|d krd}|dkr*| �d|� � �| � d S )N�endr1 r )�index�deleteZadd_windows_to_menu)r3 r6 )r, r r �postwindowsmenu� s
z)overrideRootMenu.<locals>.postwindowsmenuc s ddl m} |�� � d S )Nr )�
help_about)�idlelibr: Z AboutDialog)�eventr: )r r r � about_dialog� s z&overrideRootMenu.<locals>.about_dialogc s$ ddl m} � j�_|��d� d S )Nr )� configdialogZSettings)r; r> Z inversedictZ
instance_dictZ ConfigDialog)r< r> )r% r r r �
config_dialog� s z'overrideRootMenu.<locals>.config_dialogc s ddl m} |�� � d S )Nr )�help)r; r@ Z
show_idlehelp)r< r@ )r r r � help_dialog� s z%overrideRootMenu.<locals>.help_dialogz<<about-idle>>z<<open-config-dialog>>z::tk::mac::ShowPreferencesz<<close-all-windows>>�exitZappleZ applicationZIDLE)r5 r3 )z
About IDLEz<<about-idle>>Z
tkAboutDialogz::tk::mac::ShowHelp)N)N)N)r r* r; r+ r, Zmenudefs�insertZ configureZ add_cascadeZregister_callbackZbindr' Zclose_all_callbackr r ) r r% r* r+ Z closeItemZmenubarZmenudictr3 r9 r= r? rA r )r% r r, r �overrideRootMenu� sH
rD c C s( | � dd� | � dd� | � dd� d S )NZTextz<B2>z <B2-Motion>z<<PasteSelection>>)Z unbind_class)r r r r � fixb2context� s rE c C s. t � r*t| � t| |� t| |� t| � d S )N)r r) rD r( rE )r r% r r r �setupApp s
rF �__main__)�mainz idlelib.idle_test.test_macosxr2 )� verbosity)Zos.pathr r �sysr r r
r r r r r r r r" r( r) rD rE rF �__name__ZunittestrH r r r r �<module> s( h