관리-도구
편집 파일: configDialog.cpython-34.pyc
� e f1� � @ sZ 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 i d d 6Z d d � Z Gd d � d e � Z! e" d k rVd d l# Z# e# j$ d d d d d �d d l% m& Z& e& e � n 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 d[ � Z. 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 dY S)�� ConfigDialog� Fc C s� t j | | � | | _ | r+ i | _ n | j � | j d d � | j | pT d � | j d | j � d | j � | s� d n d f � i d6 d 6d7 d 6d8 d 6d9 d 6d: d 6d; d 6d< d 6d= d 6d> d" 6d? d% 6d@ d( 6dA d+ 6dB d. 6dC d1 6| _ | j � | j � | j d2 t d3 t � | j | � | j � | j d4 | j � | j j � | j � | j � | s�| j � | j � n 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� � � �normal�00z Normal Text�keyword�01zPython Keywords� definition�02zPython Definitions�builtin�03zPython Builtins�comment�04zPython Comments�string�05zPython Strings�hilite�06z Selected Text�hit�07z Found Text�cursor�08�Cursor�break�09zEditor Breakpoint�console�10zShell Normal Text�error�11zShell Error Text�stdout�12zShell Stdout Text�stderr�13zShell Stderr Text�height�widthZWM_DELETE_WINDOWN)r r )zkeywordr )r r )r r )r r )zstringr )r r )r r! )zcursorr# )zbreakr& )r' r( )zerrorr* )zstdoutr, )zstderrr. )�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/python34/lib64/python3.4/idlelib/configDialog.pyr2 sJ ! 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 i d d 6d d 6} 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 rU rW rG rH �anchorr )rc rd znormal)+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 rU r rW rG rH � � rV ro )zcourierr� r �r� �comment�r� �normal�r� r� �r� r� �zdef�keyword�r� r� �zfuncz definition�r� r� �r� �string�r� r� �r� r� �r� r� �r� zhilite�r� r� �r� zhit�r� r� �zlistzbuiltin�r� r� �zNoner� �r� r� �r� zbreak�r� r� �r� zerror�r� r� �r� r" �r� r� �zshellzconsole�r� r� ��stdoutr� �r� r� ��stderrr� �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)rU rX rW 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 rU r rW 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 rV ZHeightr/ r r^ rf rg z<ButtonRelease-1>ZEditr� r� ZAddZRemoverF rU rW 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 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)Nr2 �Indentz num-spaces)rv r4 r5 )r? r6 r� r@ r@ rA r# � s z ConfigDialog.VarChanged_spaceNumc G s | j � d S)N)�OnNewColourSet)r? r6 r@ r@ rA r$ � s z ConfigDialog.VarChanged_colourc G s� | j j � } | d k r� t j d d d � d k rO | j d d d d � n | 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 Darkr2 �Theme�namezIDLE Newz IDLE ClassicZname2r\ zNew theme, see HelpZfgz#500000r Zblack)r� r4 r � GetOptionr5 r� r� �PaintThemeSample)r? r6 r� r@ r@ rA r% � s z$ConfigDialog.VarChanged_builtinThemec G sB | j j � } | d k r> | j d d d | � | j � n d S)Nz- no custom themes -r2 r9 r: )r� r4 r5 r< )r? r6 r� r@ r@ rA r& s z#ConfigDialog.VarChanged_customThemec G sF | j j � } | j d d d | � | r8 | j � n | j � d S)Nr2 r9 �default)r� r4 r5 r% r& )r? r6 r� r@ r@ rA r' s z&ConfigDialog.VarChanged_themeIsBuiltinc G s | j � d S)N)�SetHighlightTarget)r? r6 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 r4 r r �ANCHOR�splitr Z IsCoreBindingr5 ZGetExtnNameForEvent)r? r6 r� �keySetr� ZextNameZextKeybindSectionr@ r@ rA r) s z"ConfigDialog.VarChanged_keyBindingc G s6 | j j � } | j d d d | � | j | � d S)Nr2 rC r: )r� r4 r5 � LoadKeysList)r? r6 r� r@ r@ rA r* $ s z#ConfigDialog.VarChanged_builtinKeysc G sE | j j � } | d k rA | j d d d | � | j | � n d S)Nz- no custom keys -r2 rC r: )r r4 r5 rD )r? r6 r� r@ r@ rA r+ ) s z"ConfigDialog.VarChanged_customKeysc G sF | j j � } | j d d d | � | r8 | j � n | j � d S)Nr2 rC r= )r r4 r5 r* r+ )r? r6 r� r@ r@ rA r, / s z&ConfigDialog.VarChanged_keysAreBuiltinc G s) | j j � } | j d d d | � d S)Nr2 r3 r0 )r r4 r5 )r? r6 r� r@ r@ rA r- 7 s z ConfigDialog.VarChanged_winWidthc G s) | j j � } | j d d d | � d S)Nr2 r3 r/ )r r4 r5 )r? r6 r� r@ r@ rA r. ; s z!ConfigDialog.VarChanged_winHeightc G s) | j j � } | j d d d | � d S)Nr2 rD zeditor-on-startup)r r4 r5 )r? r6 r� r@ r@ rA r/ ? s z#ConfigDialog.VarChanged_startupEditc G s) | j j � } | j d d d | � d S)Nr2 rD �autosave)r r4 r5 )r? r6 r� r@ r@ rA r0 C s z ConfigDialog.VarChanged_autoSavec G s) | j j � } | j d d d | � d S)Nr2 r3 r )r r4 r5 )r? r6 r� r@ r@ rA r1 G s z ConfigDialog.VarChanged_encodingc C s) i i d 6i d 6i d 6i d 6| _ d S)Nr2 � highlightr? r@ )� changedItems)r? r@ r@ rA r8 K s z ConfigDialog.ResetChangedItemsc C sL t | � } | | j | k r3 i | j | | <n | | j | | | <d S)N)�strrG )r? �typ�section�itemr� r@ r@ rA r5 T s zConfigDialog.AddChangedItemc C s� i i d 6i d 6i d 6i d 6} x� | D]� } t j d | � } xh | D]` } i | | | <t j | j | � } x3 | D]+ } t j | j | | � | | | | <qy WqH Wq) W| S)Nr2 rF r? r@ r= )r �GetSectionList� defaultCfg� GetOptionList�Get)r? ZdItems� configTypeZsectionsrJ �optionsZoptionr@ r@ rA �GetDefaultItemsZ 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� r4 r� r� �NORMALr� r� r� r� )r? r@ r@ rA r� f 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 r4 r r� rS r r� r r )r? r@ r@ rA r q 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� Wn t | j � � } t | d | | � j } | r�| j j � rJd } | j | � } | s:| j j | � | j j | � d S| j | � n | 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 �indexrA r4 rB r r� r r ZGetCurrentKeySetrG 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? r= zNew Custom Key Set)r rL r rV )r? ra � usedNamesrb r@ r@ rA rW � s zConfigDialog.GetNewKeysNamec C s) | j d � } | r% | j | � n d S)NzNew Key Set Name:)rW rZ )r? Z newKeysNamer@ r@ rA r � s z ConfigDialog.SaveAsNewKeySetc C s | j j d t � d S)Nr� )r r� rS )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� Wn | j | | � t j d d � } | j � | j j | | � | j j d � | j � d S)NrX r� r? rc r ���)r r4 r� r r Z GetCoreKeys�joinrG � SaveNewKeySetrL �sortr �SetMenur� r ) r? Z newKeySetNameZprevKeySetNameZprevKeysr` r� Z eventNamer] r_ Z customKeyListr@ r@ rA rZ � s& z ConfigDialog.CreateNewKeySetc C sE d } d } | j j � r6 d } | j j t � } n 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 | | } q� n | j j t | d | � q{ W| rA| j j | � | j j | � | j j | � n d S)Nr rj r� rX r? z - re )r � curselectionrT rA r Z GetKeySetr� r? rh r[ r� rf rG r� �seerX rY ) r? � keySetNameZreselectrb r\ rC Z bindNamesr^ �keyr@ r@ rA rD � s( zConfigDialog.LoadKeysListc C s> | j j � } d } t j d | | d | �s5 d St j d j | � | | j d k rm | j d | =n 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 � d S) Nz0Are you sure you wish to delete the key set %r ?zDelete Key Setr3 r? rc r� z- no custom keys -r r2 rC r= r: )r r4 � tkMessageBox�askyesnor �userCfg�remove_sectionrG �SaverL rh r r� r� r ri r r� rM rO r� rZ r )r? rl �delmsg�itemListr@ r@ rA r � s& ## z ConfigDialog.DeleteCustomKeysc C s> | j j � } d } t j d | | d | �s5 d St j d j | � | | j d k rm | j d | =n 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 � d S) Nz.Are you sure you wish to delete the theme %r ?z Delete Themer3 rF rc r� z- no custom themes -r r2 r9 r= r: )r� r4 rn ro r rp rq rG rr rL rh r� r� r� r� ri r� r� rM rO r� rZ r� )r? � themeNamers rt 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 | � q� | j j | � n 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� r4 r� Zcget�tkColorChooserZaskcolorr� �GetNewThemeName�CreateNewThemer� r� )r? �targetZ prevColourZ rgbTupletZ colourStringra �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 | | 6� | j j � } | d | } | j d | | | � d S)Nrv � foreground� backgroundr �-rF ) r� r4 r� r� r� r7 r� r� � tag_configr� r5 )r? Z newColour�planeZ sampleElement�themeZ themeElementr@ r@ rA r8 + s zConfigDialog.OnNewColourSetc C s> t j d d � t j d d � } t | d | | � j } | S)Nrc rF r= zNew Custom Theme)r rL r rV )r? ra rd r{ r@ r@ rA rx 5 s z ConfigDialog.GetNewThemeNamec C s) | j d � } | r% | j | � n d S)NzNew Theme Name:)rx ry )r? � newThemeNamer@ r@ rA r� < 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 Wn | j | | � t j d d � } | j � | j j | | � | j j d � | j � d S)Nr= rc rF r )r� r4 r� r� r Z GetThemeDictrG � SaveNewThemerL rh r� ri r� r� )r? r� Z themeTyperu r{ Z themeChangesr� ZcustomThemeListr@ r@ rA ry A s zConfigDialog.CreateNewThemec C s6 | j j t � } | j j | j � � | j � d S)N)r~ r4 rA rt r� �lowerr� )r? r� rl r@ r@ rA r� Y 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 r4 rs rw ZBOLDrS rq r� r� r� r5 )r? r� rt Z fontWeightZnewFontr@ r@ rA r� ^ 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� r4 r� r� r� r� r� r� rS �SetColourSample)r? r@ r@ rA r> e s z ConfigDialog.SetHighlightTargetc G s | j � d S)N)r� )r? �argsr@ r@ rA r� p 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} rv )r7 r� r4 r� r� Ztag_cgetr� r� )r? �tagr� r� r@ r@ rA r� s 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 <n | | j d k r� | j d | } | d | k r� | | d | d <n | d | k r� | | d | d <q� n | j j | | � q: W| j � d S) Nr r" r ZfgBgrv r} rF z -foregroundr| z -background) r� r4 r� r� r7 r Z GetHighlightrG r� r r� )r? r� Z elementTitler� ZcoloursZ themeDictr@ r@ rA r< z 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 rj rS )r? r@ r@ rA r� � s z$ConfigDialog.SetHelpListButtonStatesc C sh t | d � j } | rZ | j j | d | d f � | j j t | d � | j � n | j � d S)NzNew Help Sourcer rj ) r rV � 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 rT rA r� r rV r[ 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 rT rA r� r[ 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.changedItemsr2 � HelpFilesrj �;NrX )rG r �lenr� r5 rH rf )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)Nr2 r3 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� z10z11z12z13r� r� r� r� r� )r� rw Zfamiliesrh r~ r� r� r ZGetFontr� rt r� rT rk rX rY � ValueErrorr� ri 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)Nr2 r7 z num-spacesr= r� �type�int)r r; 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)Nr2 r9 r= r� �boolrj rF rc r� z- no custom themes -r rm c s � j | d S)Nrj )r7 )�x)r? r@ rA r� s z+ConfigDialog.LoadThemeCfg.<locals>.<lambda>)r� r� r r; Z CurrentThemer4 rL rh r� ri r� r� r� r� r� r� r� r7 r? r� r< r> )r? � currentOptionrt 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) Nr2 rC r= r� r� rj r? rc r� z- no custom keys -r )r r� r r; Z CurrentKeysr4 rL rh r ri r r� r� r r r rD )r? r� rt rl 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)Nr2 rD zeditor-on-startupr= rj r� r� rE r r3 r0 r� r/ r Znone)r r� r r; r r r r ZGetAllExtraHelpSourcesListr� r r� r� r� )r? ZhelpItemr@ r@ rA �LoadGeneralCfg# 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= 8 s zConfigDialog.LoadConfigsc C sf t j d j | � s- t j d j | � n x2 | D]* } | | } t j d j | | | � q4 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 rp � has_section� add_section� SetOption)r? rl rC r� r� r@ r@ rA rg H s zConfigDialog.SaveNewKeySetc C sf t j d j | � s- t j d j | � n x2 | D]* } | | } t j d j | | | � q4 Wd S)z� save a newly created theme. themeName - string, the name of the new theme theme - dictionary containing the new theme rF N)r rp r� r� r� )r? ru r� r� r� r@ r@ rA r� T s zConfigDialog.SaveNewThemec C sl t j | j | | � rR t j | j | | � | k rR t j | j | | � Sn t j | j | | | � S)N)r rM Z has_optionrO rp � RemoveOptionr� )r? rP rJ rK r� r@ r@ rA � SetUserValue` s zConfigDialog.SetUserValuec C s t j d j � x� | j D]� } d } x� | j | D]� } | d k rd t j d j d � d } n xO | j | | D]< } | j | | | } | j | | | | � rv d } qv qv Wq5 W| r t j | j � q q Wx% d d g D] } t j | j � q� W| j � | j � d S)z3Save configuration changes to the user config file.r2 Fr� Tr? rF N)r rp rr rG rq r� r8 �save_all_changed_extensions)r? rP ZcfgTypeHasChangesrJ rK r� r@ r@ rA �SaveAllChangedConfigsh 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 �DeactivateCurrentConfig~ 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 �ActivateConfigChanges� 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)r� r� r� )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_pagesr4 )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 an True/False button. rE r@ r r� rj rX Z listvariableZ selectmodeZbrowsez<<ListboxSelect>>r] r0 � r/ r� r� r� Znws�ns�nsewrU rd rW Nr �{z} )$r3 r< rx ry r rM �ext_defaultCfgrp � 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| | } x3| D]+} | j j | | d d �} y" i d d 6d d 6| } 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 rq| } Yn Xt | � } | j t | � � | j | j i | d 6| d 6| d 6| d 6| d 6� 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� r= r: r� �var)r@ r Z GetExtensionsr� r� rN �removerO �KeyErrorr� r� r� rp r� rH 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 | � } n | d k sE | | j k r� | j r� | j j d d � | j | j j � d | _ q� n | r� | j j d | � | j | j d d d d d d � | | _ n d S)Nr\ r r� r r� r� r� ) r� rj r4 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\ r: r� r� r r� r� r� r� r rh ri r� rk r� Z indicatoronZ selectcolorr r� rj rU � r� Zvalidaterm 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)Nr: r= r� )r4 �stripr� r� r� r� )r? rJ r� r: r= r� r@ r@ rA �set_extension_value* s z ConfigDialog.set_extension_valuec C sm d } xJ | j D]? } | j | } x) | D]! } | j | | � r* d } q* q* Wq W| ri | j j � n d S)z3Save configuration changes to the user config file.FTN)r@ r� r� rr )r? Z has_changesr� rQ r� r@ r@ rA r� 6 s z(ConfigDialog.save_all_changed_extensions)O�__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/ r0 r1 r8 r5 rR r� r r rW r r rZ rD r r� r� r8 rx r� ry r� r� r> r� r� r< r r� r r r r� r� r� r� r� r� r= rg r� r� r� r� r� 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. 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. rB 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� T 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 s8 � j � � j � k r4 � j � d � j � �n 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 f s z VerticalScrolledFrame.__init__N)r� r� r� �__doc__r2 r@ r@ r@ rA r� _ s r� �__main__z#idlelib.idle_test.test_configdialog� verbosityrX �exitF)�run)'r� ZtkinterZtkinter.messageboxZ messageboxrn Ztkinter.colorchooserZ colorchooserrw 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� Zunittestr2 Zidlelib.idle_test.htestr� r@ r@ r@ rA �<module> s: � � � � � 4 +