$91 GRAYBYTE WORDPRESS FILE MANAGER $28



��Yf%��@sV
dZd
dl
Td
dljZd
dljZd
dlj	Z
d
dlmZ
d
dl
mZ
d
dlmZ
d
dlmZ
d
dlmZ
d
d	lmZ
d
d
lmZ
d
dlmZ
Gdd
�d
e�ZdZddi
Zdd�ZGdd�de �Z!e"dkrR
d
dl#Z#e#j$ddddd�

d
dl%m&Z&
e&e�

dS)a�
IDLE Configuration Dialog: support user customization of IDLE by GUI

Customize font faces, sizes, and colorization attributes.  Set indentation
defaults.  Customize keybindings.  Colorization and keybindings can be
saved as user defined sets.  Select startup options including shell/editor
and default window size.  Define additional help sources.

Note that tab width in IDLE is currently fixed at eight due to Tk issues.
Refer to comments in EditorWindow autoindent code for details.

�)
�
*N)
�idleConf)
�
DynOptionMenu)
�
GetKeysDialog)
�GetCfgSectionNameDialog)
�GetHelpSourceDialog)
�
TabbedPageSet)
�	view_text)
�
macosxSupportc@s�eZ
dZd
dddd�Zdd�Zdd�Zd	d
�Zdd�Zd
d�Zdd�Z	dd�Z
dd�Zdd�Zdd�Z
dd�Zdd�Zdd�Zdd �Zd!d"�Zd#d$�Zd%d&�Zd'd(�Zd)d*�Zd+d,�Zd-d.�Zd/d0�Zd1d2�Zd3d4�Zd5d6�Zd7d8�Zd9d:�Zd;d<�Zd=d>�Z d?d@�Z!dAdB�Z"dCdD�Z#dEdF�Z$dGdH�Z%dIdJ�Z&dKdL�Z'dMdN�Z(dOdP�Z)dQdR�Z*dSdT�Z+dUdV�Z,dWdX�Z-dYdZ�Z.d[d\d]�
Z/d^d_�Z0d`da�Z1dbdc�Z2ddde�Z3dfdg�Z4dhdi�Z5djdk�Z6dldm�Z7dndo�Z8dpdq�Z9drds�Z:dtdu�Z;dvdw�Z<dxdy�Z=dzd{�Z>d|d}�Z?d~d�Z@d�d��ZAd�d��ZBd�d��ZCd�d��ZDd�d��ZEd�d��ZFd�d��ZGd�d��ZHd�d��ZId�d��ZJd�d��ZKd�d��ZLd�d��ZMd�d��ZNd�d��ZOd[S)��ConfigDialog�FcCs|
tj
||
�
|
|_|r(i|
_|j�
|jd
d�

|j|pQd�

|jd|
j�d|
j	�|s�dndf�

dd6dd7dd8dd9dd:dd;dd<dd=d d>d#d?d&d@d)dAd,dBd/dCi|_
|j�
|j�
|j
d2td3t�
|j|
�

|j�
|jd4|j�
|jj�
|j�
|j�
|sx
|j�
|j�
d5S)Dz�
        _htest - bool, change box location when running htest
        _utest - bool, don't wait_window when running unittest
        �borderwidth�zIDLE Preferencesz+%d+%d���zNormal Text�normal�00zPython Keywords�keyword�01zPython Definitions�
definition�02zPython Builtins�builtin�03zPython Comments�comment�04zPython Strings�string�05z
Selected Text�hilite�06z
Found Text�hit�07�Cursor�cursor�08zEditor Breakpoint�break�09zShell Normal Text�console�10zShell Error Text�error�11zShell Stdout Text�stdout�12zShell Stderr Text�stderr�13�height�widthZWM_DELETE_WINDOWN)rr)rr)rr)rr)rr)rr)rr)r r!)r#r$)r%r&)r'r()r)r*)r+r,)r-r.)�Toplevel�__init__�parent�
instance_dictZwm_withdraw�	configure�titleZgeometryZwinfo_rootxZwinfo_rooty�
themeElements�ResetChangedItems�
CreateWidgetsZ	resizable�FALSEZ	transientZgrab_setZprotocol�Cancel�tabPagesZ	focus_set�LoadConfigs�AttachVarCallbacksZwm_deiconifyZwait_window)�selfr3r6Z_htestZ_utest�r@�9/opt/alt/python35/lib64/python3.5/idlelib/configDialog.pyr2sH
	

	





!





























zConfigDialog.__init__c

Cs�t|d
dddddg�

|_
|j
jdtdtd	t�
|j�
|j�
|j�
|j	�
|j
�
|j�jdt�

dS)
NZ
page_namesz
Fonts/Tabs�Highlighting�Keys�General�
Extensions�side�expand�fill)
rr<�pack�TOP�TRUE�BOTH�CreatePageFontTab�CreatePageHighlight�CreatePageKeys�CreatePageGeneral�CreatePageExtensions�create_action_buttons�BOTTOM)
r?r@r@rAr9Qs
	













zConfigDialog.CreateWidgetsc

Cs�tj
�ri}
nd
dddi}
t|dd�

}t|dd�

}xud|jfd|jfd|jfd	|jffD]=\}}t|d
|d|dt|
�
j	d
t
d
d�
q�Wt|dddd�
j	d
t�

|j	d
t�

|S)N�padx��pady���Ok�Applyr;�Help�text�command�	takefocusrFrr/r
r
)
r
ZisAquaTk�FramerYrZr;r[�Buttonr:rI�LEFTrJrS)r?ZpaddingArgsZouterZbuttonsZtxt�cmdr@r@rArR]s
	








"

z"ConfigDialog.create_action_buttonsc
Cs�|j}
t
|
�
|_t|
�
|_t
|
�
|_t|
�
|_tj	|
d+�|_
|jjdj
}t|dddtdd	�
}t|dddtdd
�
}t|�
}t|�
}t|dtdd�
}t|d
ddtdt�
|_|jjd|j�
t|�
}|jd|jj�

|jjd|j�

t|dd�

}	t||jdd|j�
|_t|d|jddddddd|j�
}
t|dt dd�
}t|dtd|j
dd�
|_!t|�
}t|dtdd�
}
t"|d|jddd dd!dd"d#�
|_#|j$d$td%dd&dd't%d(t&�
|j$d$td%dd&dd(t'�
|j$d$t(d%dd&dd(t)�
|j$d$t(d%dd&dd(t)�
|j$d$t(d)t*�
|jj$d$td't%d(t)�
|j$d$td(t'�
|	j$d$td)t*�
|jj$d$td)t*�
|
j$d$td)t*d%d*�
|j$d$t(d%dd&dd't%d(t&�
|j!j$d't%d(t&�
|j$d$t(d(t)�
|
j$d$t(d)t*d%d�
|j#j$d$t(d%dd(t)�
|S),N�courier�
rz
Fonts/Tabsr
rX�reliefr\z Base Editor Font z Indentation Width ZjustifyzFont Face :r/rr^�exportselectionz<ButtonRelease-1>r]�yscrollcommandzSize :�variable�onvalue�
�offvaluer
ZBold�fontz,AaBbCcDdEe
FfGgHhIiJjK
1234567890
#:+=(){}[]zPython Standard: 4 Spaces!�orientZ
horizontalZtickintervalZfrom_Zto�rFrTrVrGrH�anchorr)rcrdr)+r3�	StringVar�fontSize�
BooleanVar�fontBold�fontName�IntVar�spaceNum�tkFontZFontZeditFontr<�pages�frame�
LabelFrame�GROOVEr_�Labelra�Listboxr:�listFontName�bind�OnListFontButtonRelease�	Scrollbar�config�yview�setr�
SetFontSample�optMenuFontSize�Checkbutton�SOLID�labelFontSampleZScaleZ
scaleSpaceNumrIrKrL�
YrJ�
X�
W)r?r3ryZ	frameFontZframeIndentZ
frameFontNameZframeFontParamZlabelFontNameTitleZ
scrollFontZlabelFontSizeTitleZ
checkFontBoldZframeFontSampleZframeIndentSizeZlabelSpaceNumTitler@r@rArMrsn
	













	

















	


(
""
"






(



zConfigDialog.CreatePageFontTabc
!Cs�|j}
t
|
�
|_t
|
�
|_t|
�
|_t
|
�
|_t
|
�
|_t|
�
|_t
|
�
|_	|j
jd
j}t
|dddtdd�
}t
|dddtdd�
}t|dtddd	d\d
ddddddtdddt�
	|_|j}|jddd��
|jddd��
d}}x)|D]!}|jt|d|d�
qH
Wx>|jD]3}|dBdC�
}	|j|j|ddD|	�
qw
W|jdEt�

t|dtdd�
|_t|�
}
t|jddFdG|jdd�
}t|j|j	ddd�
|_ t!|
dH|jdIdddJdG|j"�
|_#t!|
dH|jdIdddKdG|j"�
|_$|jj%d�

t|ddLdG|j&�
}t'|ddM�

}
t!|dH|jdIddG|j(ddN�
|_)t!|dH|jdIddG|j(ddO�
|_*t||jddGd�
|_+t||jddGd�
|_,t|ddPdG|j-�
|_.t'|dQd�

|_/|j0dRt1dSdTdUdTdVt2dWt3�
|j0dRt1dSdTdUdTdWt4�
|jj0dRt5dSdTdUdTdVt2dWt6�
|
j0dRt5dSdTdUd�
|jj0dRt5dSdTdUdTdVt2dWt3�
|j0dRt5dVt2dWt6dSdXdUdY�
|j j0dRt5dVt2dWt6dSdXdUdZ�
|j#j0dRt1d[t7�
|j$j0dRt8d[t9�
|j0dRt:dWt6dSdTdUdT�
|
j0dRt5d[t9dSdTdUdT�
|j)j0dRt5d[t9dSdT�
|j*j0dRt5d[t9dSdTdUd�
|j+j0dRt5dWt6dSdTdUdT�
|j,j0dRt5dWt6d[t9dSdTdUdT�
|j.j0dRt5dWt6dSdTdUdT�
|j/j0dRt5dWt6dUdT�
|S)~NrBr
rXrer\z Custom Highlighting z Highlighting Theme rjrlrc�rr#Zhand2r0�r/�r^�highlightthicknessr
Zwrapz<Double-Button-1>c


Ssd
S)Nr%r@)
�
er@r@rA�<lambda>�sz2ConfigDialog.CreatePageHighlight.<locals>.<lambda>z<B1-Motion>c


Ssd
S)Nr%r@)
r�r@r@rAr��s�#you can click herer�

r�#to choose items�defr�
 �funcr�(param):
  �"""string"""r�

  var0 = �'string'�

  var1 = �
'selected'r�

  var2 = �'found'r �

  var3 = �listr�
(�None�)
�  breakpoint("line")r%�

� error r)�cursor |�
 �shellr'r+r-cSs|jj
�jj|
�

dS)
N)ZwidgetZwinfo_toplevel�highlightTargetr�)�event�elemr@r@rA�tem�s
z-ConfigDialog.CreatePageHighlight.<locals>.temz<ButtonPress-1>�statezChoose Colour for :r]rh�valueZ
ForegroundZ
BackgroundzSave as New Custom Themez	Select : za Built-in Themeza Custom ThemezDelete Custom Theme�bdrFrTrrVrGrH��rWro)rcr�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�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�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�r�r�r�r�r�r�r�r�r�r�r�r�r�r�r�r�r�r�r�r�r�r�);r3rp�builtinTheme�customThemerr�fgHilite�colourrt�themeIsBuiltinr�r<rxryrzr{ZTextr�r:ZNONE�textHighlightSampler�insert�ENDr7Ztag_bindr��DISABLEDr_�frameColourSetr`�	GetColourr�optMenuHighlightTarget�Radiobutton�SetColourSampleBinding�radioFg�radioBgr��SaveAsNewThemer|�SetThemeTypeZradioThemeBuiltin�radioThemeCustom�optMenuThemeBuiltin�optMenuThemeCustom�DeleteCustomTheme�buttonDeleteCustomTheme�new_custom_themerIrarKrLr�rJr��
E�RIGHTr�rS)r?r3ry�frameCustomZ
frameThemer\ZtextAndTagsZtxTa�elementr�Z	frameFgBgZbuttonSetColourZbuttonSaveCustomThemeZlabelTypeTitler@r@rArN�s�
	







	

	



	























































