��Yf%� � @ sV d Z d d l Td d l j Z d d l j Z d d l j Z
d d l m Z d d l
m Z d d l m Z d d l m Z d d l m Z d d l m Z d d
l m Z d d l m Z Gd d
� d
e � Z d Z d d i Z d d � Z Gd d � d e � Z! e" d k rRd d l# Z# e# j$ d d d d d �d d l% m& Z& e& e � d S) 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� e Z d Z d d d d d � Z d d � Z d d � Z d d
� Z d d � Z d
d � Z d d � Z d d � Z
d d � Z d d � Z d d � Z
d d � Z d d � Z d d � Z d d � Z d! d" � Z d# d$ � Z d% d& � Z d' d( � Z d) d* � Z d+ d, � Z d- d. � Z d/ d0 � Z d1 d2 � Z d3 d4 � Z d5 d6 � Z d7 d8 � Z d9 d: � Z d; d< � Z d= d> � Z d? d@ � Z! dA dB � Z" dC dD � Z# dE dF � Z$ dG dH � Z% dI dJ � Z& dK dL � Z' dM dN � Z( dO dP � Z) dQ dR � Z* dS dT � Z+ dU dV � Z, dW dX � Z- dY dZ � Z. d[ d\ d] � Z/ d^ d_ � Z0 d` da � Z1 db dc � Z2 dd de � Z3 df dg � Z4 dh di � Z5 dj dk � Z6 dl dm � Z7 dn do � Z8 dp dq � Z9 dr ds � Z: dt du � Z; dv dw � Z< dx dy � Z= dz d{ � Z> d| d} � Z? d~ d � Z@ d� d� � ZA d� d� � ZB d� d� � ZC d� d� � ZD d� d� � ZE d� d� � ZF d� d� � ZG d� d� � ZH d� d� � ZI d� d� � ZJ d� d� � ZK d� d� � ZL d� d� � ZM d� d� � ZN d� d� � ZO d[ S)�� ConfigDialog� Fc C s| t j | | � | | _ | r( i | _ | j � | j d d � | j | pQ d � | j d | j � d | j � | s� d n d f � d d6 d d7 d d8 d d9 d d: d d; d d< d d= d d> d# d? d& d@ d) dA d, dB d/ dC i | _
| j � | j � | j
d2 t d3 t � | j | � | j � | j d4 | j � | j j � | j � | j � | sx| j � | j � d5 S)Dz�
_htest - bool, change box location when running htest
_utest - bool, don't wait_window when running unittest
� borderwidth� zIDLE Preferencesz+%d+%d� � � z Normal 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)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. )�Toplevel�__init__�parent�
instance_dictZ wm_withdraw� configure�titleZgeometryZ winfo_rootxZ winfo_rooty�
themeElements�ResetChangedItems�
CreateWidgetsZ resizable�FALSEZ transientZgrab_setZprotocol�Cancel�tabPagesZ focus_set� LoadConfigs�AttachVarCallbacksZ wm_deiconifyZ wait_window)�selfr3 r6 Z_htestZ_utest� r@ �9/opt/alt/python35/lib64/python3.5/idlelib/configDialog.pyr2 sH
!
zConfigDialog.__init__c C s� t | d d d d d d g �| _ | j j d t d t d t � | j � | j � | j � | j � | j
� | j � j d t � d S)
NZ
page_namesz
Fonts/Tabs� Highlighting�Keys�General�
Extensions�side�expand�fill)
r r< �pack�TOP�TRUE�BOTH�CreatePageFontTab�CreatePageHighlight�CreatePageKeys�CreatePageGeneral�CreatePageExtensions�create_action_buttons�BOTTOM)r? r@ r@ rA r9 Q s
zConfigDialog.CreateWidgetsc
C s� t j � r i } n d d d d i } t | d d �} t | d d �} xu d | j f d | j f d | j f d | j f f D]= \ } } t | d
| d | d t | �j d
t
d d � q� Wt | d d d d �j d
t � | j d
t � | S)N�padx� �pady� � �Ok�Applyr; �Help�text�command� takefocusrF r r/ r
r )
r
ZisAquaTk�FramerY rZ r; r[ �Buttonr: rI �LEFTrJ rS )r? Z paddingArgsZouterZbuttonsZtxt�cmdr@ r@ rA rR ] s "z"ConfigDialog.create_action_buttonsc C s� | j } t | � | _ t | � | _ t | � | _ t | � | _ t j | d+ � | _
| j j d j
} t | d d d t d d �} t | d d d t d d
�} t | � } t | � } t | d t d d �} t | d
d d t d t �| _ | j j d | j � t | � } | j d | j j � | j j d | j � t | d d �} t | | j d d | j �| _ t | d | j d d d d d d d | j �}
t | d t d d �} t | d t d | j
d d �| _! t | � } t | d t d d �}
t" | d | j d d d d d! d d" d# �| _# | j$ d$ t d% d d& d d' t% d( t& � | j$ d$ t d% d d& d d( t' � | j$ d$ t( d% d d& d d( t) � | j$ d$ t( d% d d& d d( t) � | j$ d$ t( d) t* � | j j$ d$ t d' t% d( t) � | j$ d$ t d( t' � | j$ d$ t d) t* � | j j$ d$ t d) t* � |
j$ d$ t d) t* d% d* � | j$ d$ t( d% d d& d d' 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% d d( t) � | S),N�courier�
r z
Fonts/Tabsr
rX �reliefr\ z Base Editor Font z Indentation Width Zjustifyz Font Face :r/ r r^ �exportselectionz<ButtonRelease-1>r] �yscrollcommandzSize :�variable�onvalue� �offvaluer ZBold�fontz,AaBbCcDdEe
FfGgHhIiJjK
1234567890
#:+=(){}[]zPython Standard: 4 Spaces!�orientZ
horizontalZ tickintervalZfrom_Zto� rF rT rV rG rH �anchorr )rc rd r )+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
scaleSpaceNumrI rK rL �YrJ �X�W)r? r3 ry Z frameFontZ frameIndentZ
frameFontNameZframeFontParamZlabelFontNameTitleZ
scrollFontZlabelFontSizeTitleZ
checkFontBoldZframeFontSampleZframeIndentSizeZlabelSpaceNumTitler@ r@ rA rM r sn
(""" ( z ConfigDialog.CreatePageFontTabc ! C s� | j } t | � | _ t | � | _ t | � | _ t | � | _ t | � | _ t | � | _ t | � | _ | j
j d j } t
| d d d t d d �} t
| d d d t d d �} t | d t d d d d\ d
d d d d d d t d d d t � | _ | j } | j d d d � � | j d d d � � d} } x) | D]! } | j t | d | d � qHWx> | j D]3 } | dB dC � } | j | j | d dD | � qwW| j dE t � t | d t d d �| _ t | � }
t | j d dF dG | j d d �} t | j | j d d d �| _ t! |
dH | j dI d d dJ dG | j" �| _# t! |
dH | j dI d d dK dG | j" �| _$ | j j% d � t | d dL dG | j& �} t' | d dM �}
t! | dH | j dI d dG | j( d dN �| _) t! | dH | j dI d dG | j( d dO �| _* t | | j d dG d �| _+ t | | j d dG d �| _, t | d dP dG | j- �| _. t' | dQ d �| _/ | j0 dR t1 dS dT dU dT dV t2 dW t3 � | j0 dR t1 dS dT dU dT dW t4 � | j j0 dR t5 dS dT dU dT dV t2 dW t6 � |
j0 dR t5 dS dT dU d � | j j0 dR t5 dS dT dU dT dV t2 dW t3 � | j0 dR t5 dV t2 dW t6 dS dX dU dY � | j j0 dR t5 dV t2 dW t6 dS dX dU dZ � | j# j0 dR t1 d[ t7 � | j$ j0 dR t8 d[ t9 � | j0 dR t: dW t6 dS dT dU dT � |
j0 dR t5 d[ t9 dS dT dU dT � | j) j0 dR t5 d[ t9 dS dT � | j* j0 dR t5 d[ t9 dS dT dU d � | j+ j0 dR t5 dW t6 dS dT dU dT � | j, j0 dR t5 dW t6 d[ t9 dS dT dU dT � | j. j0 dR t5 dW t6 dS dT dU dT � | j/ j0 dR t5 dW t6 dU dT � | S)~NrB r
rX re r\ z Custom Highlighting z Highlighting Theme rj rl rc � r r# Zhand2r0 � r/ � r^ �highlightthicknessr Zwrapz<Double-Button-1>c S s d S)Nr% r@ )�er@ r@ rA �<lambda>� s z2ConfigDialog.CreatePageHighlight.<locals>.<lambda>z <B1-Motion>c S s d S)Nr% r@ )r� r@ r@ rA r� � 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- c S s | j j � j j | � d S)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�bdrF rT r rV rG rH � � rW ro )rc 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� r� );r3 rp � builtinTheme� customThemerr �fgHilite�colourrt �themeIsBuiltinr� r< rx ry rz r{ ZTextr� r: ZNONE�textHighlightSampler �insert�ENDr7 Ztag_bindr� �DISABLEDr_ �frameColourSetr` � GetColourr �optMenuHighlightTarget� Radiobutton�SetColourSampleBinding�radioFg�radioBgr� �SaveAsNewThemer| � SetThemeTypeZradioThemeBuiltin�radioThemeCustom�optMenuThemeBuiltin�optMenuThemeCustom�DeleteCustomTheme�buttonDeleteCustomTheme�new_custom_themerI ra rK rL r� rJ r� �E�RIGHTr� rS )r? r3 ry � frameCustomZ
frameThemer\ Z textAndTagsZtxTa�elementr� Z frameFgBgZbuttonSetColourZbuttonSaveCustomThemeZlabelTypeTitler@ r@ rA rN � s�
("+ ( "" %%+% z ConfigDialog.CreatePageHighlightc
s� | j } t | � | _ t | � | _ t | � | _ t | � | _ t | � | _ | j j d j
} t | d d d t d d �} t | d d d t d d �� t
| � } t | d d �} t | � } t | d t �} t | d
t d t �| _ | j j d | j � | j d
| j j � | j d
| j j � | j j d | j � | j j d | j � t | d d d
| j d t �| _ � f d d � t d � D� } t | d d | j d d d
| j d d �| _! t | d d | j d d d
| j d d �| _" t# | d | j d d
d �| _$ t# | d | j d d
d �| _% t | d d d d
| j& �| _' t | d d d d
| j( �} | j) d t* d d d d d t+ d! t, � � j) d t* d d d d d! t, � | j j) d t* d! t- d d d d � | j) d t. d d d d d t+ d! t, � | j/ d d" d �| j0 d d" d �| j1 d# d d$ d d% d d& t2 � | j j1 d# d d$ d d& t3 � | j1 d# d d$ d d& t4 � | j1 d# d d$ d d& t5 � | j! j1 d# d d$ d d& t2 t4 � | j" j1 d# d d$ d d& t2 t4 � | j$ j1 d# d d$ d d& t3 � | j% j1 d# d d$ d d& t3 � | j' j) d t. d! t- d d' d d � | j) d t. d! t- d d' d d � | d j) d t6 d! t, d d' � | d j) d t6 d! t- d d' d d � | S)(NrC r
rX re r\ z Custom Key Bindings z Key Set zAction - Key(s)rm r^ rf z<ButtonRelease-1>r] rg ZxscrollcommandzGet New Keys for Selectionr� c
s. g | ]$ } t � d d d d d d �� q S)rT rX rV r
r )r_ )�.0�i)� frameKeySetsr@ rA �
<listcomp>F s z/ConfigDialog.CreatePageKeys.<locals>.<listcomp>r rh r� rj zUse a Built-in Key SetzUse a Custom Key SetzDelete Custom Key SetzSave as New Custom Key SetrF rT r rV rG rH �weight�row�columnZ
columnspan�stickyT)7r3 rp Z
bindingTarget� builtinKeys�
customKeysrr �keysAreBuiltin�
keyBindingr< rx ry rz r{ r_ r| r� Z
HORIZONTALr} r: � listBindingsr �KeyBindingSelectedr� r� Zxviewr� r` �
GetNewKeysr� �
buttonNewKeys�ranger� � SetKeysTypeZradioKeysBuiltin�radioKeysCustomr �optMenuKeysBuiltin�optMenuKeysCustom�DeleteCustomKeys�buttonDeleteCustomKeys�SaveAsNewKeySetrI rS rK rL r� ra �columnconfigure� rowconfigure�gridr� �NSEWZNSZEWrJ )
r? r3 ry r� Z frameTargetZlabelTargetTitleZ
scrollTargetYZ
scrollTargetXZframesZbuttonSaveCustomKeysr@ )r� rA rO % s~ ("%(" ## %" &zConfigDialog.CreatePageKeysc C s | j } t | � | _ t | � | _ t | � | _ t | � | _ t | � | _ t | � | _ t | � | _
| j j d j
} t | d d d t d d �} t | d d d t d d �} t | d d d t �} t | d d d t d d �} t | d d �} t | d
| j d d d
| j d d �} t | d
| j d d d
| j d d �} t | d d �}
t | d
| j d d d
| j d d �} t | d
| j d d d
| j d d �} t | d d �}
t | d d �} t | d | j d d �} t | d d �} t | d | j d d �} t | � } t | � } t | � } t | d d d t d t �| _ | j d
| j j � | j j d | j � | j j d | j � t | d d d! t d d" d
| j �| _! t | d d# d d" d
| j" �| _# t | d d$ d! t d d" d
| j$ �| _% | j& d% t' d& d d' d d( t( � | j& d% t' d& d d' d d( t( � | j& d% t' d& d d' d d( t( � | j& d% t' d& d d' d d) t) d( t* � | j& d% t+ d* t, d& d d' d � | j& d% t- d* t, d& d d' d � | j& d% t- d* t, d& d d' d � |
j& d% t+ d* t, d& d d' d � | j& d% t- d* t, d& d d' d � | j& d% t- d* t, d& d d' d � |
j& d% t+ d* t, d& d d' 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& d d' d d( t/ � | j& d% t' d& d d' d d) t) d( t* � | j& d% t- d* t, d( t/ � | j j& 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),NrD r
rX re r\ z Startup Preferences z Autosave Preferences z Additional Help Sources z
At Startuprh r� rj r] zOpen Edit Windowr zOpen Shell WindowzAt Start of Run (F5) zPrompt to Savez No Promptz$Initial Window Size (in characters)ZWidth� textvariabler0 rW ZHeightr/ r r^ rf rg z<ButtonRelease-1>ZEditr� r� ZAddZRemoverF rT rV rH rG ro rd )0r3 rp �winWidth� winHeightru � startupEdit�autoSave�encodingrr ZuserHelpBrowserZ helpBrowserr< rx ry rz r{ r_ r| r� r �Entryr� r} r: �listHelpr� r� r� r �HelpSourceSelectedr` r� �HelpListItemEdit�buttonHelpListEdit�HelpListItemAddZbuttonHelpListAdd�HelpListItemRemove�buttonHelpListRemoverI rJ r� rK rL ra r� r� r� r� )r? r3 ry ZframeRunZ frameSaveZ frameWinSizeZ frameHelpZlabelRunChoiceTitleZradioStartupEditZradioStartupShellZlabelRunSaveTitleZ radioSaveAskZ
radioSaveAutoZlabelWinSizeTitleZlabelWinWidthTitleZ
entryWinWidthZlabelWinHeightTitleZentryWinHeightZ
frameHelpListZframeHelpListButtonsZscrollHelpListr@ r@ rA rP r s� """("""""""" " "( % z ConfigDialog.CreatePageGeneralc C s� | j j d | j � | j j d | j � | j j d | j � | j j d | j � | j j d | j � | j j d | j
� | j j d | j � | j
j d | j � | j j d | j � | j j d | j � | j j d | j � | j j d | j � | j j d | j � | j j d | j � | j j d | j � | j j d | j � | j j d | j � | j! j d | j" � d S)N�w)#rq Ztrace_variable�VarChanged_fontrt rs rv �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@ rA r> � s$ z ConfigDialog.AttachVarCallbacksc C s� x� | j | j | j | j | j | j | j | j | j | j | j
| j | j | j
| j | j | j | j f D]$ } | j d | j � d d � qs Wd S)z)Remove callbacks to prevent memory leaks.r r rj N)rq rt rs rv r� r� r� r� r� r� r� r� r� r r r r r Z
trace_vdeleteZ trace_vinfo)r? �varr@ r@ rA �remove_var_callbacks� s z!ConfigDialog.remove_var_callbacksc G ss | j j � } | j d d d | � | j j � } | j d d d | � | j j � } | j d d d | � d S)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� EditorWindowrl z font-sizez font-boldN)rt �get�AddChangedItemrq rs )r? �paramsr� r@ r@ rA r � s z ConfigDialog.VarChanged_fontc G s) | j j � } | j d d d | � d S)Nr. �Indentz
num-spaces)rv r0 r1 )r? r2 r� r@ r@ rA r � s z ConfigDialog.VarChanged_spaceNumc G s | j � d S)N)�OnNewColourSet)r? r2 r@ r@ rA r s z ConfigDialog.VarChanged_colourc G s� | j j � } | d k r~ t j d d d � d k rL | j d d d d � | j d d d | � | j j d d d
d � nE | j d d d | � | j d d d d � | j j d d d
d
� | j � d S)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@ rA r s
z$ConfigDialog.VarChanged_builtinThemec G s? | j j � } | d k r; | j d d d | � | j � d S)Nz- no custom themes -r. r5 r6 )r� r0 r1 r8 )r? r2 r� r@ r@ rA r s z#ConfigDialog.VarChanged_customThemec G sF | j j � } | j d d d | � | r8 | j � n
| j � d S)Nr. r5 �default)r� r0 r1 r r )r? r2 r� r@ r@ rA r! s
z&ConfigDialog.VarChanged_themeIsBuiltinc G s | j � d S)N)�SetHighlightTarget)r? r2 r@ r@ rA r" s z'ConfigDialog.VarChanged_highlightTargetc G s� | j j � } | j j � } | j j t � j � d } t j | � rb | j d | | | � n/ t j | � } | d } | j d | | | � d S)Nr �keysZ _cfgBindings�
extensions)
r� r0 r� r� �ANCHOR�splitr Z
IsCoreBindingr1 ZGetExtnNameForEvent)r? r2 r� �keySetr� ZextNameZextKeybindSectionr@ r@ rA r# # s
z"ConfigDialog.VarChanged_keyBindingc G s6 | j j � } | j d d d | � | j | � d S)Nr. rC r6 )r� r0 r1 � LoadKeysList)r? r2 r� r@ r@ rA r$ / s z#ConfigDialog.VarChanged_builtinKeysc G sB | j j � } | d k r> | j d d d | � | j | � d S)Nz- no custom keys -r. rC r6 )r� r0 r1 r@ )r? r2 r� r@ r@ rA r% 4 s z"ConfigDialog.VarChanged_customKeysc G sF | j j � } | j d d d | � | r8 | j � n
| j � d S)Nr. rC r9 )r� r0 r1 r$ r% )r? r2 r� r@ r@ rA r& : s
z&ConfigDialog.VarChanged_keysAreBuiltinc G s) | j j � } | j d d d | � d S)Nr. r/ r0 )r r0 r1 )r? r2 r� r@ r@ rA r' B s z ConfigDialog.VarChanged_winWidthc G s) | j j � } | j d d d | � d S)Nr. r/ r/ )r r0 r1 )r? r2 r� r@ r@ rA r( F s z!ConfigDialog.VarChanged_winHeightc G s) | j j � } | j d d d | � d S)Nr. rD zeditor-on-startup)r r0 r1 )r? r2 r� r@ r@ rA r) J s z#ConfigDialog.VarChanged_startupEditc G s) | j j � } | j d d d | � d S)Nr. rD �autosave)r r0 r1 )r? r2 r� r@ r@ rA r* N s z ConfigDialog.VarChanged_autoSavec G s) | j j � } | j d d d | � d S)Nr. r/ r )r r0 r1 )r? r2 r� r@ r@ rA r+ R s z ConfigDialog.VarChanged_encodingc C s% d i d i d i d i i | _ d S)Nr. � highlightr; r< )� changedItems)r? r@ r@ rA r8 V s z ConfigDialog.ResetChangedItemsc C sI t | � } | | j | k r0 i | j | | <| | j | | | <d S)N)�strrC )r? �typ�section�itemr� r@ r@ rA r1 _ s zConfigDialog.AddChangedItemc C s� d i d i d i d i i } x� | D]� } t j d | � } xh | D]` } i | | | <t j | j | � } x3 | D]+ } t j | j | | � | | | | <qu WqD Wq% W| S)Nr. rB r; r< r9 )r �GetSectionList�
defaultCfg�
GetOptionList�Get)r? ZdItems�
configTypeZsectionsrF �optionsZoptionr@ r@ rA �GetDefaultItemse s
1z ConfigDialog.GetDefaultItemsc C s� | j j � rK | j j d t � | j j d t � | j j d t � nL | j j d t � | j j d t � | j j d t � | j j d t � d S)Nr� ) r� r0 r� r� �NORMALr� r� r� r� )r? r@ r@ rA r� q s zConfigDialog.SetThemeTypec C s� | j j � rK | j j d t � | j j d t � | j j d t � nL | j j d t � | j j d t � | j j d t � | j j d t � d S)Nr� ) r� r0 r r� rO r r� r r )r? r@ r@ rA r | s zConfigDialog.SetKeysTypec C s� | j j t � } | j j | � } | j � d } | j j � rU | j j � } n | j j � } t j � } | | j
d k r� | j
d | } x" | D] } | | j � | | <q� Wt | j � � } t
| d | | � j } | r�| j j � rDd }
| j |
� } | s7| j j | � | j j | � d S| j | � | j j | � | j j | | d | � | j j | � | j j | � | j j | � n | j j | � | j j | � d S)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� r ZGetCurrentKeySetrC r� �valuesr �result�GetNewKeysName�
select_set�
select_anchor�CreateNewKeySet�deleter� r� r� ) r? � listIndex�binding�bindNameZcurrentKeySetNameZcurrentBindings�
keySetChangesr� ZcurrentKeySequences�newKeys�message� newKeySetr@ r@ rA r� � s<
zConfigDialog.GetNewKeysc C s> t j d d � t j d d � } t | d | | � j } | S)N�userr; r9 zNew Custom Key Set)r rH r rR )r? r] � usedNamesr^ r@ r@ rA rS � s
zConfigDialog.GetNewKeysNamec C s& | j d � } | r" | j | � d S)NzNew Key Set Name:)rS rV )r? Z newKeysNamer@ r@ rA r � s z ConfigDialog.SaveAsNewKeySetc C s | j j d t � d S)Nr� )r r� rO )r? r� r@ r@ rA r� � s z ConfigDialog.KeyBindingSelectedc
C s# | j j � r! | j j � } n | j j � } t j | � } i } x; | D]3 } | d d � } d j | | � } | | | <qL W| | j d k r� | j d | } x | D] } | | | | <q� W| j | | � t j d d � } | j
� | j j | | � | j j
d � | j � d S)NrX r� r; r_ r ���)r� r0 r� r� r Z GetCoreKeys�joinrC �
SaveNewKeySetrH �sortr �SetMenur� r )
r? Z
newKeySetNameZprevKeySetNameZprevKeysr\ r� Z eventNamerY r[ Z
customKeyListr@ r@ rA rV � s&
z ConfigDialog.CreateNewKeySetc C s9 d } d } | j j � r3 d } | j j t � } t j | � } t | j � � } | j � | j j d t
� x� | D]� } d j | | � } | d d � } | | j d k r� | | j d | k r� | j d | | } | j j
t
| d | � qx W| r5| j j | � | j j | � | j j | � d S)Nr rj r� rX r; z - ra )r� � curselectionrP r= r Z GetKeySetr� r; rd rW r� rb rC r� �seerT rU ) r? �
keySetNameZreselectr^ rX r? Z bindNamesrZ �keyr@ r@ rA r@ � s(
zConfigDialog.LoadKeysListc C sO | j j � } d } t j d | | d | �s5 d S| j � t j d j | � | | j d k rt | j d | =t j d j � t j
d d � } | j � | s� | j j
d t � | j j | d � n | j j | | d � | j j t j d j d
d � � | j j t j d j d
d � � | j � | j � | j � d S)
Nz0Are you sure you wish to delete the key set %r ?zDelete Key Setr3 r; r_ r� z- no custom keys -r r. rC r9 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@ rA r � s*
##
z ConfigDialog.DeleteCustomKeysc C sO | j j � } d } t j d | | d | �s5 d S| j � t j d j | � | | j d k rt | j d | =t j d j � t j
d d � } | j � | s� | j j
d t � | j j | d � n | j j | | d � | j j t j d j d
d � � | j j t j d j d
d � � | j � | j � | j � d S)
Nz.Are you sure you wish to delete the theme %r ?z Delete Themer3 rB r_ r� z- no custom themes -r r. r5 r9 r6 )r� r0 rj rk rl r rm rn rC ro rH rd r� r� r� r� re r� r� rI rK r� rp rq r� )r? � themeNamerr rs r@ r@ rA r� s*
##
z ConfigDialog.DeleteCustomThemec C s� | j j � } | j j d � } t j d | d d | d | � \ } } | r� | | k r� | j j � r� d } | j | � } | s� d S| j | � | j j
| � n | j j
| � d S)N�bgr3 r6 zPick 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@ rA r� & s
zConfigDialog.GetColourc C s� | j j � } | j j d | � | j j � r7 d n d } | j | j j � d } | j j | | | i � | j j � } | d | } | j
d | | | � d S)Nru �
foreground�
backgroundr �-rB ) r� r0 r� r� r� r7 r� r� �
tag_configr� r1 )r? Z newColour�planeZ
sampleElement�themeZ themeElementr@ r@ rA r4 : s zConfigDialog.OnNewColourSetc C s> t j d d � t j d d � } t | d | | � j } | S)Nr_ rB r9 zNew Custom Theme)r rH r rR )r? r] r` rz r@ r@ rA rw D s
z ConfigDialog.GetNewThemeNamec C s& | j d � } | r" | j | � d S)NzNew Theme Name:)rw rx )r? � newThemeNamer@ r@ rA r� K s zConfigDialog.SaveAsNewThemec C s� | j j � r' d } | j j � } n d } | j j � } t j | | � } | | j d k r� | j d | } x | D] } | | | | <qy W| j | | � t j d d � } | j � | j
j | | � | j j d � | j
� d S)Nr9 r_ rB r )r� r0 r� r� r Z GetThemeDictrC � SaveNewThemerH rd r� re r� r� )r? r� Z themeTypert rz Z themeChangesr� ZcustomThemeListr@ r@ rA rx P s
zConfigDialog.CreateNewThemec C s6 | j j t � } | j j | j � � | j � d S)N)r~ r0 r= rt r� �lowerr� )r? r� rl r@ r@ rA r� h s z$ConfigDialog.OnListFontButtonReleaseNc C sr | j j � } | j j � r' t j n t j } | | j j � | f } | j j d | � | j j
d | � d S)Nrl ) rt r0 rs rw ZBOLDrO rq r� r� r� r5 )r? r� rt Z
fontWeightZnewFontr@ r@ rA r� m s
!zConfigDialog.SetFontSamplec C s� | j j � d k rN | j j d t � | j j d t � | j j d � n6 | j j d t � | j j d t � | j j d � | j � d S)Nr" r� rj )
r� r0 r� r� r� r� r� r� rO �SetColourSample)r? r@ r@ rA r: t s z ConfigDialog.SetHighlightTargetc G s | j � d S)N)r� )r? �argsr@ r@ rA r� s z#ConfigDialog.SetColourSampleBindingc C sa | j | j j � d } | j j � r/ d n d } | j j | | � } | j j d | � d S)Nr r{ r| ru )r7 r� r0 r� r� Ztag_cgetr� r� )r? �tagr r� r@ r@ rA r� � s z ConfigDialog.SetColourSamplec C s | j j � r! | j j � } n | j j � } x� | j D]� } | j | d } t j | | � } | d k r� t j | d d d �| d <| | j d k r� | j d | } | d | k r� | | d | d <| d
| k r� | | d
| d <| j j | | � q: W| j
� d S) Nr r# r ZfgBgru r| rB z -foregroundr{ z -background) r� r0 r� r� r7 r Z GetHighlightrC r� r~ r� )r? r� Z elementTitler� ZcoloursZ themeDictr@ r@ rA r8 � s" z ConfigDialog.PaintThemeSamplec C s | j � d S)N)�SetHelpListButtonStates)r? r� r@ r@ rA r � s z ConfigDialog.HelpSourceSelectedc C s� | j j � d k r> | j j d t � | j j d t � n^ | j j � rv | j j d t � | j j d t � n& | j j d t � | j j d t � d S)Nrj r� )r �sizer r� r� r rf rO )r? r@ r@ rA r� � s z$ConfigDialog.SetHelpListButtonStatesc C se t | d � j } | rW | j j | d | d f � | j j t | d � | j � | j � d S)NzNew Help Sourcer rj ) r rR � userHelpList�appendr r� r� �UpdateUserHelpChangedItemsr� )r? �
helpSourcer@ r@ rA r � s
z ConfigDialog.HelpListItemAddc C s� | j j t � } | j | } t | d d | d d | d �j } | sX | | k r\ d S| | j | <| j j | � | j j | | d � | j � | j � d S)NzEdit Help SourceZmenuItemr ZfilePathrj )
r rP r= r� r rR rW r� r� r� )r? � itemIndexr� Z
newHelpSourcer@ r@ rA r � s
z ConfigDialog.HelpListItemEditc C sD | j j t � } | j | =| j j | � | j � | j � d S)N)r rP r= r� rW r� r� )r? r� r@ r@ rA r � s
z ConfigDialog.HelpListItemRemovec C sv i | j d d <x^ t d t | j � d � D]@ } | j d d t | � d j | j | d d d � � � q. Wd S)z<Clear and rebuild the HelpFiles section in self.changedItemsr. � HelpFilesrj �;NrX )rC r �lenr� r1 rD rb )r? Znumr@ r@ rA r� � s
#z'ConfigDialog.UpdateUserHelpChangedItemsc C s. t t j | � � } | j � x! | D] } | j j t | � q& Wt j | d d � } | d j � } | d } | d d k } | j
j | � d d � | D� } yC | j | � } | j j
| � | j j | � | j j | � Wn t k
r� Yn X| j j d | � | j j | � | j � d S)Nr. r/ r rj rX Zboldc S s g | ] } | j � � q Sr@ )r� )r� �sr@ r@ rA r� � 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� rw Zfamiliesrd r~ r� r� r ZGetFontr� rt r� rP rg rT rU �
ValueErrorr� re rs r� ) r? Zfontsrl ZconfiguredFontrt rq rs Zlc_fontsZcurrentFontIndexr@ r@ rA � LoadFontCfg� s*
zConfigDialog.LoadFontCfgc C s5 t j d d d d d d d �} | j j | � d S)Nr. r3 z
num-spacesr9 r� �type�int)r r7 rv r� )r? rv r@ r@ rA �
LoadTabCfg� s zConfigDialog.LoadTabCfgc s� � j j t j d d d d d d d �� t j � } � j j � r� t j d d � } | j � � j j | | � t j d d � } | j � | s� � j
j d t � � j
j d
� q9� j j | | d � nb t j d d � } | j � � j j | | � t j d d � } | j � � j j | | d � � j � t � j j � � } | j d � f d
d � � � j j | | d � � j � � j � d S)Nr. r5 r9 r� �boolrj rB r_ r� z- no custom themes -r ri c s � j | d S)Nrj )r7 )�x)r? r@ rA r� s z+ConfigDialog.LoadThemeCfg.<locals>.<lambda>)r� r� r r7 Z CurrentThemer0 rH rd r� re r� r� r� r� r� r� r� r7 r; r� r8 r: )r? �
currentOptionrs Z
themeNamesr@ )r? rA � LoadThemeCfg� s2
zConfigDialog.LoadThemeCfgc C s` | j j t j d d d d d d d �� t j � } | j j � r� t j d d � } | j � | j j | | � t j d d � } | j � | s� | j
j d t � | j
j d
� q9| j j | | d � nb t j d d � } | j � | j j | | � t j d d � } | j � | j j | | d � | j � t j � } | j | � d S) Nr. rC r9 r� r� rj r; r_ r� z- no custom keys -r )r� r� r r7 Z CurrentKeysr0 rH rd r re r r� r� r� r r r@ )r? r� rs rh r@ r@ rA �
LoadKeyCfg s,
zConfigDialog.LoadKeyCfgc C s
| j j t j d d d d d d d �� | j j t j d d d d d d d �� | j j t j d d
d d d �� | j j t j d d
d
d d �� | j j t j d d
d d d �� t j � | _ x( | j D] } | j
j t | d � q� W| j
� d S)Nr. rD zeditor-on-startupr9 rj r� r� rA r r/ r0 r� r/ r Znone)r r� r r7 r r r r ZGetAllExtraHelpSourcesListr� r r� r� r� )r? ZhelpItemr@ r@ rA �LoadGeneralCfg2 s zConfigDialog.LoadGeneralCfgc C s6 | 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@ rA r= G s
zConfigDialog.LoadConfigsc C sc t j d j | � s* t j d j | � x2 | D]* } | | } t j d j | | | � q1 Wd S)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)r rm � has_section� add_section� SetOption)r? rh r? r� r� r@ r@ rA rc W s
zConfigDialog.SaveNewKeySetc C sc t j d j | � s* t j d j | � x2 | D]* } | | } t j d j | | | � q1 Wd S)z�
save a newly created theme.
themeName - string, the name of the new theme
theme - dictionary containing the new theme
rB N)r rm r� r� r� )r? rt r� r� r� r@ r@ rA r� c s
zConfigDialog.SaveNewThemec C si t j | j | | � rO t j | j | | � | k rO t j | j | | � St j | j | | | � S)N)r rI Z
has_optionrK rm � RemoveOptionr� )r? rL rF rG r� r@ r@ rA � SetUserValueo s zConfigDialog.SetUserValuec C s t j d j � x� | j D]� } d } x� | j | D]{ } | d k ra t j d j d � d } xL | j | | D]9 } | j | | | } | j | | | | � rs d } qs Wq5 W| r t j | j � q Wx% d d g D] } t j | j � q� W| j � | j � d S)z3Save configuration changes to the user config file.r. Fr� Tr; rB N)r rm ro rC rn r� r8 �save_all_changed_extensions)r? rL ZcfgTypeHasChangesrF rG r� r@ r@ rA rp w s"
z"ConfigDialog.SaveAllChangedConfigsc C s1 | j j j � } x | D] } | j � q Wd S)N)r3 r4 r; ZRemoveKeybindings)r? � winInstances�instancer@ r@ rA rl � s
z$ConfigDialog.DeactivateCurrentConfigc C sY | j j j � } x@ | D]8 } | j � | j � | j � | j � | j � q Wd S)z'Dynamically apply configuration changesN)r3 r4 r; ZResetColorizerZ ResetFontZset_notabs_indentwidthZApplyKeybindingsZreset_help_menu_entries)r? r� r� r@ r@ rA rq � s
z"ConfigDialog.ActivateConfigChangesc C s | j � d S)N)�destroy)r? r@ r@ rA r; � s zConfigDialog.Cancelc C s | j � | j � d S)N)rZ r� )r? r@ r@ rA rY � s
zConfigDialog.Okc C s" | j � | j � | j � d S)N)rl rp rq )r? r@ r@ rA rZ � s
zConfigDialog.Applyc C s6 | j j } t | d d d t t j | d � �d S)Nr6 zHelp for IDLE preferencesr\ r )r< Z
_current_pager � help_common�
help_pagesr0 )r? Zpager@ r@ rA r[ � s zConfigDialog.Helpc
C s | j } | j j d j } t j d | _ t j d | _ | j t
� | _
| j � t | � | _
| j d d d �| j d d d �t | d | j
d d �| _ | j j d
| j � t | d | j j �} | j | j _ t | d d
d d
�| _ | j j d d d d d d � | j d d d d d d � | j j d d d d d d d d d g � | j d d d d � i | _ d | _ | | _ | j | _ d } x6 t | j! � D]% } | j" | � | d | d } q�W| j
j | � | j j# d � | j d � d S) a Part 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.
rE r< r r� rj rX Z listvariableZ
selectmodeZbrowsez<<ListboxSelect>>r] r0 � r/ r� r� r� Znws�ns�nsewrT rd rV Nr �{z} )$r3 r< rx ry r rI �ext_defaultCfgrm � ext_userCfg�register�is_int�load_extensionsrp Zextension_namesr
r r} �extension_listr �extension_selectedr� r� r� rg rz �
details_framer r5 � config_frame�current_extensionZ
outerframeZtabbed_page_set�sortedr< �create_extension_frameZ
selection_set)r? r3 ry ZscrollZ ext_names�ext_namer@ r@ rA rQ � s<
+
z!ConfigDialog.CreatePageExtensionsc
# C s� i | _ x' t j d d � D] } g | j | <q Wx�| j D]�} t | j j | � � } d d � | D� } x | D] } | j | � qu W| | } x,| D]$} | j j | | d d �} y d d d d i | } d } WnI t k
r)y t | � } d
} Wn t
k
r$| } d } Yn XYn Xy+ | j j | | d | d d d
| �} Wn t
k
ro| } Yn Xt | � } | j
t | � � | j | j d | d | d
| d | d | i � q� Wq= Wd S)zAFill self.extensions with data from the default and user configs.Z active_onlyFc S s% g | ] } | j d � r | � q S)�enable)�
startswith)r� �opt_namer@ r@ rA r� � s z0ConfigDialog.load_extensions.<locals>.<listcomp>�rawT�True�Falser� r� Nr� r9 r6 r� r, )r< r Z
GetExtensionsr� r� rJ �removerK �KeyErrorr� r� r� rp r� rD r� )
r? r� Zopt_listZenablesr� Zdef_strZdef_objZopt_typer� r, r@ r@ rA r� � sF
z ConfigDialog.load_extensionsc C s� | j j � } | r' | j j | � } | d k sB | | j k r{ | j r{ | j j d d � | j | j j � d | _ | r� | j j d | � | j | j d d d d d d � | | _ d S)Nr\ r r� r r� r� r� ) r� rf r0 r� r� r� r� Z grid_forgetr )r? r� Znewselr@ r@ rA r� s #z ConfigDialog.extension_selectedc C s~ t | j d d d d �} | | j | <| j } xFt | j | � D]1\ } } t | d | d �} | j d | d d d t � | d
} | d d k r� t | d
| d | d d d d d t
d d d d �j d | d d d t d d � qE | d d k rHt | d
| d d d | j
d f �j d | d d d t d d � qE t | d
| �j d | d d d t d d � qE Wd S) z=Create a frame holding the widgets to configure one extensionr/ r� r0 r\ r6 r� r� r r� r, r� r� r
rh ri r� rk r� Z indicatoronZ selectcolorr r� rj rT � r� Zvalidateri Zvalidatecommandz%PN)�VerticalScrolledFramer� r� �interior� enumerater< r| r �NWr� r: r� r r� r )r? r� �fZ
entry_arear� �optZlabelr, r@ r@ rA r� s&
z#ConfigDialog.create_extension_framec C sv | d } | d } | d j � j � p- | } | d j | � | | k r` | j j | | � S| j j | | | � S)Nr6 r9 r, )r0 �stripr� r� r� r� )r? rF r� r6 r9 r� r@ r@ rA �set_extension_value9 s
z ConfigDialog.set_extension_valuec C sg d } xG | j D]< } | j | } x& | D] } | j | | � r* d } q* Wq W| rc | j j � d S)z3Save configuration changes to the user config file.FTN)r< r� r� ro )r? Z has_changesr� rM r� r@ r@ rA r� E s
z(ConfigDialog.save_all_changed_extensions)P�__name__�
__module__� __qualname__r2 r9 rR rM rN rO rP r> r- r r r r r r! r" r# r$ r% r& r' r( r) r* r+ r8 r1 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; rY rZ r[ rQ r� r� r� r� r� r@ r@ r@ rA r s� 5 D o M ` $
!
5 - r ah 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.
rB z�
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 C s9 | s
d Sy t | � d SWn t k
r4 d SYn Xd S)z(Return 's is blank or represents an int'TFN)r� r� )r� r@ r@ rA r� c s
r� c @ s" e Z d Z d Z d d � Z d S)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 t j | | | | � t | d t �} | j d t d t d t � t | d d d d d | j d d
�� � j d t
d t d t � | j
d � j � � j d � � j d � t � � | _ � � j d d d � d
t �� � � f d d � } � j d | � � � � f d d � } � j d | � d S)Nrm rH rF rG r� r r� rg r0 �� r] Zwindowro c s0 � j � � j � f } � j d d | � d S)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 � k r1 � j � d � j � �d S)Nr0 )r� Z winfo_widthZ
itemconfigure)r� )r� r� � interior_idr@ rA �_configure_canvas� s z9VerticalScrolledFrame.__init__.<locals>._configure_canvas)r_ r2 r� ZVERTICALrI r� r� r: ZCanvasr� ra rL rK r� r� Z xview_movetoZ yview_movetor� Z
create_windowr� r )r? r3 r� �kwZ
vscrollbarr� r� r@ )r� r� r� rA r2 u s
z VerticalScrolledFrame.__init__N)r� r� r� �__doc__r2 r@ r@ r@ rA r� n s r� �__main__z#idlelib.idle_test.test_configdialog� verbosityrX �exitF)�run)'r� ZtkinterZtkinter.messageboxZ
messageboxrj Ztkinter.colorchooserZ colorchooserrv Z tkinter.fontrl rw Zidlelib.configHandlerr Zidlelib.dynOptionMenuWidgetr Zidlelib.keybindingDialogr Z idlelib.configSectionNameDialogr Z idlelib.configHelpSourceEditr Zidlelib.tabbedpagesr Zidlelib.textViewr Zidlelibr
r1 r r� r� r� r_ r� r� Zunittestr. Zidlelib.idle_test.htestr� r@ r@ r@ rA �<module> s:
� � � � � C +