B
� fN� � @ s� d Z ddlmZ ddlmZ ed� ddlZddlmZ ddlmZ ddl m
Z
m Z m Z m
Z
mZmZ dd lmZ dd
lmZmZmZ ejZe�d �e�d �e�d �e�d �d �Zdadaed
Zed Z ed Z ed Z dd� Z dd� Z G dd� dej!�Z"G dd� dej!�Z#G dd� dej!�Z$G dd � d ej!�Z%G d d � d ej!�Z&G d d � d ej!�Z'G d!d"� d"ej!�Z(G d#d$� d$ej!�Z)e*d%k�r�ej+d&d'� dS )(zfTest configdialog, coverage 94%.
Half the class creates dialog, half works with user customizations.
� )� configdialog)�requiresZguiN)�mock)�Func)�Tk� StringVar�IntVar�
BooleanVar�DISABLED�NORMAL)�config)�idleConf�changes�tracers� )�main� highlight�keys�
extensionsr r r r c C s t t_t� atjtddd�ad S )NZTestT)Z_utest)�testcfgr
�userCfgr �rootr Z ConfigDialog�dialog� r r �H/opt/alt/python37/lib64/python3.7/idlelib/idle_test/test_configdialog.py� setUpModule" s r c C s: t t_t�� t�� t�� t�� t� � d aa
d S )N) �usercfgr
r r �detach�clearr r �update_idletasks�destroyr r r r r �tearDownModule* s r! c @ s e Zd Zdd� Zdd� ZdS )�ConfigDialogTestc C s d S )Nr )�selfr r r � test_deactivate_current_config7 s z/ConfigDialogTest.test_deactivate_current_configc C s d S )Nr )r# r r r �activate_config_changes: s z(ConfigDialogTest.activate_config_changesN)�__name__�
__module__� __qualname__r$ r% r r r r r" 5 s r" c @ s, e Zd Zdd� Zdd� Zdd� Zdd� Zd S )
�
ButtonTestc C sJ t }t�� }|_t�� }|_|jd �� |�� |�� |`|`d S )NZOk)r r �Mock�applyr �buttons�invoke�assert_called_once)r# �dr+ r r r r �
test_click_ok@ s zButtonTest.test_click_okc C sd t }t�� }|_t�� }|_t�� }|_|jd �� |�� |�� |�� |`|`|`d S )NZApply) r r r* �deactivate_current_configZsave_all_changed_extensionsr% r, r- r. )r# r/ Z
deactivateZsave_ext�activater r r �test_click_applyI s zButtonTest.test_click_applyc C sN t }t� |_dtd d< |jd �� | �td i � | �|jjd� |`d S )N� r Z somethingZCancel)r r r r r, r- � assertEqual�called)r# r/ r r r �test_click_cancelU s z ButtonTest.test_click_cancelc C sz t j�t j� tjjtdtd��*}t j d �
� |j d |j d }}W d Q R X | � |d� | �
|�d�or|�d�� d S ) NZ view_text)Z new_callableZHelp�title�contentszHelp for IDLE preferenceszWhen you clickza different name.
)r �note�select�keyspager Zpatch�objectr r r, r- �kwdsr5 �
assertTrue�
startswith�endswith)r# Zviewr8 r9 r r r �test_click_help^ s
zButtonTest.test_click_helpN)r& r' r( r0 r3 r7 rB r r r r r) > s r) c @ sh e Zd ZdZedd� �Zedd� �Zdd� Zdd � Zd
d � Z d d
� Z
dd� Z dd� Z dd� Z
dd� ZdS )� FontPageTestz�Test that font widgets enable users to make font changes.
Test that widget actions set vars, that var changes add three
options to changes and call set_samples, and that set_samples
changes the font of both sample boxes.
c C s, t j }| _t j�|� t� |_|�� d S )N)r �fontpage�pager: r; r � set_samples�update)�clsrE r r r �
setUpClassp s zFontPageTest.setUpClassc C s
| j `d S )N)rE rF )rH r r r �
tearDownClassw s zFontPageTest.tearDownClassc C s t �� d S )N)r r )r# r r r �setUp{ s zFontPageTest.setUpc C s� t �� | j}|j�d� |j�d� |j�d� d|j_|� � | �
|j� � d� | �
|j� � d� | � |j� � � | �
|jjd� t �� d S )NZFake�1Tr r4 )r r rE � font_name�set� font_size� font_boldrF r6 Z
load_font_cfg�assertNotEqual�get� assertFalser5 �attach)r# r/ r r r �test_load_font_cfg~ s z FontPageTest.test_load_font_cfgc C s� | j }|j�� dk r | �d� |j}|�d� |j�d�}|�� |�� |�d� |�d� |�d�}| � ||� | �
|j �� |� � � |�� |�� |�d� |�d� |�d�}| �
||� | �
|j �� |� � � d S ) N� zneed at least 2 fontsr Zactivez
zzz)rE �fontlist�size�skipTestr2 rR � focus_forcerG �event_generaterQ �assertInrM �lowerr5 )r# r/ rW �fontZ down_fontZup_fontr r r �test_fontlist_key� s(
z FontPageTest.test_fontlist_keyc C s� | j }|j�� dk r | �d� |j}|�d� |�� |�d� |�� |�d�\}}}}||d 7 }||d 7 }|j d||d� |j d||d� |�
d�}|�
d�}| � ||� | � |j
�
� |�� � d S ) NrV zneed at least 2 fontsr r4 z
)�x�yz�anchor)rE rW rX rY r2 rZ �seerG �bboxr[ rR r5 r\ rM r] ) r# r/ rW r` ra �dx�dyZfont1Z select_fontr r r �test_fontlist_mouse� s"
z FontPageTest.test_fontlist_mousec C s* | j }|jj�d� | �|j�� d� d S )N�( �40)rE ZsizelistZvariablerN r5 rO rR )r# r/ r r r �
test_sizelist� s zFontPageTest.test_sizelistc C sJ | j }|j�d� |j�� | �|j�� � |j�� | �|j�� � d S )NF)rE rP rN Z bold_toggler- r? rR rS )r# r/ r r r �test_bold_toggle� s
z FontPageTest.test_bold_togglec C s t �tdd�}t|d �}|d dk}| j}|j�|� |j�|� d|j_ |j
�d� dd|t|�d�i}| � t |� | � |jj d� t
�� |j�d � ddd t|�d�i}| � t |� | � |jj d� t
�� |j�| � ddd t| �d�i}| � t |� | � |jj d
� d S ) Nr � EditorWindowr4 rV �boldr z Test Font)r^ z font-sizez font-boldZ20� )r
ZGetFontr �strrE rO rN rP rF r6 rM r5 �mainpager r )r# Z default_fontZ default_sizeZ default_boldr/ �expectedr r r �
test_font_set� s6 zFontPageTest.test_font_setc C s� | j }|`|j|jf}i i |_|_|j�d� |j�d� |j�d� ddi}|�� | �|j|j kor|kn � |\|_|_t � |_d S )N�test�5r4 r^ )rs rt rm )
rE rF Z font_sample�highlight_samplerM rN rO rP r? r )r# r/ Z orig_samplesrq r r r �test_set_samples� s " z FontPageTest.test_set_samplesN)r& r' r( �__doc__� classmethodrI rJ rK rU r_ rg rj rk rr rv r r r r rC i s $rC c @ s( e Zd Zedd� �Zdd� Zdd� ZdS )�
IndentTestc C s t j| _| j�� d S )N)r rD rE rG )rH r r r rI s zIndentTest.setUpClassc C s0 | j }|j�d� |�� | �|j�� d� d S )N� � )rE � space_numrN Z load_tab_cfgr5 rR )r# r/ r r r �test_load_tab_cfg s z IndentTest.test_load_tab_cfgc C sD | j }t�� |j�d� | �|j�� d� | �tdddii� d S )N� rz ZIndentz
num-spacesZ16) rE r r Z indent_scalerN r5 r| rR rp )r# r/ r r r �test_indent_scale s
z IndentTest.test_indent_scaleN)r& r' r( rx rI r} r r r r r ry s ry c @ s� e Zd ZdZedd� �Zedd� �Zdd� Zdd � Zd
d � Z d d
� Z
dd� Z dd� Z dd� Z
dd� Zdd� Zdd� Zdd� Zd d � Zd d � Zd d!� Zd"d#� Zd$d%� Zd&d'� Zd(d)� Zd*d+� Zd,d-� Zd.d/� Zd0S )1� HighPageTestz�Test that highlight tab widgets enable users to make changes.
Test that widget actions set vars, that var changes add
options to changes and that themes work correctly.
c C sD t j }| _t j�|� t� |_t� |_t� |_t� |_ |�
� d S )N) r �highpagerE r: r; r �set_theme_type�paint_theme_sample�set_highlight_target�set_color_samplerG )rH rE r r r rI # s zHighPageTest.setUpClassc C s | j }|`|`|`|`d S )N)rE r� r� r� r� )rH r/ r r r rJ - s zHighPageTest.tearDownClassc C sX | j }x$t�dd�D ]}tjd �|� qW t�� d|j_d|j _d|j
_d|j _d S )N�userr r ) rE r
�GetSectionListr �remove_sectionr r r� r6 r� r� r� )r# r/ �sectionr r r rK 3 s zHighPageTest.setUpc C s� t �� | j}| j}tjdd�t_|�� | � |j
� � � ||j � � d� ||j
� � d� ||j�� d� ||jjd� ||jjd� ||jjd� t�dddd � t�dd
d d � |�� ||j � � d� ||j
� � d� ||jjd
� ||jjd
� ||jjd
� tjd
d�t_t�dddd� |�� | �|j
� � � ||j � � d� ||j
� � d
� ||jjd� ||jjd� ||jjd� t`t �� d S )Nz IDLE Classic)� return_valuez- no custom themes -)�disabledr4 r �test1�option�value�test2�option2�value2rV r �Theme�default�0rn )r r rE r5 r r* r
Z CurrentThemeZload_theme_cfgr? � theme_sourcerR � builtin_name� custom_name�custom_theme_on�stater� r6 r� r� � SetOptionrS rT )r# r/ �eqr r r �test_load_theme_cfg? s> z HighPageTest.test_load_theme_cfgc C s� | j }| j}t� |_t� |_|j�� |tdddii� ||jjd� ||jjd� t �
� |j � d� |j �� | � tdddii� ||jjd� ||jjd� |`|`d S )Nr� r� �Truer4 r )z !disabled�False)
r5 rE r �var_changed_builtin_name�var_changed_custom_nameZbuiltin_theme_onr- rp r6 r r r� r� )r# r� r/ r r r �test_theme_sourceh s
z HighPageTest.test_theme_sourcec C s | j }| j}dddg}t�dddd� |j�|d� |tdddd�i� ||jd d
� ||jj d � t
� � t�dddd� |j�|d� |tdd dii� ||jd d
� ||jj d
� t
� � |j�|d� |tdddd�i� ||jd d� ||jj d� d S )Nz IDLE Classicz IDLE DarkzIDLE Newr r� �name�spam)r� �name2�textzNew theme, see Helpr4 r� rV r rn ) r5 rE r
r� � builtinlist�SetMenurp Z
theme_messager� r6 r r )r# r� r/ � item_listr r r �test_builtin_name} s(
z HighPageTest.test_builtin_namec C st | j }|j�g d� | �dt� | �|jjd� t� � |j�dddgd� | �tdddii� | �|jjd� d S ) Nz- no custom themes -r� r �a�b�cr� r4 )
rE �
customlistr� � assertNotInrp r5 r� r6 r r )r# r/ r r r �test_custom_name� s z HighPageTest.test_custom_namec C s2 | j }t� |_|j�d� | �|jjd� |`d S )NZgreenr4 )rE r Zon_new_color_set�colorrN r5 r6 )r# r/ r r r �
test_color� s
zHighPageTest.test_colorc C sB | j }| j}|j�dddgd� ||j�� d� ||jjd� d S )Nr� r� r� r4 )r5 rE Z
targetlistr� �highlight_targetrR r� r6 )r# r� r/ r r r � test_highlight_target_list_mouse� s
z-HighPageTest.test_highlight_target_list_mousec s� | j }| j� i }d}� j���� ��d� ��� � fdd�}�fdd�}||� x`��� D ]T}xN��|�dd d� D ]6}|d7 }||� |� j� � || � |� j
j |� qxW q^W d S ) Nr g �?c s( x"� j �� D ]\}}|| |d < q W d S )Nr )Ztheme_elements�items)�elemZelement�tag)r/ r r �tag_to_element� s zEHighPageTest.test_highlight_target_text_mouse..tag_to_elementc sn � � | �\}}}}||d 7 }||d 7 }� jdddd� � jd||d� � jd||d� � jd||d� d S )NrV zr )r` ra zzz)rd r[ )�startr` ra re rf )�hsr r �click_it� s z?HighPageTest.test_highlight_target_text_mouse..click_itrV r4 ) r5 rE ru rZ rc r Z tag_names�
tag_rangesr� rR r� r6 )r# r� r� �countr� r� r� Z start_indexr )r/ r� r � test_highlight_target_text_mouse� s"
z-HighPageTest.test_highlight_target_text_mousec C s� | j }| j}|j}|�� |�d� |�� |jdddd� |jdddd� x0td�D ]$}|jdddd� |jdddd� qVW ||�d �d
� d S ) Ng �?zr )r` ra zrV zz�selr ) r5 rE ru rZ rc r r[ �ranger� )r# r� r/ r� �_r r r �"test_highlight_sample_double_click� s
z/HighPageTest.test_highlight_sample_double_clickc C s� | j }| j}|j}|�� |�d� |�� |�d�\}}}}}|�d� |�d� |jd||d� |jd||d� |jd||d� |jd ||d� ||�d
�d � d S ) Ng �?z1.0zzz)r` ra zz zr� r ) r5 rE ru rZ rc r Z dlineinfor[ r� ) r# r� r/ r� r` ra re rf �offsetr r r � test_highlight_sample_b1_motion� s
z,HighPageTest.test_highlight_sample_b1_motionc C s� | j }| j}|`|j�d� |�� ||jd t� ||jd t� ||j �
� d� |j�d� |�� ||jd t� ||j �
� d� ||jd t� ||j �
� d� t � |_d S )NTr� )r� F)�selectedr )
r5 rE r� r� rN r� r r� r
�button_delete_customr� r� r )r# r� r/ r r r �test_set_theme_type s z HighPageTest.test_set_theme_typec C sX | j }| j}tjj}t� }tj_t� }|_|j�d� |j �d� d|_
|j � � ||j �
� d� d|j�|jd d�f|_
|j � � ||j �
� d� d|_
|j �d� |j�d� d|_
|j � � ||jd � ||j �
� d� d
|_
|j � � ||j�
� |j
� ||j �
� d � |j �d� |j�d � |j � � ||j �
� d � |`|tj_d S )
NzEditor Breakpointz#ffffff)NNr �style�
background))g ��k@g g z#de0000Tr4 z My New Themez#de0000F)r5 rE r ZtkColorChooserZaskcolorr �get_new_theme_namer� rN r� �resultZbutton_set_colorr- rR r� �lookup�frame_color_setr� r6 r� )r# r� r/ Z orig_chooserZchooser�gntnr r r �test_get_color s<
zHighPageTest.test_get_colorc C s� | j }d}|j�d� |j�d� |j�d� |j�|� | �|j�|j d d�|� | �|j
� dd�|� | �t dd |ii� d S )
Nz#3f7cae�Pythonz
Selected TextTr� r� �hilite�
foregroundzhilite-foreground)
rE r� rN r� � fg_bg_toggler� r5 r� r� r� ru �tag_cgetr� )r# r/ r� r r r �test_on_new_color_setK s z"HighPageTest.test_on_new_color_setc C s> t j}tdd� }t _| j}d|_| �|�d�d� |t _d S )NT)� return_selfz New Themer )r � SectionNamer rE r� r5 r� )r# �orig_sectionname�snr/ r r r �test_get_new_theme_nameX s z$HighPageTest.test_get_new_theme_namec C s� | j }t� }|_|j�d� d|_|j�� | �|jt j
d � d|_d|_ | �|jt j
d � |j�� | � |jt j
d � |`d S )NTr r z my new themer )
rE r r� r� rN r� Zbutton_save_customr- r� r
r r6 r\ )r# r/ r� r r r �test_save_as_new_themeb s
z#HighPageTest.test_save_as_new_themec C s( | j }| j}|j�d� |j�d� d}d}| �|tj� |�|� |t� dd�|g� |t�
dd�t�
d|�� ||j � � |� | �
|j� � � ||jjd� t�d|d d
� | �|tj� |�|� |t� dd�||g� | �t�
d|�t�
d|�� t�d|d d
� |t�
d|�t�
d|�� d S ) NTz IDLE Classiczmy new custom themezmy second custom themer� r r� r4 zhit-background�yellow)r5 rE r� rN r� r� r
r �
create_newr� Z GetThemeDictr� rR rS r� r6 r �
add_optionrQ r� )r# r� r/ � first_new�
second_newr r r � test_create_new_and_save_newu s.
z)HighPageTest.test_create_new_and_save_newc C s� | j }| j}|`|j�d� ||j�� d� ||j�� d� | �|j � ||j
j d� |j�d� ||j�� d� ||j�� d� | �|j � ||j
j d� t � |_d S ) NZCursor)r� r� )r� r4 �Comment)r� r rV )
r5 rE r� r� rN �fg_onr� �bg_onr? r� r� r6 r )r# r� r/ r r r �test_set_highlight_target� s z&HighPageTest.test_set_highlight_targetc C s@ | j }|j}|j�� | �|jd� |j�� | �|jd� d S )Nr4 rV )rE r� r� r- r5 r6 r� )r# r/ Zscsr r r � test_set_color_sample_binding� s
z*HighPageTest.test_set_color_sample_bindingc C s\ | j }|`|j�d� |j�d� |�� | �|j�|jd d�|j �
dd�� t � |_d S )Nz
Selected TextTr� r� r� r� ) rE r� r� rN r� r5 r� r� r� ru r� r )r# r/ r r r �test_set_color_sample� s z"HighPageTest.test_set_color_samplec C s | j }| j}|`|jj}tj}|j�d� |j �d� d}|�
|� d|j _ |�� ddd�}x&|�
� D ]\}}| �|d|�|� qhW ||j j d � x(|�
� D ] \}}t�d
|d | |� q�W |�� x$|�
� D ]\}}||d|�|� q�W ||j j d � t� |_d S )
NTz IDLE Darkz IDLE Testr Zbluer� )r� r� Zconsoler4 r zconsole-rV )r5 rE r� ru r� r
Z GetHighlightr� rN r� r� r� r6 r� rQ r r� r ) r# r� rE Zhs_tagZghZthemeZ new_console�keyr� r r r �test_paint_theme_sample� s.
z$HighPageTest.test_paint_theme_samplec C s2 | j }| j}|j�d� t� }|_t� t_t� t_d}t j
d � |dd� ddit |< d}t j
d � |dd� dd it |< |j
�d� |j
�� |j�|� d
|_|j�� ||jd � |t | ddi� |t �d d�||g� |tjjd
� |tjjd
� ||jjd
� d|_|j�� ||jd� | �|t � |t �d d�|g� ||j
�� d� ||j�� |� |tjjd � |tjjd � ||jjd � |j�|� d|_|j�� ||jd� | �|t � |t �d d�g � ||j
�� d� ||j�� d� |tjjd� |tjjd� ||jjd� t`t`|`d S )N)z !disabledz
spam themer r� r� r� r� z other themer� Fr4 r� r TrV r rn )r� z- no custom themes -)r5 rE r� r� r �askyesnor r1 r% r
r r� r� r� r- r� rN r� r6 r� r� r� rR )r# r� r/ �yesnoZ
theme_nameZ theme_name2r r r �test_delete_custom� s\
z HighPageTest.test_delete_customN) r& r' r( rw rx rI rJ rK r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r� r r r r r� s0
) %/
r� c @ s� e Zd ZdZedd� �Zedd� �Zdd� Zdd � Zd
d � Z d d
� Z
dd� Z dd� Z dd� Z
dd� Zdd� Zdd� Zdd� Zd d � Zd d � Zd d!� Zd"S )#� KeysPageTestz�Test that keys tab widgets enable users to make changes.
Test that widget actions set vars, that var changes add
options to changes and that key sets works correctly.
c C s, t j }| _t j�|� t� |_t� |_d S )N)r r< rE r: r; r �
set_keys_type�load_keys_list)rH rE r r r rI " s zKeysPageTest.setUpClassc C s | j }|`|`d S )N)rE r� r� )rH rE r r r rJ ) s zKeysPageTest.tearDownClassc C sH | j }x$t�dd�D ]}tjd �|� qW t�� d|j_d|j _d S )Nr� r r )
rE r
r� r r� r r r� r6 r� )r# r/ r� r r r rK . s zKeysPageTest.setUpc C s� t �� | j}| j}tjdd�t_|�� | � |j
� � � ||j � � d� ||j
� � d� ||j�� d� ||jjd� ||jjd� ||jjd� t�ddd d
� t�dd d d
� |�� ||j � � d� ||j
� � d� ||jjd� ||jjd� ||jjd� tjd d�t_tjdd�t_t�dddd� |�� | �|j
� � � ||j � � d� ||j
� � d � ||jjd� ||jjd� ||jjd� t`t`t �� d S )NzIDLE Classic OSX)r� z- no custom keys -)r� r4 )zIDLE Classic OSXr r� r� r� r� r� r� rV zIDLE Modern Unixr �Keysr� r� rn )r� )r r rE r5 r r* r
Z CurrentKeysZ load_key_cfgr? �
keyset_sourcerR r� r� �custom_keyset_onr� r� r6 r� �argsr� Z default_keysrS rT )r# r/ r� r r r �test_load_key_cfg8 s@ z KeysPageTest.test_load_key_cfgc C s� | j }| j}t� |_t� |_|j�� |tdddii� ||jjd� ||jjd� t �
� |j � d� |j �� | � tdddii� ||jjd� ||jjd� |`|`d S )Nr� r� r� r4 r )z !disabledr� )
r5 rE r r� r� Zbuiltin_keyset_onr- rp r6 r r r� r� )r# r� r/ r r r �test_keyset_sourceb s
z KeysPageTest.test_keyset_sourcec C s2 | j }| j}tjd �d� dddg}|j�|d� |tdddd�i� ||jd d� ||j j
d � ||j j d
� t �
� t�ddd d � |j�|d� |tdd
dii� ||jd d� ||j j
d� ||j j d
� t �
� |j�|d� |tdddd�i� ||jd d� ||j j
d� ||j j d� d S )Nr r� zIDLE Classic WindowszIDLE Classic OSXzIDLE Modern UNIX)r� r� r� zNew key set, see Helpr4 )zIDLE Modern UNIXr� zIDLE Classic Unixr� rV r rn )zIDLE Classic OSX)r5 rE r
r r� r� r� rp Z keys_messager� r6 r� r r r� )r# r� r/ r� r r r r� w s0 z KeysPageTest.test_builtin_namec C st | j }|j�g d� | �dt� | �|jjd� t� � |j�dddgd� | �tdddii� | �|jjd� d S ) Nz- no custom keys -r� r r� r� r� r� r4 )
rE r� r� r� rp r5 r� r6 r r )r# r/ r r r r� � s z KeysPageTest.test_custom_namec C s� t �dddd� | j}|j�d� |j�dd� |j�dd� |j�d d
� |j�d� |j� d� |j
�d � | � t ddd ii� |j�d � |j� d � |j
�d � | � t
d d
d ii� d S )
Nr ZZzDummyZenabler� zmy custom keysr �end�copyr4 zz-inz ZZzDummy_cfgBindings)r
r� rE r� rN � bindingslist�delete�insert�
selection_set�selection_anchor�
keybindingr5 r< �extpage)r# r/ r r r �test_keybinding� s z KeysPageTest.test_keybindingc C s� | j }| j}|`|j�d� |�� ||jd t� ||jd t� ||j �
� d� |j�d� |�� ||jd t� ||j �
� d� ||jd t� ||j �
� d� t � |_d S )NTr� )r� F)r� r )
r5 rE r� r� rN r� r r� r
�button_delete_custom_keysr� r� r )r# r� r/ r r r �test_set_keys_type� s z KeysPageTest.test_set_keys_typec C s� | j }| j}tj}tdd� }t_t� }|_|j�d� |j� dd� |j�
dd� |j� d� |j� d� |j
�d� |j�d� d|_|j�� ||j�d �d� ||j
�� d� d
|_d|_|j�� ||jd � ||j�d �d� d |_|j�� ||j�� |j� ||j�d �d
� ||j
�� d
� |j�d� d|_d|_|j�� ||jd� ||j�d �d� ||j
�� d� |`|t_d S )NT)r� )z !disabledr r� z copy - zKey-ar rb z r4 zMy New Key Setzcopy - Fzzcopy - )r5 rE r Z
GetKeysDialogr �get_new_keys_name�button_new_keysr� r� r� r� r� r� r� rN r� r� r- rR r6 r� )r# r� r/ Zorig_getkeysdialogZgkd�gnknr r r �test_get_new_keys� sF
z KeysPageTest.test_get_new_keysc C s> t j}tdd� }t _| j}d|_| �|�d�d� |t _d S )NT)r� zNew Keysr )r r� r rE r� r5 r )r# r� r� r/ r r r �test_get_new_keys_name� s z#KeysPageTest.test_get_new_keys_namec C st | j }t� }|_|j�d� d|_|j�� d|_d|_| � |jt
j d � |j�� | � |jt
j d � |`d S )NTr zmy new key setr r )
rE r r r� rN r� Zbutton_save_custom_keysr- r6 r� r
r r\ )r# r/ r r r r �test_save_as_new_key_set s
z%KeysPageTest.test_save_as_new_key_setc C s� | j }|j}|�dd� |�dd� |�dd� |�d� |�� |�d� |�� |�d�\}}}}||d 7 }||d 7 }|j dddd� |j d ||d� |j d
||d� |j d ||d� | �
|� d �d� | �
|j �
� d
� d S )Nr r� r� r4 �findrV z)r` ra zz
zrb r )rE r� r� r� r2 rZ rc rG rd r[ r5 rR r r� )r# r/ r� r` ra re rf r r r �test_on_bindingslist_select s$
z(KeysPageTest.test_on_bindingslist_selectc C s | j }| j}|j�d� |j�d� d}d}| �|tj� |�|� |t� dd�|g� |t�
d�t�
|�� ||j � � |� | �
|j� � � ||jjd� t�d|dd � | �|tj� |�|� |t� dd�||g� | �t�
|�t�
|�� t�d|dd � |t�
|�t�
|�� d S )
NTzIDLE Classic Windowszmy new custom key setzmy second custom keysetr� r r4 r� z )r5 rE r� rN r� r� r
r Zcreate_new_key_setr� � GetKeySetr� rR rS r� r6 r r� rQ r� )r# r� r/ r� r� r r r �,test_create_new_key_set_and_save_new_key_set0 s,
z9KeysPageTest.test_create_new_key_set_and_save_new_key_setc C sV | j }| j}t� }t_|`|j}|�dd� |�dd� |�dd� ddgdgd gd
�|_ t
� d d d
d� d}|�d � ||� dd�|� ||� d�d� ||�
� d� |�d� |�d� |�d � ||� dd�|� ||� d�d� ||�
� d� |�d� |�d� |�d � ||� dd�|� ||� d�d� ||�
� d� t� |_t`d S )Nr r� z<>r4 z<>zzzz )z<>z<>z<>r zmy keysr� z
)z© - z,force-open-completions - zspam - rb r r z,force-open-completions - )r4 rV zspam - )rV )r5 rE r r
r r� r� r� r� r� r r� rR Z curselectionr� r� )r# r� r/ Zgksr� rq r r r �test_load_keys_listO s>
z KeysPageTest.test_load_keys_listc C s2 | j }| j}|j�d� t� }|_t� t_t� t_d}t j
d � |dd� ddit |< d}t j
d � |dd� dd it |< |j
�d� |j
�� |j�|� d
|_|j�� ||jd � |t | ddi� |t �d d�||g� |tjjd
� |tjjd
� ||jjd
� d|_|j�� ||jd� | �|t � |t �d d�|g� ||j
�� d� ||j�� |� |tjjd � |tjjd � ||jjd � |j�|� d|_|j�� ||jd� | �|t � |t �d d�g � ||j
�� d� ||j�� d� |tjjd� |tjjd� ||jjd� t`t`|`d S )N)z !disabledz spam key setr r� r� r� r� z
other key setr� Fr4 r� r TrV r rn )r� z- no custom keys -)r5 rE r� r� r r� r r1 r% r
r r� r< r� r- r� rN r� r6 r� r� r� rR )r# r� r/ r� Z keyset_nameZ keyset_name2r r r �test_delete_custom_keysz s\
z$KeysPageTest.test_delete_custom_keysN)r& r' r( rw rx rI rJ rK r� r� r� r� r� r r r r r r
r r r r r r r� s"
* 0
+r� c @ s� e Zd ZdZedd� �Zedd� �Zdd� Zdd � Zd
d � Z d d
� Z
dd� Z dd� Z dd� Z
dd� Zdd� Zdd� Zdd� Zd d � Zd d � Zd d!� Zd"d#� Zd$d%� Zd&S )'� GenPageTestz�Test that general tab widgets enable users to make changes.
Test that widget actions set vars, that var changes add
options to changes and that helplist works correctly.
c C s@ t j }| _t j�|� t� |_|_t� |_|_ |�
� d S )N) r ZgenpagerE r: r; r rN �set_add_delete_state�upc�update_help_changesrG )rH rE r r r rI � s
zGenPageTest.setUpClassc C s2 | j }|`|`|`|`|j�dd� |j�� d S )Nr r� ) rE rN r r r �helplistr� �
user_helplistr )rH rE r r r rJ � s
zGenPageTest.tearDownClassc C s t �� d S )N)r r )r# r r r rK � s zGenPageTest.setUpc C s� | j }| j}|j�d� |j�d� |j�d� |j�d� |j�dd� ddg|_ t
� dddd� |� � ||j�
� d � ||j�
� d � ||j�
� d
� ||j�
� d � ||j�
d d�d � ||j d
g� d S )Nr4 r� ZbadZworser � HelpFilesrL z name;filer Z80ri )r� )r� �filerL )r5 rE Z startup_editrN �autosaveZ win_widthZ
win_heightr r� r r
r� Zload_general_cfgrR )r# r� r/ r r r �test_load_general_cfg� s
z!GenPageTest.test_load_general_cfgc C sN | j }|j�� | �tdddii� t�� |j�� | �tdddii� d S )N�Generalzeditor-on-startuprL r� )rE Zstartup_editor_onr- r5 rp r r Zstartup_shell_on)r# r/ r r r � test_startup� s
zGenPageTest.test_startupc C sr | j }|j�dd� |j�dd� | �tdddii� t�� |j�dd� |j�dd� | �tdddii� d S )Nr r� �11rl Zheight�width) rE Zwin_height_intr� r� r5 rp r r Z
win_width_int)r# r/ r r r �test_editor_size� s z GenPageTest.test_editor_sizec C s$ | j j�� | �tdddii� d S )Nrl z cursor-blinkr� )rE Zcursor_blink_boolr- r5 rp )r# r r r �test_cursor_blink� s z GenPageTest.test_cursor_blinkc C s8 | j j�dd� | j j�dd� | �tdddii� d S )Nr r� r Z AutoCompleteZ popupwait)rE Z
auto_wait_intr� r� r5 r� )r# r r r �test_autocomplete_wait� s z"GenPageTest.test_autocomplete_waitc C s� | j }| j}|jd �d� |tdddii� t�� |j�dd� |j� dd� |tdddii� t�� |j
�� |tdd d
ii� d S ) NZmenur Z
ParenMatchr� �openerr� r z flash-delayZbellr� ) rE r5 Zparen_style_typer- r� r r Zparen_flash_timer� r� Zbell_on)r# r/ r� r r r �test_parenmatch� s
zGenPageTest.test_parenmatchc C sF | j }|j�� | �tdddii� |j�� | �tdddii� d S )Nr r rL r� )rE Z save_auto_onr- r5 rp Z save_ask_on)r# r/ r r r �
test_autosave s
zGenPageTest.test_autosavec C s8 | j j�dd� | j j�dd� | �tdddii� d S )Nr r� r ZFormatParagraphz max-width)rE Zformat_width_intr� r� r5 r� )r# r r r �test_paragraph s zGenPageTest.test_paragraphc C s8 | j j�dd� | j j�dd� | �tdddii� d S )Nr r� rL Z CodeContextZmaxlines)rE Z context_intr� r� r5 r� )r# r r r � test_context s zGenPageTest.test_contextc C s� | j }|j|_|j|_|j}d}|�|d� |�|� |�� |� |� |�
� |� |�\}}}}||d 7 }||d 7 }d |j_ |j_ |j
dddd� |j
d||d� |j
d||d� |j
d ||d� | �|�d
�d� | �|jj � | �|jj � d S ) Nr� �sourcerV r z)r` ra zz
zrb )rE r rN r r r r� r2 rZ rc rG rd r6 r[ r5 rR r? rS )r# r/ r Zdexr` ra re rf r r r �test_source_selected s*
z GenPageTest.test_source_selectedc C s� | j }| j}|`|j}|j}|�dd� |� ||j�� d� ||j�� d� |�dd� |� ||j�� d� ||j�� d� |� d� |� ||j�� d� ||j�� d� t
� |_d S )Nr r� )r� r# r ) r5 rE r r r� Zbutton_helplist_editr� Zbutton_helplist_remover� r� r )r# r� r/ Zsad�hr r r �test_set_add_delete_state5 s$
z%GenPageTest.test_set_add_delete_statec C s� | j }tj}tdd� }t_| j}|j�dd� |j�� d |j _
|j _
d|_ |�
� | �t|j�dd��|j ko~g kn � | �|j j
� d|_ |�
� d|_ |�
� ||j�dd�d� ||jddg� ||j j
d � | �|j j
� |t_d S )
NT)r� r r� r )�name1�file1)r� �file2)r' r� rV )r5 r �
HelpSourcer rE r r� r r rN r6 r r� Zhelplist_item_addr? �listrR rS )r# r� �orig_helpsourcer� r/ r r r �test_helplist_item_addM s*
z"GenPageTest.test_helplist_item_addc C s* | j }tj}tdd� }t_| j}|j�dd� |j�dd� |j�d� |j� d� |j
� � |j
� d� d |j
_|j_d|_|�� d|_|�� ||j�dd�d� ||j
dg� | �|jj� d |_|�� ||j�dd�d
� ||j
d g� | �|jj|j
j k�od kn � |t_d S ) NT)r� r r� r' )r' r( r )r' )r� r) )r� r4 )r5 r r* r rE r r� r� r� r� r r �appendrN r6 r r� Zhelplist_item_editrR rS r? )r# r� r, r� r/ r r r �test_helplist_item_editi s0
(z#GenPageTest.test_helplist_item_editc C s� | j }| j}|j�dd� |j�dd� |j�d� |j�d� |j�� |j� d� d |j
_ |j _ |�
� ||j�dd�d� ||jg � | �|j j |j
j ko�dkn � d S )Nr r� r' )r' r( r r4 )r5 rE r r� r� r� r� r r r. rN r6 r Zhelplist_item_removerR r? )r# r� r/ r r r �test_helplist_item_remove� s
z%GenPageTest.test_helplist_item_removec C sV | j }|`|j�� |j�d� |j�d� |�� | �td ddd�� t� |_d S )N)r' r( )r� r) r z name1;file1z name2;file2)rL �2)rE r r r r. r5 rp r )r# r/ r r r �test_update_help_changes� s
z$GenPageTest.test_update_help_changesN)r& r' r( rw rx rI rJ rK r r r r r r r r! r" r$ r& r- r/ r0 r2 r r r r r
� s&
r
c @ sd e Zd Zedd� �Zedd� �Zdd� Zdd� Zd d
� Zd d � Z d
d� Z
dd� Z dd� Z dd� Z
dS )� VarTraceTestc C s" t �� | _tt�| _tt�| _d S )N)r ZVarTracer r r �ivr �bv)rH r r r rI � s
zVarTraceTest.setUpClassc C s | ` | `| `d S )N)r r4 r5 )rH r r r rJ � s zVarTraceTest.tearDownClassc C s | j �� d| _d S )Nr )r r r6 )r# r r r rK � s
zVarTraceTest.setUpc G s | j d7 _ d S )N�
)r6 )r# �paramsr r r �var_changed_increment� s z"VarTraceTest.var_changed_incrementc G s d S )Nr )r# r7 r r r �var_changed_boolean� s z VarTraceTest.var_changed_booleanc C s. | j }|�� | �|jg � | �|jg � d S )N)r �__init__r5 �untraced�traced)r# �trr r r � test_init� s zVarTraceTest.test_initc C sF | j }|j�d� |j�d� |�� | �|jg � | �|jg � d S )Nr r4 )r r; r. r< r r5 )r# r= r r r �
test_clear� s zVarTraceTest.test_clearc C s� | j }t� }tj|d� }|_|�| j| j�}| �|| j� |�| j | j
�}| �|| j � t t �}|�|d�}| �||� |�
� |�|d� || jf|| j
f||fg}| �|jg � | �|j|� |`d S )N)r� )r r� r� )r r r r* �
make_callback�addr4 r8 ZassertIsr5 r9 r r r. Zassert_called_withr5 r< r; ) r# r= �func�cbr4 r5 ZsvZsv2rq r r r �test_add� s$
zVarTraceTest.test_addc C st | j �| jd�}| �t|�� | j�d� | �dtd � |� | �dtd � | � td d d d� t�
� d S )N)r r� r� �* r� r r� Z42) r r@ r4 r? �callablerN r� r r\ r5 r )r# rC r r r �test_make_callback� s z VarTraceTest.test_make_callbackc C s� | j }|�| j| j�}|�| j| j�}|| jf|| jfg}|�� | �|jg � | � |j
|� |� d� | �|� � d� | �| j
d� d| _
|�� |� d� | �| j
d� d| _
|�� | �|j
g � | � |j|� |� d� | �| j
d� d S )Nr4 r6 r )r rA r4 r8 r5 r9 rT r5 r; ZassertCountEqualr< rN rR r6 r )r# r= r4 r5 rq r r r �test_attach_detach� s*
z VarTraceTest.test_attach_detachN)r& r' r( rx rI rJ rK r8 r9 r> r? rD rG rH r r r r r3 � s r3 �__main__rV )� verbosity),rw Zidlelibr Z test.supportr Zunittestr Zidlelib.idle_test.mock_idler Ztkinterr r r r r
r r Zidlelib.configdialogr
r r r r ZIdleUserConfParserr r r rp r� r< r� r r! ZTestCaser" r) rC ry r� r� r
r3 r& r r r r r � sR + oh