(
"+



(




""

%
%
+
%

z ConfigDialog.CreatePageHighlightc

s�|j}
t
|
�
|_t
|
�
|_t
|
�
|_t|
�
|_t
|
�
|_|jj	d
j
}t|dddtdd�
}t|dddtdd�
�t
|�
}t|dd�

}t|�
}t|d	t�

}t|d
tdt�
|_|jjd|j�
|jd
|jj�

|jd
|jj�

|jjd|j�

|jjd|j�

t|ddd
|jdt�
|_�f
dd�td�
D�
}t|dd|jddd
|j dd�
|_!t|dd|jddd
|j dd�
|_"t#|d|jdd
d�
|_$t#|d|jdd
d�
|_%t|dddd
|j&�
|_'t|dddd
|j(�
}	|j)dt*ddddd t+d!t,�
�j)dt*ddddd!t,�
|jj)dt*d!t-dddd�
|j)dt.ddddd t+d!t,�
|j/dd"d�


|j0dd"d�


|j1d#dd$dd%dd&t2�
|jj1d#dd$dd&t3�
|j1d#dd$dd&t4�
|j1d#dd$dd&t5�
|j!j1d#dd$dd&t2t4�
|j"j1d#dd$dd&t2t4�
|j$j1d#dd$dd&t3�
|j%j1d#dd$dd&t3�
|j'j)dt.d!t-d d'dd�
|	j)dt.d!t-d d'dd�
|dj)dt6d!t,d d'�
|dj)dt6d!t-d d'dd�
|S)(NrCr
rXrer\z Custom Key Bindings z	 Key Set zAction - Key(s)rmr^rfz<ButtonRelease-1>r]rgZxscrollcommandzGet New Keys for Selectionr�c

