ट्यूनिंग mooedit

मैं अपने काम में ईपीआईसी का उपयोग करता हूं और हाल ही में कोमोडो आईडीई की कोशिश करना शुरू किया। लेकिन मेरे सिस्टम पर एक हल्के "रोज़" संपादक के रूप में, मैंने mededit स्थापित किया है। इसमें सब कुछ सही नहीं है, लेकिन कुछ चीजों को घुमाया जा सकता है, जिस पर चर्चा की जाएगी।

सबसे पहले, रंग योजना का चयन करें। वे सभी Gtk-shnyh से लिए गए हैं, इसलिए यहां जाएं और चुनें। किसी कारण से मैं सफेद पृष्ठभूमि को पचा नहीं पाया, मैं नीले रंग पर रुक गया। और हम इसे स्वाद के लिए खत्म कर रहे हैं, कुछ औसत प्राप्त कर रहे हैं एक ला मिडनाइट कमांडर, एफएआर-ओव्स्की कलरर और, ईमानदारी से, बोरलैंड के समय से टर्बो विजन। तुरंत हड़ताली कोष्ठक के लिए एक अलग रंग की कमी है। हम इसे परिभाषित करने के कारण ठीक करते हैं : perl.lang में विशेष-स्थिरांक (अन्य भाषाओं के लिए, संभवतः, इसी तरह, डीफ़ के उपयोग को ध्यान में रखते हुए : विशेष-स्थिर )। फ़ाइल को ~ / .local / share / medit-1 / language-specs / में जोड़ें और जोड़ें:

<styles> <!-- ... --> <style id="special-constant" _name="Brackets" map-to="def:special-constant"/> 

 <definitions> <context id="perl" class="no-spell-check"> <include> <!-- ... --> <context ref="special-constant"/> 

 <define-regex id="special-constant" extended="true"> \( | \) | \[ | \] | \{ | \} </define-regex> <context id="special-constant" style-ref="special-constant"> <match>\%{special-constant}</match> </context> 

तदनुसार, फ़ाइल में ~ / .लोकल / शेयर / ध्यान -१ / भाषा-चश्मा / हमारी-शैली। xml :

 <style name="perl:special-constant" foreground="#66FFFF"/> 

परिणाम:



अब सिंटैक्स चेक जोड़ें:



कुछ गलत है ... त्रुटियों के साथ पर्याप्त लाइन कूद नहीं है।



इसके लिए आउटपुट में लाइनें फ़ाइल_नाम: लाइन_नंबर [: पोजिशन] की होनी चाहिए। स्थिति हमारे लिए उपलब्ध नहीं है, लेकिन लाइन नंबर के साथ प्रश्न हल किया जा सकता है। हमने निम्नलिखित कोड के साथ ~ / बिन / एक स्क्रिप्ट में रखा है:

 #!/usr/bin/perl use strict; die "Usage: $0 file\n" unless $ARGV[0]; my $out = `/usr/bin/perl -c $ARGV[0] 2>&1`; $out =~ s|^(.*) at (($ARGV[0]) line (\d+))(.*)$|$3:$4 $1$5|gm; print $out; 

हम इसे पर्ल-सी के बजाय उपयोगिता के रूप में लिखते हैं। अब त्रुटि के साथ लाइन पर क्लिक करने से हम संपादक विंडो में सही स्थान पर स्थानांतरित हो जाएंगे।



अगला चरण है, perltidy का उपयोग करके स्रोत स्वरूपण को कॉन्फ़िगर करना । यह इतना आसान नहीं है। तथ्य यह है कि अगर सिंटैक्स त्रुटियां हैं, तो संपादक विंडो में स्रोत बस ओवरराइट हो जाएगा। इससे बचने के लिए, पहले परीक्षण चलाएं, और फिर इसे प्रारूपित करें। हम लुआ में एक स्क्रिप्ट का उपयोग करते हैं, क्योंकि यह आपको संपादक विंडो में बिना शर्त परिणाम प्रदर्शित करने की अनुमति देता है, लेकिन केवल जब आवश्यक हो:

 filename = doc.get_filename() codefile = os.tmpname() rc = os.execute(string.format("/usr/bin/perl -c \"%s\" > \"%s\" 2>&1",filename,codefile)) if rc == 0 then tidyfile = os.tmpname() os.execute(string.format("/usr/bin/perltidy -nsak=\"if elsif unless for while\" -pt=0 -i=4 -bl -vt=2 -vtc=2 -boc -st \"%s\" > \"%s\"",filename,tidyfile)) out = io.open(tidyfile,"r") doc.select_all() doc.replace_selected_text(out:read("*a")) doc.save() os.remove(tidyfile) else out = io.open(codefile,"r") moo.error_dialog(string.format("Run syntax check!\n\n%s",out:read("*a"))) end os.remove(codefile) 

इस पद्धति की एक खामी है: हमें आउटपुट विंडो नहीं मिल सकती है, इसलिए सिंटैक्स त्रुटियों के मामले में हमें एक डायलॉग दिखाना होगा। लुआ के बजाय एक समान पायथन लिपि का उपयोग करने से बहुत मदद नहीं मिलती है: इससे हम आउटपुट के लिए एक वस्तु प्राप्त कर सकते हैं, लेकिन केवल अगर यह पहले से मौजूद है, तो एक नया बनाने से काम नहीं चलेगा। Mededit के लेखक को पहले ही इस बारे में सूचित किया जा चुका है, उन्होंने सोचने का वादा किया :)

खैर, हम इन सभी उपयोगिताओं को अलग-अलग बटन पर लटकाते हैं:





उसी तरह, आप संपादक के अधिसूचना क्षेत्र में आउटपुट के साथ एक स्क्रिप्ट लॉन्च जोड़ सकते हैं (यहां सब कुछ तुच्छ है), एक बाहरी डिबगर (लेकिन ये अलग आँसू हैं, एक अलग वार्तालाप), और कुछ और।