| Server IP : 3.111.61.48 / Your IP : 216.73.216.67 Web Server : Apache System : Linux ip-10-0-5-176 6.8.0-1057-aws #60~22.04.1-Ubuntu SMP Wed May 27 08:16:59 UTC 2026 x86_64 User : ubuntu ( 1000) PHP Version : 8.2.31 Disable Function : exec,passthru,shell_exec,system MySQL : OFF | cURL : ON | WGET : ON | Perl : ON | Python : OFF | Sudo : ON | Pkexec : ON Directory : /lib/python3.10/idlelib/__pycache__/ |
Upload File : |
o
�9j~; � @ s
d Z ddlmZmZmZmZ ddlmZmZm Z m
Z
m Z m Z ddlm
Z
ddlmZ ddlZddlZdZeejej �Zed�Zd Zd
Zd Zee e e e e Zd d
� Z G dd� de�Z G dd� de�Z e dkr�ddl m!Z! e!dddd� ddl"m#Z# e#e$� dS dS )z6
Dialog for building Tkinter accelerator key bindings
� )�Toplevel�Listbox� StringVar�TclError)�Frame�Button� Checkbutton�Entry�Label� Scrollbar)�
messagebox)�
_setup_dialogN) �F1�F2�F3�F4�F5�F6�F7�F8�F9�F10�F11�F12z~!@#%^&*()_-+={}[]|;:,.<>/?)�Tab�Space�Return)� BackSpace�Delete�Insert)�Home�End�Page Up� Page Down�
Left Arrow� Right Arrow�Up Arrow�
Down Arrowc C s i dd�dd�dd�dd�d d
�d d �d
d�dd�dd�dd�dd�dd�dd�dd �d d �d d �d!d"�i d#d$�d%d&�d'd(�d)d*�d+d,�d-d.�d/d0�d1d2�d3d4�d5d6�d7d8�d9d:�d;d<�d=d>�d?d@�dAdB�dCdD��dEdEi�}|� | | �} dF|v r�| tjv r�| �� } dG| � �S )Hz3Translate from keycap symbol to the Tkinter keysym.r �space�~�
asciitilde�!�exclam�@�at�#�
numbersign�%�percent�^� asciicircum�&� ampersand�*�asterisk�(� parenleft�)�
parenright�_�
underscore�-�minus�+�plus�=�equal�{� braceleft�}�
braceright�[� bracketleft�]� bracketright�|�bar�;� semicolon�:�colon�,�comma�.�period�<�less�>�greater�/�slash�?�questionr" �Priorr# �Nextr$ �Leftr% �Rightr& �Upr' �Downr �ShiftzKey-)�get�string�ascii_lowercase�upper)�key� modifiers�mapping� rm �)/usr/lib/python3.10/idlelib/config_key.py�
translate_key s� ��������������������������� � �
�
� � � �
ro c sz e Zd ZdZ� fdd�Zdd� Zdd� Zdd � Zd
d � Zdd
d�Z dd� Z
dd� Z dd� Z dd� Z
dd� Zdd� Z� ZS ) � GetKeysFramezKey Sequence Errorc s� t � �|� d| d< d| d< || _|| _|| _d| _t| �| _| j�d� | � � g | _
| j D ]}t| �}|�d� | j
� |� q/d| _
| �� dS )a
parent - parent of this dialog
action - the name of the virtual event these keys will be
mapped to
current_key_sequences - a list of all key sequence lists
currently mapped to virtual events, for overlap checking
� � borderwidth�sunken�relief� FN)�super�__init__�parent�action�current_key_sequences�resultr �
key_string�set�set_modifiers_for_platform�
modifier_varsrk �append�advanced�create_widgets)�selfrx ry rz �modifier�variable�� __class__rm rn rw 1 s"
zGetKeysFrame.__init__c O s t j|i |�� d S �N)r � showerror)r� �args�kwargsrm rm rn r� L s zGetKeysFrame.showerrorc C s� t | dd�| _| jjdddddd� t| jd| j� d�d �}|jd
d � t| jd | jd
dd�}|jdddd� t | �| _| jjddddd� i | _d}t | j
| j �D ])\}}| j �
||�}t| j| j|||dd�}|jd|dd
d� || j|< |d7 }qRt| jd dd�}|jddddd
d� t| jdd d d �| _| jjd gt�R � | j�d | j� | jjdddd!d"� t| jd#| jjd$�} | jj| jd%� | jdddd!d"� t| jd&| jd'�| _ | j jdddd(� t | d)d�| _ | j jdddddd� t| j d d*| j� d+�d, d�}
|
jd
d � t | j | jd-�| _ | j jdd.� t | �| _ | j jddddd� t| j d d/d�} | jdddd0� t| | j!d1d2�| _"| j"jddd3ddd4� | �!� d S )5N� keyseq_basic)�namer �nsew� )�row�column�sticky�padx�padyzNew keys for 'z' :��text�w)�anchor�left�grooverq )�justify� textvariablert rr �x)�ipadx�ipady�fill� )r� r� r� r� ru )�commandr� r� �onvalue�offvalue)r� r� r� r� z�Select the desired modifier keys
above, and the final key from the
list on the right.
Use upper case Symbols when using
the Shift modifier. (Letters will be
converted automatically.))r� r� � )r� r� �
columnspanr� r� � �
�single)�width�height�
selectmode�endz<ButtonRelease-1>�ns)r� r� �rowspanr� �vertical)�orientr� )�yscrollcommandz
Clear Keys)r� r� )r� r� r� �keyseq_advancedzEnter new binding(s) for 'z' :
z2(These bindings will not be checked for validity!))r� )r� a� Key bindings are specified using Tkinter keysyms as
in these samples: <Control-f>, <Shift-F2>, <F12>,
<Control-space>, <Meta-less>, <Control-Alt-Shift-X>.
Upper case is used when the Shift modifier is present!
'Emacs style' multi-keystroke bindings are specified as
follows: <Control-x><Control-y>, where the first key
is the 'do-nothing' keybinding.
Multiple separate bindings for one action should be
separated by a space, eg., <Alt-v> <Meta-v>.)r� r� r� �<< Basic Key Binding Entry)r� r� �ew)r� r� �stickr� r� )#r �frame_keyseq_basic�gridr
ry �packr| �frame_controls_basic�modifier_checkbuttons�ziprk r �modifier_labelrf r �build_key_stringr �list_keys_final�insert�AVAILABLE_KEYS�bind�final_key_selectedr �yview�configr} r �
clear_key_seq� button_clear�frame_keyseq_advancedr �
advanced_keys�frame_help_advanced� toggle_level� button_level) r� � basic_title�
basic_keysr� r� r� �label�check�
help_basic�scroll_keys_final�advanced_title�
help_advancedrm rm rn r� P s� � � �
�
���� � �� �
�
� zGetKeysFrame.create_widgetsc C s. t jdkr g d�| _ng d�| _ddi| _dS )aV Determine list of names of key modifiers for this platform.
The names are used to build Tk bindings -- it doesn't matter if the
keyboard has these keys; it matters if Tk understands them. The
order is also important: key binding equality depends on it, so
config-keys.def must use the same ordering.
�darwin)re �Control�Option�Command)r� �Altre r� �CtrlN)�sys�platformrk r� �r� rm rm rn r~ � s
z'GetKeysFrame.set_modifiers_for_platformc C s� | j �d��d�r(| �� | j jdd� | j�� | j�� | j� � d| _
dS | �� | j jdd� | j �� | j �� d| _
dS ) z'Toggle between basic and advanced keys.r� �Advancedr� r� Tz Advanced Key Binding Entry >>FN)
r� �cget�
startswithr� r� r� �liftr� r� � focus_setr� r� r� r� rm rm rn r� � s
zGetKeysFrame.toggle_levelNc C s | � � dS )z3Handler for clicking on key in basic settings list.N)r� �r� �eventrm rm rn r� � � z GetKeysFrame.final_key_selectedc C sN | � � }}| j�d�}|rt||�}|�|� | j�dd�|�� d�� dS )z2Create formatted string of modifiers plus the key.r� rW r? rY N)�
get_modifiersr� rf ro r� r| r} �join)r� �keylistrk � final_keyrm rm rn r� � s
z GetKeysFrame.build_key_stringc C s dd� | j D �}dd� |D �S )z9Return ordered list of modifiers that have been selected.c S s g | ]}|� � �qS rm )rf )�.0r� rm rm rn �
<listcomp>� � z.GetKeysFrame.get_modifiers.<locals>.<listcomp>c S s g | ]}|r|�qS rm rm )r� �modrm rm rn r� � r� )r )r� �mod_listrm rm rn r� � s zGetKeysFrame.get_modifiersc C sB | j �dd� | j �dd� | jD ]}|�d� q| j�d� dS )z#Clear modifiers and keys selection.r r� �movetoz0.0ru N)r� � select_clearr� r r} r| )r� r� rm rm rn r� � s
zGetKeysFrame.clear_key_seqc C sR d| _ | j�� �� }|s| j| j| dd� d S | js | �|�r'| �|�r'|| _ d S )Nru zNo key specified.��titlerx �message) r{ r| rf �stripr� �keyerror_titler� �keys_ok�bind_ok)r� �keysrm rm rn �ok� s
�zGetKeysFrame.okc C s� | j �d�}| �� }| j}dd� | jD �}|�d�s$| j|| dd� dS |s6|tt vr6| j|| dd� dS |d gkrO|tt d
vrOd }| j|| |d� dS ||v r_d }| j|| |d� dS d
S )z�Validity check on user's 'basic' keybinding selection.
Doesn't check the string produced by the advanced dialog because
'modifiers' isn't set.
r� c S s g | ] }|D ]}|�qqS rm rm )r� r� rj rm rm rn r� � s
�
�z(GetKeysFrame.keys_ok.<locals>.<listcomp>rY zMissing the final Key)rx r� z No modifier key(s) specified.r� re )r r zBThe shift modifier by itself may not be used with this key symbol.z'This key combination is already in use.TF) r� rf r� r� rz �endswithr� �
FUNCTION_KEYS� MOVE_KEYS)r� r� r� rk r� �
key_sequences�msgrm rm rn r� � s6
�� �
�
���zGetKeysFrame.keys_okc
C sd z
| � |dd� �}W n ty) } z| j| j| d|� �d� W Y d}~dS d}~ww | �||� dS )z:Return True if Tcl accepts the new keys else show message.c S s d S r� rm rm rm rm rn �<lambda> s z&GetKeysFrame.bind_ok.<locals>.<lambda>z2The entered key sequence is not accepted.
Error: r� NFT)r� r r� r� �unbind)r� r� �binding�errrm rm rn r� s ���� zGetKeysFrame.bind_okr� )�__name__�
__module__� __qualname__r� rw r� r� r~ r� r� r� r� r� r� r� r� �
__classcell__rm rm r� rn rp , s Y
rp c sR e Zd Zddd�� fdd�
Zedd� �Zejdd� �Zd
d d
�Zd
d d �Z� Z S )�
GetKeysWindowF)�_htest�_utestc sf t � �|� | �� d| d< | jddd� | �� |�� |�� d | �� d }|�� |s:|� � d | �
� d nd }| � d|� d|� �� | � |� t
| ||� | _} | �d| j� t| �}
t|
d d
| jd �| _t|
d d
| jd �| _| jjd
d
ddd� | jjd
dddd� | jdddd� |
jddd� | �|� t| � | �� |s�| �� | � � dS dS )a�
parent - parent of this dialog
title - string which is the title of the popup dialog
action - string, the name of the virtual event these keys will be
mapped to
current_key_sequences - list, a list of all key sequence lists
currently mapped to virtual events, for overlap checking
_htest - bool, change box location when running htest
_utest - bool, do not wait when running unittest
r� rr F)r� r� rq � rA �WM_DELETE_WINDOW�OK� )r� r� r� �Cancelr )r� r� r� r� r� �topT�both)�side�expandr� �bottomr� )r r� N) rv rw �withdraw� resizable�update_idletasks� winfo_rootx� winfo_width�winfo_reqwidth� winfo_rooty� winfo_height�winfo_reqheight�geometryr� rp �frame�protocol�cancelr r r� � button_ok�
button_cancelr� r� � transientr
�grab_set� deiconify� wait_window) r� rx r� ry rz r r r� �yr �
frame_buttonsr� rm rn rw sF ���
��
�zGetKeysWindow.__init__c C s | j jS r� �r r{ r� rm rm rn r{ J s zGetKeysWindow.resultc C s || j _d S r� r) )r� �valuerm rm rn r{ N r� Nc C s | j �� | �� | �� d S r� )r r� � grab_release�destroyr� rm rm rn r� R s
zGetKeysWindow.okc C s d| _ | �� | �� d S )Nru )r{ r+ r, r� rm rm rn r W s zGetKeysWindow.cancelr� )
r r r rw �propertyr{ �setterr� r r rm rm r� rn r s �.
r �__main__)�mainz!idlelib.idle_test.test_config_keyrq F)� verbosity�exit)�run)%�__doc__�tkinterr r r r � tkinter.ttkr r r r r
r r �tkinter.simpledialogr
rg r� r� �tuplerh �digits�
ALPHANUM_KEYS�PUNCTUATION_KEYS�WHITESPACE_KEYS� EDIT_KEYSr� r� ro rp r r �unittestr0 �idlelib.idle_test.htestr3 �
GetKeysDialogrm rm rm rn �<module> s<
��� oC �