s.g|]$}
t�dd
dd
dd�
�qS)rTrXrVr
r
)
r_)�.0�
i)
�frameKeySetsr@rA�
<listcomp>F
s	
z/ConfigDialog.CreatePageKeys.<locals>.<listcomp>r
rhr�rjzUse a Built-in Key SetzUse a Custom Key SetzDelete Custom Key SetzSave as New Custom Key SetrFrTrrVrGrH�weight�row�columnZ
columnspan�stickyT)7r3rpZ
bindingTarget�builtinKeys�
customKeysrr�keysAreBuiltin�
keyBindingr<rxryrzr{r_r|r�Z
HORIZONTALr}r:�listBindingsr�KeyBindingSelectedr�r�Zxviewr�r`�
GetNewKeysr��
buttonNewKeys�ranger��SetKeysTypeZradioKeysBuiltin�radioKeysCustomr�optMenuKeysBuiltin�optMenuKeysCustom�DeleteCustomKeys�buttonDeleteCustomKeys�SaveAsNewKeySetrIrSrKrLr�ra�columnconfigure�rowconfigure�gridr��NSEWZNSZEWrJ)
r?r3ryr�ZframeTargetZlabelTargetTitleZ
scrollTargetYZ
scrollTargetXZframesZbuttonSaveCustomKeysr@)
r�rArO%
s~
	






	































(
"%
(

"


#
#


%
"
 
&
zConfigDialog.CreatePageKeysc
Cs|j}
t
|
�
|_t
|
�
|_t|
�
|_t|
�
|_t
|
�
|_t|
�
|_	t
|
�
|_
|jjd
j
}t|dddtdd�
}t|dddtdd�
}t|dddt�
}t|dddtdd�
}t|dd	�

}t|d
|jddd
|jdd�
}t|d
|jddd
|jdd�
}	t|dd�

}
t|d
|jddd
|jdd�
}t|d
|jddd
|jdd�
}t|dd�

}
t|dd�

}t|d|jdd�
}t|dd�

}t|d|jdd�
}t|�
}t|�
}t|�
}t|dddtdt�
|_|jd
|jj�

|jjd|j�

|jjd|j�
t|dd d!tdd"d
|j �
|_!t|dd#dd"d
|j"�
|_#t|dd$d!tdd"d
|j$�
|_%|j&d%t'd&dd'dd(t(�
|j&d%t'd&dd'dd(t(�
|j&d%t'd&dd'dd(t(�
|j&d%t'd&dd'dd)t)d(t*�
|j&d%t+d*t,d&dd'd�
|	j&d%t-d*t,d&dd'd�
|j&d%t-d*t,d&dd'd�
|
j&d%t+d*t,d&dd'd�
|j&d%t-d*t,d&dd'd�
|j&d%t-d*t,d&dd'd�
|
j&d%t+d*t,d&dd'd�
|j&d%t-d*t.d&d+d'd�
|j&d%t-d*t.d'd�
|j&d%t-d*t.d&d+d'd�
|j&d%t-d*t.d'd�
|j&d%t-d&dd'dd(t/�
|j&d%t'd&dd'dd)t)d(t*�
|j&d%t-d*t,d(t/�
|jj&d%t+d*t.d)t)d(t*�
|j!j&d%t'd*t,d'd�
|j#j&d%t'd*t,�
|j%j&d%t'd*t,d'd�
|S),NrDr
rXrer\z Startup Preferences z Autosave Preferences z Additional Help Sources z
At Startuprhr�rjr]zOpen Edit Windowr
zOpen Shell WindowzAt Start of Run (F5)  zPrompt to Savez	No Promptz$Initial Window Size  (in characters)ZWidth�textvariabler0rWZHeightr/rr^rfrgz<ButtonRelease-1>ZEditr�r�ZAddZRemoverFrTrVrHrGrord)0r3rp�winWidth�	winHeightru�startupEdit�autoSave�encodingrrZuserHelpBrowserZhelpBrowserr<rxryrzr{r_r|r�r
�Entryr�r}r:�listHelpr�r�r�r�HelpSourceSelectedr`r��HelpListItemEdit�buttonHelpListEdit�HelpListItemAddZbuttonHelpListAdd�HelpListItemRemove�buttonHelpListRemoverIrJr�rKrLrar�r�r�r�)r?r3ryZframeRunZ	frameSaveZframeWinSizeZ	frameHelpZlabelRunChoiceTitleZradioStartupEditZradioStartupShellZlabelRunSaveTitleZradioSaveAskZ
radioSaveAutoZlabelWinSizeTitleZlabelWinWidthTitleZ
entryWinWidthZlabelWinHeightTitleZentryWinHeightZ
frameHelpListZframeHelpListButtonsZscrollHelpListr@r@rArPr
s�
	







	

	


	



































"
"
"
("
"
""
"
""
"

"
"
(

%



zConfigDialog.CreatePageGeneralc

Cs�
|jj
d
|j�
|jj
d
|j�
|jj
d
|j�
|jj
d
|j�
|jj
d
|j�
|j	j
d
|j
�
|jj
d
|j�
|j
j
d
|j�
|jj
d
|j�
|jj
d
|j�
|jj
d
|j�
|jj
d
|j�
|jj
d
|j�
|jj
d
|j�
|jj
d
|j�
|jj
d
|j�
|jj
d
|j �
|j!j
d
|j"�
dS)N�
w)#rqZtrace_variable�VarChanged_fontrtrsrv�VarChanged_spaceNumr��VarChanged_colourr��VarChanged_builtinThemer��VarChanged_customThemer��VarChanged_themeIsBuiltinr��VarChanged_highlightTargetr��VarChanged_keyBindingr��VarChanged_builtinKeysr��VarChanged_customKeysr��VarChanged_keysAreBuiltinr
�VarChanged_winWidthr
�VarChanged_winHeightr
�VarChanged_startupEditr
�VarChanged_autoSaver
�VarChanged_encoding)
r?r@r@rAr>�
s$

















zConfigDialog.AttachVarCallbacksc
Cs�x�|j|j
|j|j|j|j|j|j|j|j	|j
|j|j|j
|j|j|j|jfD]$}
|
jd
|
j�dd�
qsWdS)z)Remove callbacks to prevent memory leaks.r
r
rjN)rqrtrsrvr�r�r�r�r�r�r�r�r�r
r
r
r
r
Z
trace_vdeleteZtrace_vinfo)r?�varr@r@rA�remove_var_callbacks�
s






z!ConfigDialog.remove_var_callbacksc
Gss|jj
�}|jd
dd|�
|jj
�}|jd
dd|�
|jj
�}|jd
dd|�
dS)z�When one font attribute changes, save them all, as they are
        not independent from each other. In particular, when we are
        overriding the default font, we need to write out everything.
        �main�EditorWindowrlz	font-sizez	font-boldN)rt�get�AddChangedItemrqrs)r?�paramsr�r@r@rAr
�
s




zConfigDialog.VarChanged_fontc
Gs)|jj
�}|jd
dd|�
dS)Nr.
�Indentz
num-spaces)rvr0
r1
)r?r2
r�r@r@rAr
�
s

z ConfigDialog.VarChanged_spaceNumc

Gs|j�
dS)
N)
�OnNewColourSet)r?r2
r@r@rAr

s
zConfigDialog.VarChanged_colourc
Gs�|jj
�}|d
kr~tjddd�dkrL|jdddd�
|jddd|�
|jjdd	d
d�
nE|jddd|�
|jdddd�
|jjddd
d
�
|j�
dS)Nz	IDLE Darkr.
�Theme�namezIDLE NewzIDLE ClassicZname2r\zNew theme, see HelpZfgz#500000rZblack)r�r0
r�	GetOptionr1
r�r��PaintThemeSample)r?r2
r�r@r@rAr
s










z$ConfigDialog.VarChanged_builtinThemec
Gs?|jj
�}|d
kr;|jddd|�
|j�
dS)Nz- no custom themes -r.
r5
r6
)r�r0
r1
r8
)r?r2
r�r@r@rAr 
s



z#ConfigDialog.VarChanged_customThemec
GsF|jj
�}|jd
dd|�
|r8|j�
n
|j�
dS)Nr.
r5
�default)r�r0
r1
r
r 
)r?r2
r�r@r@rAr!
s





z&ConfigDialog.VarChanged_themeIsBuiltinc

Gs|j�
dS)
N)
�SetHighlightTarget)r?r2
r@r@rAr"
 s
z'ConfigDialog.VarChanged_highlightTargetc
Gs�|jj
�}|jj
�}|jj
t�
j�d
}tj|�
rb|jd|||�
n/tj	|�
}|d}|jd|||�
dS)Nr
�keysZ_cfgBindings�
extensions)
r�r0
r�r��ANCHOR�splitrZ
IsCoreBindingr1
ZGetExtnNameForEvent)r?r2
r��keySetr�ZextNameZextKeybindSectionr@r@rAr#
#s






z"ConfigDialog.VarChanged_keyBindingc
Gs6|jj
�}|jd
dd|�
|j|�

dS)Nr.
rCr6
)r�r0
r1
�LoadKeysList)r?r2
r�r@r@rAr$
/s


z#ConfigDialog.VarChanged_builtinKeysc
GsB|jj
�}|d
kr>|jddd|�
|j|�

dS)Nz- no custom keys -r.
rCr6
)r�r0
r1
r@
)r?r2
r�r@r@rAr%
4s



z"ConfigDialog.VarChanged_customKeysc
GsF|jj
�}|jd
dd|�
|r8|j�
n
|j�
dS)Nr.
rCr9
)r�r0
r1
r$
r%
)r?r2
r�r@r@rAr&
:s





z&ConfigDialog.VarChanged_keysAreBuiltinc
Gs)|jj
�}|jd
dd|�
dS)Nr.
r/
r0)r
r0
r1
)r?r2
r�r@r@rAr'
Bs

z ConfigDialog.VarChanged_winWidthc
Gs)|jj
�}|jd
dd|�
dS)Nr.
r/
r/)r
r0
r1
)r?r2
r�r@r@rAr(
Fs

z!ConfigDialog.VarChanged_winHeightc
Gs)|jj
�}|jd
dd|�
dS)Nr.
rDzeditor-on-startup)r
r0
r1
)r?r2
r�r@r@rAr)
Js

z#ConfigDialog.VarChanged_startupEditc
Gs)|jj
�}|jd
dd|�
dS)Nr.
rD�autosave)r
r0
r1
)r?r2
r�r@r@rAr*
Ns

z ConfigDialog.VarChanged_autoSavec
Gs)|jj
�}|jd
dd|�
dS)Nr.
r/
r
)r
r0
r1
)r?r2
r�r@r@rAr+
Rs

z ConfigDialog.VarChanged_encodingc

Cs%d
idididii|_dS)Nr.
�	highlightr;
r<
)
�changedItems)
r?r@r@rAr8Vs
zConfigDialog.ResetChangedItemscCsIt|�
}||j
|
kr0i|j
|
|<||j
|
||<dS)
N)�strrC
)r?�typ�section�itemr�r@r@rAr1
_s



zConfigDialog.AddChangedItemc
Cs�d
idididii}
x�|
D]�}tj
d|�}xh|D]`}i|
||<tj|j|�
}x3|D]+}tj|j||�|
|||<quWqDWq%W|
S)Nr.
rB
r;
r<
r9
)r�GetSectionList�
defaultCfg�
GetOptionList�Get)r?ZdItems�
configTypeZsectionsrF
�optionsZoptionr@r@rA�GetDefaultItemses









1
zConfigDialog.GetDefaultItemsc

Cs�|jj
�rK|jjd
t�

|jjd
t�

|jjd
t�

nL|jjd
t�

|jjd
t�

|jjd
t�

|jjd
t�

dS)Nr�)	r�r0
r�r��NORMALr�r�r�r�)
r?r@r@rAr�qs






zConfigDialog.SetThemeTypec

Cs�|jj
�rK|jjd
t�

|jjd
t�

|jjd
t�

nL|jjd
t�

|jjd
t�

|jjd
t�

|jjd
t�

dS)Nr�)	r�r0
r
r�rO
r
r�r
r
)
r?r@r@rAr
|s






zConfigDialog.SetKeysTypec
Cs�
|jj
t�
}
|jj|
�
}|j�d
}|jj�rU|jj�}n|jj�}tj	�}||j
dkr�|j
d|}x"|D]}||j�||<q�Wt|j��
}t
|d||�j}	|	r�
|jj�rD
d}
|j|
�
}|s7
|jj|
�

|jj|
�

dS|j|�

|jj|
�

|jj|
|d|	�
|jj|
�

|jj|
�

|jj|	�

n |jj|
�

|jj|
�

dS)Nr
r;
zGet New KeyszcYour changes will be saved as a new Custom Key Set. Enter a name for your new Custom Key Set below.z - )r��indexr=
r0
r>
r�r�r�rZGetCurrentKeySetrC
r��valuesr�result�GetNewKeysName�
select_set�
select_anchor�CreateNewKeySet�deleter�r�r�)r?�	listIndex�binding�bindNameZcurrentKeySetNameZcurrentBindings�
keySetChangesr�ZcurrentKeySequences�newKeys�message�	newKeySetr@r@rAr��s<



























zConfigDialog.GetNewKeyscCs>tj
d
d�tj
dd�}t|d|
|�j}|S)N�userr;
r9
zNew Custom Key Set)rrH
rrR
)r?r]
�	usedNamesr^
r@r@rArS
�s





zConfigDialog.GetNewKeysNamec
Cs&|jd
�
}
|
r"|j
|
�

dS)NzNew Key Set Name:)rS
rV
)r?ZnewKeysNamer@r@rAr
�s


zConfigDialog.SaveAsNewKeySetcCs|jj
d
t�

dS)Nr�)r
r�rO
)r?r�r@r@rAr��s
zConfigDialog.KeyBindingSelectedc
Cs#
|jj
�r!|jj
�}n|jj
�}tj|�
}i}x;|D]3}|d
d�}dj||�
}|||<qLW||jdkr�|jd|}x|D]}||||<q�W|j|
|�
tj	dd�}	|	j
�
|jj|	|
�
|jj
d�

|j�
dS)NrXr�r;
r_
r
���)r�r0
r�r�rZGetCoreKeys�joinrC
�
SaveNewKeySetrH
�sortr
�SetMenur�r
)
r?Z
newKeySetNameZprevKeySetNameZprevKeysr\
r�Z	eventNamerY
r[
Z
customKeyListr@r@rArV
�s&
















zConfigDialog.CreateNewKeySetc	Cs9
d
}d
}|jj
�r3d}|jjt�
}tj|
�
}t|j��
}|j�
|jj	d
t
�
x�|D]�}dj||�
}|dd�}|
|jdkr�||jd|
kr�|jd|
|}|jj
t
|d|�
qxW|r5
|jj|�

|jj|�

|jj|�

dS)Nr
rjr�rXr;
z - ra
)r��curselectionrP
r=
rZ	GetKeySetr�r;
rd
rW
r�rb
rC
r��seerT
rU
)	r?�
keySetNameZreselectr^
rX
r?
Z	bindNamesrZ
�keyr@r@rAr@
�s(




















zConfigDialog.LoadKeysListc
CsO
|jj
�}
d
}tjd||
d|�
s5dS|j�
tjdj|
�

|
|jdkrt|jd|
=tjdj	�
tj
dd�}|j�
|s�|jj
dt�

|jj|d�
n|jj||d�
|jjtjd	jd
d��

|jjtjd	jd
d��

|j�
|j�
|j�
dS)
Nz0Are you sure you wish to delete the key set %r ?zDelete Key Setr3r;
r_
r�z- no custom keys -r
r.
rCr9
r6
)r�r0
�tkMessageBox�askyesno�DeactivateCurrentConfigr�userCfg�remove_sectionrC
�SaverH
rd
r
r�r�r
re
r�r�rI
rK
r��SaveAllChangedConfigs�ActivateConfigChangesr
)r?rh
�delmsg�itemListr@r@rAr
�s*













#
#



zConfigDialog.DeleteCustomKeysc
CsO
|jj
�}
d
}tjd||
d|�
s5dS|j�
tjdj|
�

|
|jdkrt|jd|
=tjdj	�
tj
dd�}|j�
|s�|jj
dt�

|jj|d�
n|jj||d�
|jjtjd	jd
d��

|jjtjd	jd
d��

|j�
|j�
|j�
dS)
Nz.Are you sure you wish to delete the theme %r ?zDelete Themer3rB
r_
r�z- no custom themes -r
r.
r5
r9
r6
)r�r0
rj
rk
rl
rrm
rn
rC
ro
rH
rd
r�r�r�r�re
r�r�rI
rK
r�rp
rq
r�)r?�	themeNamerr
rs
r@r@rAr�	s*













#
#



zConfigDialog.DeleteCustomThemec
Cs�|jj
�}
|jjd
�
}tjd|dd|
d|�\}}|r�||kr�|jj
�r�d}|j|�
}|s�dS|j|�

|j	j
|�

n|j	j
|�

dS)N�bgr3r6zPick new colour for : Zinitialcolorz_Your changes will be saved as a new Custom Theme. Enter a name for your new Custom Theme below.)r�r0
r�Zcget�tkColorChooserZaskcolorr��GetNewThemeName�CreateNewThemer�r�)r?�targetZ
prevColourZ	rgbTupletZcolourStringr]
�newThemer@r@rAr�&s


	







zConfigDialog.GetColourc
Cs�|jj
�}
|jjd
|
�

|jj
�r7dnd}|j|jj
�d}|jj|||
i
�

|j	j
�}|d|}|j
d|||
�
dS)Nru
�
foreground�
backgroundr
�
-rB
)r�r0
r�r�r�r7r�r��
tag_configr�r1
)r?Z	newColour�planeZ
sampleElement�themeZthemeElementr@r@rAr4
:s







zConfigDialog.OnNewColourSetcCs>tj
d
d�tj
dd�}t|d|
|�j}|S)Nr_
rB
r9
zNew Custom Theme)rrH
rrR
)r?r]
r`
rz
r@r@rArw
Ds





zConfigDialog.GetNewThemeNamec
Cs&|jd
�
}
|
r"|j
|
�

dS)NzNew Theme Name:)rw
rx
)r?�newThemeNamer@r@rAr�Ks


zConfigDialog.SaveAsNewThemecCs�|jj
�r'd
}|jj
�}nd}|jj
�}tj||�}||jdkr�|jd|}x|D]}||||<qyW|j|
|�
tjdd�}|j	�
|j
j||
�
|jjd�

|j
�
dS)Nr9
r_
rB
r
)r�r0
r�r�rZGetThemeDictrC
�SaveNewThemerH
rd
r�re
r�r�)r?r�
Z	themeTypert
rz
ZthemeChangesr�ZcustomThemeListr@r@rArx
Ps 












zConfigDialog.CreateNewThemecCs6|jj
t�
}|jj|j��

|j�
dS)
N)r~r0
r=
rtr��lowerr�)r?r�rlr@r@rAr�hs


z$ConfigDialog.OnListFontButtonReleaseNcCsr|jj
�}|jj
�r'tjntj}||jj
�|f}|jjd
|�

|j	j
d
|�

dS)Nrl)rtr0
rsrwZBOLDrO
rqr�r�r�r5)r?r�rtZ
fontWeightZnewFontr@r@rAr�ms


!


zConfigDialog.SetFontSamplec

Cs�|jj
�d
krN|jjdt�

|jjdt�

|jjd�

n6|jjdt�

|jjdt�

|jjd�

|j	�
dS)Nr"r�rj)
r�r0
r�r�r�r�r�r�rO
�SetColourSample)
r?r@r@rAr:
ts






zConfigDialog.SetHighlightTargetc

Gs|j�
dS)
N)
r�
)r?�argsr@r@rAr�s
z#ConfigDialog.SetColourSampleBindingc
Csa|j|j
j�d
}
|jj�r/dnd}|jj|
|�}|jjd|�

dS)Nr
r{
r|
ru
)r7r�r0
r�r�Ztag_cgetr�r�)r?�tagr
r�r@r@rAr�
�s


zConfigDialog.SetColourSamplec
Cs
|jj
�r!|jj
�}
n|jj
�}
x�|jD]�}|j|d
}tj|
|�}|dkr�tj|
ddd�
|d<|
|jdkr�|jd|
}|d|kr�||d|d	<|d
|kr�||d
|d<|jj	||�

q:W|j
�
dS)Nr
r#rZfgBgru
r|
rB
z-foregroundr{
z-background)r�r0
r�r�r7rZGetHighlightrC
r�r~
r�
)r?r�
ZelementTitler�ZcoloursZ	themeDictr@r@rAr8
�s"














zConfigDialog.PaintThemeSamplec
Cs|j�
dS)
N)
�SetHelpListButtonStates)r?r�r@r@rAr
�s
zConfigDialog.HelpSourceSelectedc

Cs�|jj
�d
kr>|jjdt�

|jjdt�

n^|jj�rv|jjdt�

|jjdt�

n&|jjdt�

|jjdt�

dS)Nrjr�)r
�sizer
r�r�r
rf
rO
)
r?r@r@rAr�
�s





z$ConfigDialog.SetHelpListButtonStatesc
Cset|d
�j
}
|
rW|jj|
d|
df�

|jjt|
d�
|j�
|j�
dS)NzNew Help Sourcer
rj)	rrR
�userHelpList�appendr
r�r��UpdateUserHelpChangedItemsr�
)r?�
helpSourcer@r@rAr
�s






zConfigDialog.HelpListItemAddc
Cs�|jj
t�
}
|j|
}t|d
d|dd|d�j}|sX||kr\dS||j|
<|jj|
�

|jj|
|d�
|j�
|j	�
dS)NzEdit Help SourceZmenuItemr
ZfilePathrj)
r
rP
r=
r�
rrR
rW
r�r�
r�
)r?�	itemIndexr�
Z
newHelpSourcer@r@rAr
�s














zConfigDialog.HelpListItemEditc
CsD|jj
t�
}
|j|
=|jj|
�

|j�
|j�
dS)
N)r
rP
r=
r�
rW
r�
r�
)r?r�
r@r@rAr
�s







zConfigDialog.HelpListItemRemovec
	Csvi|jd
d<x^t
dt|j�
d�D]@}
|jd
dt|
�
dj|j|
ddd��
�
q.WdS)z<Clear and rebuild the HelpFiles section in self.changedItemsr.
�	HelpFilesrj�
;NrX)rC
r

�lenr�
r1
rD
rb
)r?Znumr@r@rAr�
�s

#


z'ConfigDialog.UpdateUserHelpChangedItemsc
	Cs.
tt
j|�
�
}
|
j�
x!|
D]}|jjt|�
q&Wtj|d
d�}|dj	�}|d}|ddk}|j
j|�

dd�|
D�
}yC|j|�
}|jj
|�

|jj|�

|jj|�

Wntk
r�


Yn
X|jjd|�
|jj|�

|j�
dS)Nr.
r/
r
rjrXZboldc
Ssg|]}
|
j��qSr@)
r�
)r��
sr@r@rAr��s	z,ConfigDialog.LoadFontCfg.<locals>.<listcomp>�
7�
8�
9r(r*r,r.�14�16�18�20�22)r�
r�
r�
r(r*r,r.r�
r�
r�
r�
r�
)r�rwZfamiliesrd
r~r�r�rZGetFontr�
rtr�rP
rg
rT
rU
�
ValueErrorr�re
rsr�)	r?ZfontsrlZconfiguredFontrtrqrsZlc_fontsZcurrentFontIndexr@r@rA�LoadFontCfg�s*



















	

zConfigDialog.LoadFontCfgc
Cs5tj
d
dddddd�}
|jj|
�

dS)Nr.
r3
z
num-spacesr9
r��type�int)rr7
rvr�)r?rvr@r@rA�
LoadTabCfg�s

zConfigDialog.LoadTabCfgc
	s�
�jj
tjd
dddddd��

tj�}
�jj�r�tjdd�}|j�
�jj	||
�
tjdd�}|j�
|s��j
jd	t�

�j
j
d
�

q9
�jj	||d�
nbtjdd�}|j�
�jj	||
�
tjdd�}|j�
�jj	||d�
�j�
t�jj��
}|jd�f
d
d��

�jj	||d�
�j�
�j�
dS)Nr.
r5
r9
r�
�boolrjrB
r_
r�z- no custom themes -r
ri
c

s�j|d
S)Nrj)
r7)
�
x)
r?r@rAr�sz+ConfigDialog.LoadThemeCfg.<locals>.<lambda>)r�r�rr7
ZCurrentThemer0
rH
rd
r�re
r�r�r�r�r�r�r�r7r;
r�r8
r:
)r?�
currentOptionrs
Z
themeNamesr@)
r?rA�LoadThemeCfg�s2
























zConfigDialog.LoadThemeCfgc
	Cs`
|jj
tjd
dddddd��

tj�}
|jj�r�tjdd�}|j�
|jj	||
�
tjdd�}|j�
|s�|j
jd	t�

|j
j
d
�

q9
|jj	||d�
nbtjdd�}|j�
|jj	||
�
tjdd�}|j�
|jj	||d�
|j�
tj�}|j|�

dS)Nr.
rCr9
r�
r�
rjr;
r_
r�z- no custom keys -r
)r�r�rr7
ZCurrentKeysr0
rH
rd
r
re
r
r�r�r�r
r
r@
)r?r�
rs
rh
r@r@rA�
LoadKeyCfgs,




















zConfigDialog.LoadKeyCfgc
	Cs

|jj
tjd
dddddd��

|jj
tjd
dddd	dd��

|jj
tjd
d
ddd�
�

|jj
tjd
d
d
dd�
�

|jj
tjd
d
ddd�
�

tj�|_	x(|j	D]}
|j
jt|
d	�
q�W|j
�
dS)Nr.
rDzeditor-on-startupr9
rjr�
r�
rA
r
r/
r0r�
r/r
Znone)r
r�rr7
r
r
r
r
ZGetAllExtraHelpSourcesListr�
r
r�r�r�
)r?ZhelpItemr@r@rA�LoadGeneralCfg2s








zConfigDialog.LoadGeneralCfgc


Cs6|j�
|j
�
|j�
|j�
|j�
d
S)z�
        load configuration from default and user config files and populate
        the widgets on the config dialog pages.
        N)r�
r�
r�
r�
r�
)
r?r@r@rAr=Gs





zConfigDialog.LoadConfigscCsctj
d
j|
�
s*tj
d
j|
�

x2|D]*}||}tj
d
j|
||�
q1WdS)z�
        save a newly created core key set.
        keySetName - string, the name of the new key set
        keySet - dictionary containing the new key set
        r;
N)rrm
�has_section�add_section�	SetOption)r?rh
r?
r�r�r@r@rArc
Ws






zConfigDialog.SaveNewKeySetcCsctj
d
j|
�
s*tj
d
j|
�

x2|D]*}||}tj
d
j|
||�
q1WdS)z�
        save a newly created theme.
        themeName - string, the name of the new theme
        theme - dictionary containing the new theme
        rB
N)rrm
r�
r�
r�
)r?rt
r�
r�r�r@r@rAr�
cs






zConfigDialog.SaveNewThemecCsitj
|
j||�rOtj
|
j||�|krOtj|
j||�Stj|
j|||�S)
N)rrI
Z
has_optionrK
rm
�RemoveOptionr�
)r?rL
rF
rG
r�r@r@rA�SetUserValueos

zConfigDialog.SetUserValuec
Cs
tj
d
j�
x�|jD]�}
d}x�|j|
D]{}|dkratj
d
jd�

d}xL|j|
|D]9}|j|
||}|j|
|||�rsd}qsWq5W|rtj
|
j�
qWx%ddgD]}
tj
|
j�
q�W|j�
|j�
dS)z3Save configuration changes to the user config file.r.
Fr�
Tr;
rB
N)rrm
ro
rC
rn
r�
r8�save_all_changed_extensions)r?rL
ZcfgTypeHasChangesrF
rG
r�r@r@rArp
ws"














z"ConfigDialog.SaveAllChangedConfigsc
Cs1|jj
j�}
x|
D]}|j�
qWdS)
N)r3r4r;
ZRemoveKeybindings)r?�winInstances�instancer@r@rArl
�s


z$ConfigDialog.DeactivateCurrentConfigc
CsY|jj
j�}
x@|
D]8}|j�
|j�
|j�
|j�
|j�
qWd
S)z'Dynamically apply configuration changesN)r3r4r;
ZResetColorizerZ	ResetFontZset_notabs_indentwidthZApplyKeybindingsZreset_help_menu_entries)r?r�
r�
r@r@rArq
�s










z"ConfigDialog.ActivateConfigChangesc


Cs|j�
dS)
N)
�destroy)
r?r@r@rAr;�s
zConfigDialog.Cancelc


Cs|j�
|j
�
dS)
N)rZr�
)
r?r@r@rArY�s


zConfigDialog.Okc


Cs"|j�
|j
�
|j�
dS)
N)rl
rp
rq
)
r?r@r@rArZ�s




zConfigDialog.Applyc
	Cs6|jj
}
t|d
ddttj|
d��

dS)Nr6zHelp for IDLE preferencesr\r)r<Z
_current_pager	�help_common�
help_pagesr0
)r?Zpager@r@rAr[�s


zConfigDialog.Helpc

Cs|j}
|j
jd
j}tjd|_tjd|_|j	t
�
|_
|j�
t|�
|_
|jddd�


|jddd�


t|d|j
dd	�
|_|jjd
|j�
t|d|jj�

}|j|j_t|dd
dd
�
|_|jjdddddd�
|jdddddd�
|jjdddddddddg�
|jdddd�
i|_d|_||_|j|_d}x6t |j!�
D]%}|j"|�

|d|d}q�
W|j
j|�

|jj#d�

|jd�

dS)aPart of the config dialog used for configuring IDLE extensions.

        This code is generic - it works for any and all IDLE extensions.

        IDLE extensions save their configuration options using idleConf.
        This code reads the current configuration using idleConf, supplies a
        GUI interface to change the configuration values, and saves the
        changes using idleConf.

        Not all changes take effect immediately - some may require restarting IDLE.
        This depends on each extension's implementation.

        All values are treated as text, and it is up to the user to supply
        reasonable values. The only exception to this are the 'enable*' options,
        which are boolean, and can be toggled with a True/False button.
        rEr<
r
r�rjrXZlistvariableZ
selectmodeZbrowsez<<ListboxSelect>>r]r0�r/r�r�r�Znws�ns�nsewrTrdrVNr�
{z} )$r3r<rxryrrI
�ext_defaultCfgrm
�ext_userCfg�register�is_int�load_extensionsrpZextension_namesr

r	
r}�extension_listr�extension_selectedr�r�r�rgrz�
details_framer
r5�config_frame�current_extensionZ
outerframeZtabbed_page_set�sortedr<
�create_extension_frameZ
selection_set)r?r3ryZscrollZ	ext_names�ext_namer@r@rArQ�s<	
















+

	
		







z!ConfigDialog.CreatePageExtensionsc

#Cs�
i|_x't
jd
d�
D]}
g|j|
<qWx�
|jD]�
}
t|jj|
�
�
}dd�|D�
}x|D]}|j|�

quW||}x,
|D]$
}|jj|
|dd�
}y ddddi|}d	}WnItk
r)



yt	|�
}d
}Wnt
k
r$



|}d}Yn
XYn
Xy+|jj|
|d|ddd
|�}Wnt
k
ro



|}Yn
Xt|�
}	|	j
t|�
�

|j|
jd|d|d
|d|d|	i�

q�Wq=WdS)zAFill self.extensions with data from the default and user configs.Zactive_onlyFc
Ss%g|]}
|
jd�
r|
�qS)
�enable)
�
startswith)r��opt_namer@r@rAr��s	
z0ConfigDialog.load_extensions.<locals>.<listcomp>�rawT�True�Falser�
r�
Nr�
r9
r6
r�r,
)r<
rZ
GetExtensionsr�
r�
rJ
�removerK
�KeyErrorr�
r�
r�
rpr�rD
r�
)
r?r�
Zopt_listZenablesr�
Zdef_strZdef_objZopt_typer�r,
r@r@rAr�
�sF	








	
















	











zConfigDialog.load_extensionscCs�|jj
�}|r'|jj|�
}|dksB||jkr{|jr{|jjd
d�

|j|jj�
d|_|r�|jjd
|�

|j|jdddddd�
||_dS)Nr\rr�r
r�r�r�
)	r�
rf
r0
r�
r�
r�r�
Zgrid_forgetr
)r?r�Znewselr@r@rAr�
s




	


	


#
zConfigDialog.extension_selectedcCs~
t|j
d
ddd�
}||j|
<|j}xF
t|j|
�
D]1
\}}t|d|d�

}|jd|ddd	t�
|d
}|ddkr�t	|d
|d|dddddt
dddd�
jd|ddd	tdd�
qE|ddkrH
t|d
|ddd|j
df�
jd|ddd	tdd�
qEt|d
|�

jd|ddd	tdd�
qEWdS) z=Create a frame holding the widgets to configure one extensionr/r�
r0r\r6
r�r�r
r�r,
r�
r�
r

rhrir�
rkr�
ZindicatoronZselectcolorrr�rjrT�r�
Zvalidateri
Zvalidatecommandz%PN)�VerticalScrolledFramer�
r�
�interior�	enumerater<
r|r
�NWr�r:r�r
r�
r
)r?r�
�
fZ
entry_arear��optZlabelr,
r@r@rAr�
s&


	 













z#ConfigDialog.create_extension_framecCsv|d
}|d}|dj�j
�p-|}|dj|�

||kr`|jj|
|�S|jj|
||�S)Nr6
r9
r,
)r0
�stripr�r�
r�
r�
)r?rF
r�
r6
r9
r�r@r@rA�set_extension_value9s






z ConfigDialog.set_extension_valuec
Csgd
}
xG|jD]<}|j|}x&|D]}|j
||�r*d}
q*WqW|
rc|jj�
dS)z3Save configuration changes to the user config file.FTN)r<
r�
r�
ro
)r?Zhas_changesr�
rM
r�
r@r@rAr�
Es








z(ConfigDialog.save_all_changed_extensions)P�__name__�
__module__�__qualname__r2r9rRrMrNrOrPr>r-
r
r
r
r
r 
r!
r"
r#
r$
r%
r&
r'
r(
r)
r*
r+
r8r1
rN
r�r
r�rS
r
r�rV
r@
r
r�r�r4
rw
r�rx
r�r�r:
r�r�
r8
r
r�
r
r
r
r�
r�
r�
r�
r�
r�
r=rc
r�
r�
rp
rl
rq
r;rYrZr[rQr�
r�
r�
r�
r�
r@r@r@rArs�5DoM`	$
!
5-rah
When you click either the Apply or Ok buttons, settings in this
dialog that are different from IDLE's default are saved in
a .idlerc directory in your home directory. Except as noted,
these changes apply to all versions of IDLE installed on this
machine. Some do not take affect until IDLE is restarted.
[Cancel] only cancels changes made since the last save.
rBz�
Highlighting:
The IDLE Dark color theme is new in October 2015.  It can only
be used with older IDLE releases if it is saved as a custom
theme, with a different name.
c

Cs9|s
d
Syt|�

d
SWnt
k
r4


dSYn
XdS)z(Return 's is blank or represents an int'TFN)r�
r�
)
r�
r@r@rAr�
cs







r�
c@s"eZ
dZd
Zdd�ZdS)r�
z�A pure Tkinter vertically scrollable frame.

    * Use the 'interior' attribute to place widgets inside the scrollable frame
    * Construct and pack/place/grid normally
    * This frame only allows vertical scrolling
    c
s6
tj
||
||�
t|d
t�

}|jdtdtdt�
t|ddddd|j	d	d
�
��jdt
dtdt�
|j
d�j�

�jd�

�jd�

t��
|_�
�jddd�
d
t����
fdd�}�
jd|�
��
�fdd�}�jd|�
dS)NrmrHrFrGr�r
r�rgr0��r]Zwindowroc
s0�
j��
j
�f}
�jd
d|
�

dS)NZscrollregionz	0 0 %s %s)�winfo_reqwidthZwinfo_reqheightr�)r�r�
)�canvasr�
r@rA�_configure_interior�s
z;VerticalScrolledFrame.__init__.<locals>._configure_interiorz<Configure>c

s5�
j��j
�kr1�j�d
�j
��


dS)Nr0)r�
Zwinfo_widthZ
itemconfigure)
r�)r�
r�
�interior_idr@rA�_configure_canvas�s
z9VerticalScrolledFrame.__init__.<locals>._configure_canvas)r_r2r�ZVERTICALrIr�r�r:ZCanvasr�rarLrKr�r�Zxview_movetoZyview_movetor�
Z
create_windowr�
r)r?r3r�
�kwZ
vscrollbarr�
r�
r@)r�
r�
r�
rAr2us 









zVerticalScrolledFrame.__init__N)r�
r�
r�
�__doc__r2r@r@r@rAr�
ns
r�
�__main__z#idlelib.idle_test.test_configdialog�	verbosityrX�exitF)
�run)'r�
ZtkinterZtkinter.messageboxZ
messageboxrj
Ztkinter.colorchooserZcolorchooserrv
Ztkinter.fontrlrwZidlelib.configHandlerrZidlelib.dynOptionMenuWidgetrZidlelib.keybindingDialogrZidlelib.configSectionNameDialogrZidlelib.configHelpSourceEditrZidlelib.tabbedpagesrZidlelib.textViewr	Zidlelibr
r1rr�
r�
r�
r_r�
r�
Zunittestr.
Zidlelib.idle_test.htestr�
r@r@r@rA�<module>s:











�����C	+