<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<html>
<meta http-equiv="Content-Type" content="text/html;charset=UTF-8">
<head>
<script type="text/javascript" language="JavaScript"><!--
function block_expand(b, e) {
var marker_e = b.concat('e');
var marker_f = b.concat('f');
document.getElementById(marker_e).style.display="none";
document.getElementById(marker_f).style.display="inline";
for (i = Number(b) + 1; i <= Number(e); ++i) {
document.getElementById(i).style.display="inline";
var im_e = i.toString().concat('e');
var im_f = i.toString().concat('f');
if (document.getElementById(im_f) !== null) {
document.getElementById(im_e).style.display="none";
document.getElementById(im_f).style.display="inline";
}
}
}
function block_fold(b, e) {
var marker_e = b.concat('e');
var marker_f = b.concat('f');
document.getElementById(marker_e).style.display="inline";
document.getElementById(marker_f).style.display="none";
for (i = Number(b) + 1; i <= Number(e); ++i) {
document.getElementById(i).style.display="none";
}
}
//--></script>
<style>.content {
padding: 20px;
height: 100%;
width: 944px;
margin-left: auto;
margin-right: auto;
}
.fold {
width: 20px;
float: left;
-webkit-touch-callout: none;
-webkit-user-select: none;
-khtml-user-select: none;
-moz-user-select: none;
-ms-user-select: none;
user-select: none;
}
.number {
width: 45px;
float: left;
margin-right: 10px;
text-align: right;
-webkit-touch-callout: none;
-webkit-user-select: none;
-khtml-user-select: none;
-moz-user-select: none;
-ms-user-select: none;
user-select: none;
}
.line {
}
.content {
font-family: "Monospace";
font-size: 1em;
background: #3f3f3f;
color: White;
width: 944px;
padding: 20px;
height: 100%;
margin-left: auto;
margin-right: auto;
}
font.Alert {
color: Yellow;
font-weight: bold;
}
font.Annotation {
color: Yellow;
font-style: italic;
}
font.Attribute {
color: LightPink;
}
font.BaseN {
color: Gold;
}
font.BuiltIn {
color: Coral;
}
font.Char {
color: Cyan;
}
font.Comment {
color: Beige;
font-style: italic;
}
font.CommentVar {
color: LightBlue;
font-style: italic;
}
font.Constant {
color: White;
font-weight: bold;
}
font.ControlFlow {
color: DeepPink;
}
font.DataType {
color: CadetBlue;
}
font.DecVal {
color: MediumPurple;
font-weight: bold;
}
font.Documentation {
color: Gold;
font-style: italic;
}
font.Error {
color: Red;
font-weight: bold;
}
font.Extension {
color: DarkGray;
font-weight: bold;
}
font.Float {
color: DarkViolet;
font-weight: bold;
}
font.Function {
color: RosyBrown;
}
font.Import {
color: PaleVioletRed;
}
font.Information {
color: LightGreen;
font-style: italic;
}
font.Keyword {
color: LightGreen;
font-weight: bold;
}
font.Normal {
color: White;
}
font.Operator {
color: Magenta;
}
font.Others {
color: GreenYellow;
}
font.Preprocessor {
color: DarkSeaGreen ;
font-weight: bold;
}
font.RegionMarker {
color: Plum;
}
font.SpecialChar {
color: Plum;
font-weight: bold;
}
font.SpecialString {
color: LightBlue;
}
font.String {
color: MediumAquaMarine;
}
font.Variable {
color: Turquoise;
font-weight: bold;
}
font.VerbatimString {
color: LightSkyBlue;
}
font.Warning {
color: Brown;
font-weight: bold;
}
</style>
<title>Fold markers</title>
</head>
<body>
<div class="content">
<div id="1" class="line"><div class="fold"> </div>
<font class="Keyword">package</font><font class="Normal"> </font><font class="Function">Syntax::Kamelon</font><font class="Normal">::</font><font class="Function">Wx</font><font class="Normal">::</font><font class="Function">PluggableTextCtrl</font><font class="Normal">;</font></br></div>
<div id="2" class="line"><div class="fold"> </div>
</br></div>
<div id="3" class="line"><div class="fold"> </div>
<font class="Function">use</font><font class="Normal"> </font><font class="Keyword">strict</font><font class="Normal">;</font></br></div>
<div id="4" class="line"><div class="fold"> </div>
<font class="Function">use</font><font class="Normal"> </font><font class="Keyword">warnings</font><font class="Normal">;</font></br></div>
<div id="5" class="line"><div class="fold"> </div>
<font class="Function">use</font><font class="Normal"> Carp;</font></br></div>
<div id="6" class="line"><div class="fold"> </div>
</br></div>
<div id="7" class="line"><div class="fold"> </div>
<font class="Function">use</font><font class="Normal"> </font><font class="Keyword">vars</font><font class="Normal"> </font><font class="Operator">qw(</font><font class="Normal">$VERSION</font><font class="Operator">)</font><font class="Normal">;</font></br></div>
<div id="8" class="line"><div class="fold"> </div>
<font class="DataType">$VERSION</font><font class="Normal">=</font><font class="Operator">"</font><font class="SpecialString">0.01</font><font class="Operator">"</font><font class="Normal">;</font></br></div>
<div id="9" class="line"><div class="fold"> </div>
</br></div>
<div id="10" class="line"><div class="fold"> </div>
<font class="Function">use</font><font class="Normal"> Wx </font><font class="Operator">qw(</font><font class="Normal"> :textctrl :font :colour </font><font class="Operator">)</font><font class="Normal">;</font></br></div>
<div id="11" class="line"><div class="fold"> </div>
<font class="Function">use</font><font class="Normal"> </font><font class="Function">Wx::DND</font><font class="Normal">;</font></br></div>
<div id="12" class="line"><div class="fold"> </div>
<font class="Function">use</font><font class="Normal"> Wx </font><font class="Operator">qw(</font><font class="Normal"> wxTheClipboard </font><font class="Operator">)</font><font class="Normal">;</font></br></div>
<div id="13" class="line"><div class="fold"> </div>
<font class="Function">use</font><font class="Normal"> base </font><font class="Operator">qw(</font><font class="Normal"> Wx::TextCtrl </font><font class="Operator">)</font><font class="Normal">;</font></br></div>
<div id="14" class="line"><div class="fold"> </div>
<font class="Function">use</font><font class="Normal"> </font><font class="Function">Wx::Event</font><font class="Normal"> </font><font class="Operator">qw(</font><font class="Normal"> EVT_CHAR </font><font class="Operator">)</font><font class="Normal">;</font></br></div>
<div id="15" class="line"><div class="fold"> </div>
</br></div>
<div id="16" class="line"><div class="fold"> </div>
<font class="Function">require</font><font class="Normal"> </font><font class="Function">Syntax::Kamelon</font><font class="Normal">::</font><font class="Function">Wx</font><font class="Normal">::</font><font class="Function">PluggableTextCtrl</font><font class="Normal">::</font><font class="Function">KeyEchoes</font><font class="Normal">;</font></br></div>
<div id="17" class="line"><div class="fold"> </div>
<font class="Function">require</font><font class="Normal"> </font><font class="Function">Syntax::Kamelon</font><font class="Normal">::</font><font class="Function">Wx</font><font class="Normal">::</font><font class="Function">PluggableTextCtrl</font><font class="Normal">::</font><font class="Function">UndoRedo</font><font class="Normal">;</font></br></div>
<div id="18" class="line"><div class="fold"> </div>
<font class="Function">require</font><font class="Normal"> </font><font class="Function">Syntax::Kamelon</font><font class="Normal">::</font><font class="Function">Wx</font><font class="Normal">::</font><font class="Function">PluggableTextCtrl</font><font class="Normal">::</font><font class="Function">Highlighter</font><font class="Normal">;</font></br></div>
<div id="19" class="line"><div class="fold"> </div>
</br></div>
<div id="20" class="line"><div class="fold"> </div>
<font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$defaultfont</font><font class="Normal"> = [</font><font class="DecVal">10</font><font class="Normal">, wxFONTFAMILY_MODERN, wxFONTSTYLE_NORMAL, wxFONTWEIGHT_NORMAL, </font><font class="DecVal">0</font><font class="Normal">];</font></br></div>
<div id="21" class="line"><div class="fold"> </div>
</br></div>
<div id="22" class="line"><div class="fold"> </div>
<font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$debug</font><font class="Normal"> = </font><font class="DecVal">0</font><font class="Normal">;</font></br></div>
<div id="23" class="line"><div class="fold"> </div>
</br></div>
<div id="24" class="line"><div id="24f" class="fold" onclick="block_fold('24', '26')">-</div><div id="24e" class="fold" onclick="block_expand('24', '26')" style="display:none;">+</div>
<font class="Keyword">if</font><font class="Normal"> (</font><font class="DataType">$debug</font><font class="Normal">) {</font></br></div>
<div id="25" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Function">use</font><font class="Normal"> </font><font class="Function">Data::Dumper</font><font class="Normal">;</font></br></div>
<div id="26" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="27" class="line"><div class="fold"> </div>
</br></div>
<div id="28" class="line"><div id="28f" class="fold" onclick="block_fold('28', '47')">-</div><div id="28e" class="fold" onclick="block_expand('28', '47')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">new</font><font class="Normal"> {</font></br></div>
<div id="29" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$class</font><font class="Normal"> = </font><font class="Function">shift</font><font class="Normal">;</font></br></div>
<div id="30" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal"> = </font><font class="DataType">$class</font><font class="Normal">-></font><font class="DataType">SUPER</font><font class="Normal">::</font><font class="DataType">new</font><font class="Normal">(</font><font class="DataType">@_</font><font class="Normal">);</font></br></div>
<div id="31" class="line"><div class="fold"> </div>
</br></div>
<div id="32" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">->{CALLBACK} = </font><font class="Keyword">sub </font><font class="Normal">{};</font></br></div>
<div id="33" class="line"><div id="33f" class="fold" onclick="block_fold('33', '37')">-</div><div id="33e" class="fold" onclick="block_expand('33', '37')" style="display:none;">+</div>
<font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">->{COMMANDS} = {</font></br></div>
<div id="34" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Operator">'</font><font class="String">doremove</font><font class="Operator">'</font><font class="Normal"> => \&DoRemove,</font></br></div>
<div id="35" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Operator">'</font><font class="String">doreplace</font><font class="Operator">'</font><font class="Normal"> => \&DoReplace,</font></br></div>
<div id="36" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Operator">'</font><font class="String">dowrite</font><font class="Operator">'</font><font class="Normal"> => \&DoWrite,</font></br></div>
<div id="37" class="line"><div class="fold"> </div>
<font class="Normal"> };</font></br></div>
<div id="38" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">->{LISTENING} = </font><font class="DecVal">0</font><font class="Normal">;</font></br></div>
<div id="39" class="line"><div class="fold"> </div>
<font class="Normal"> </font></br></div>
<div id="40" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">->{OVRMODE} = </font><font class="DecVal">0</font><font class="Normal">;</font></br></div>
<div id="41" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">->{PLUGINS} = [];</font></br></div>
<div id="42" class="line"><div class="fold"> </div>
</br></div>
<div id="43" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">SetFont</font><font class="Normal">( </font><font class="Function">Wx::Font</font><font class="Normal">->new(</font><font class="DataType">@$defaultfont</font><font class="Normal">) );</font></br></div>
<div id="44" class="line"><div class="fold"> </div>
<font class="Normal"> EVT_CHAR(</font><font class="DataType">$self</font><font class="Normal">, \&OnChar);</font></br></div>
<div id="45" class="line"><div class="fold"> </div>
</br></div>
<div id="46" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">return</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">;</font></br></div>
<div id="47" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="48" class="line"><div class="fold"> </div>
</br></div>
<div id="49" class="line"><div id="49f" class="fold" onclick="block_fold('49', '54')">-</div><div id="49e" class="fold" onclick="block_expand('49', '54')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">AppendText</font><font class="Normal"> {</font></br></div>
<div id="50" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal"> = </font><font class="Function">shift</font><font class="Normal">;</font></br></div>
<div id="51" class="line"><div id="51f" class="fold" onclick="block_fold('51', '53')">-</div><div id="51e" class="fold" onclick="block_expand('51', '53')" style="display:none;">+</div>
<font class="Normal"> </font><font class="Keyword">unless</font><font class="Normal"> (</font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">Broadcast</font><font class="Normal">(</font><font class="Operator">'</font><font class="String">append</font><font class="Operator">'</font><font class="Normal">, </font><font class="DataType">@_</font><font class="Normal">)) {</font></br></div>
<div id="52" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">SUPER</font><font class="Normal">::</font><font class="DataType">Append</font><font class="Normal">(</font><font class="DataType">@_</font><font class="Normal">);</font></br></div>
<div id="53" class="line"><div class="fold"> </div>
<font class="Normal"> }</font></br></div>
<div id="54" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="55" class="line"><div class="fold"> </div>
</br></div>
<div id="56" class="line"><div id="56f" class="fold" onclick="block_fold('56', '66')">-</div><div id="56e" class="fold" onclick="block_expand('56', '66')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">Broadcast</font><font class="Normal"> {</font></br></div>
<div id="57" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal"> = </font><font class="Function">shift</font><font class="Normal">;</font></br></div>
<div id="58" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$plugs</font><font class="Normal"> = </font><font class="DataType">$self</font><font class="Normal">->{PLUGINS};</font></br></div>
<div id="59" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$flag</font><font class="Normal"> = </font><font class="DecVal">0</font><font class="Normal">;</font></br></div>
<div id="60" class="line"><div id="60f" class="fold" onclick="block_fold('60', '64')">-</div><div id="60e" class="fold" onclick="block_expand('60', '64')" style="display:none;">+</div>
<font class="Normal"> </font><font class="Keyword">foreach</font><font class="Normal"> (</font><font class="DataType">@$plugs</font><font class="Normal">) {</font></br></div>
<div id="61" class="line"><div id="61f" class="fold" onclick="block_fold('61', '63')">-</div><div id="61e" class="fold" onclick="block_expand('61', '63')" style="display:none;">+</div>
<font class="Normal"> </font><font class="Keyword">if</font><font class="Normal"> (</font><font class="Preprocessor">$_</font><font class="Normal">-></font><font class="DataType">Receive</font><font class="Normal">(</font><font class="DataType">@_</font><font class="Normal">)) {</font></br></div>
<div id="62" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$flag</font><font class="Normal"> = </font><font class="DecVal">1</font><font class="Normal">;</font></br></div>
<div id="63" class="line"><div class="fold"> </div>
<font class="Normal"> }</font></br></div>
<div id="64" class="line"><div class="fold"> </div>
<font class="Normal"> }</font></br></div>
<div id="65" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">return</font><font class="Normal"> </font><font class="DataType">$flag</font><font class="Normal">;</font></br></div>
<div id="66" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="67" class="line"><div class="fold"> </div>
</br></div>
<div id="68" class="line"><div id="68f" class="fold" onclick="block_fold('68', '76')">-</div><div id="68e" class="fold" onclick="block_expand('68', '76')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">Call2Remove</font><font class="Normal"> {</font></br></div>
<div id="69" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> (</font><font class="DataType">$self</font><font class="Normal">, </font><font class="DataType">$call</font><font class="Normal">, </font><font class="DataType">$index</font><font class="Normal">, </font><font class="DataType">$txt</font><font class="Normal">) = </font><font class="DataType">@_</font><font class="Normal">;</font></br></div>
<div id="70" class="line"><div id="70f" class="fold" onclick="block_fold('70', '72')">-</div><div id="70e" class="fold" onclick="block_expand('70', '72')" style="display:none;">+</div>
<font class="Normal"> </font><font class="Keyword">if</font><font class="Normal"> (</font><font class="DataType">$call</font><font class="Normal"> =~ </font><font class="Operator">/</font><font class="Others">.</font><font class="Char">*</font><font class="Others">remove</font><font class="Char">$</font><font class="Operator">/</font><font class="Normal">) {</font></br></div>
<div id="71" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">return</font><font class="Normal"> (</font><font class="DataType">$index</font><font class="Normal">, </font><font class="DataType">$index</font><font class="Normal"> + </font><font class="Function">length</font><font class="Normal">(</font><font class="DataType">$txt</font><font class="Normal">))</font></br></div>
<div id="72" class="line"><div id="72f" class="fold" onclick="block_fold('72', '75')">-</div><div id="72e" class="fold" onclick="block_expand('72', '75')" style="display:none;">+</div>
<font class="Normal"> } </font><font class="Keyword">else</font><font class="Normal"> {</font></br></div>
<div id="73" class="line"><div class="fold"> </div>
<font class="Normal"> carp </font><font class="Operator">"</font><font class="SpecialString">Call '</font><font class="DataType">$call</font><font class="Operator">'</font><font class="SpecialString"> is not a remove type</font><font class="Operator">"</font><font class="Normal">;</font></br></div>
<div id="74" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">return</font><font class="Normal"> </font><font class="Function">undef</font></br></div>
<div id="75" class="line"><div class="fold"> </div>
<font class="Normal"> }</font></br></div>
<div id="76" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="77" class="line"><div class="fold"> </div>
</br></div>
<div id="78" class="line"><div id="78f" class="fold" onclick="block_fold('78', '86')">-</div><div id="78e" class="fold" onclick="block_expand('78', '86')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">Call2Replace</font><font class="Normal"> {</font></br></div>
<div id="79" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> (</font><font class="DataType">$self</font><font class="Normal">, </font><font class="DataType">$call</font><font class="Normal">, </font><font class="DataType">$index</font><font class="Normal">, </font><font class="DataType">$old</font><font class="Normal">, </font><font class="DataType">$txt</font><font class="Normal">, </font><font class="DataType">$sel</font><font class="Normal">) = </font><font class="DataType">@_</font><font class="Normal">;</font></br></div>
<div id="80" class="line"><div id="80f" class="fold" onclick="block_fold('80', '82')">-</div><div id="80e" class="fold" onclick="block_expand('80', '82')" style="display:none;">+</div>
<font class="Normal"> </font><font class="Keyword">if</font><font class="Normal"> (</font><font class="DataType">$call</font><font class="Normal"> =~ </font><font class="Operator">/</font><font class="Others">.</font><font class="Char">*</font><font class="Others">replace</font><font class="Char">$</font><font class="Operator">/</font><font class="Normal">) {</font></br></div>
<div id="81" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">return</font><font class="Normal"> (</font><font class="DataType">$index</font><font class="Normal">, </font><font class="DataType">$index</font><font class="Normal"> + </font><font class="Function">length</font><font class="Normal">(</font><font class="DataType">$old</font><font class="Normal">), </font><font class="DataType">$txt</font><font class="Normal">)</font></br></div>
<div id="82" class="line"><div id="82f" class="fold" onclick="block_fold('82', '85')">-</div><div id="82e" class="fold" onclick="block_expand('82', '85')" style="display:none;">+</div>
<font class="Normal"> } </font><font class="Keyword">else</font><font class="Normal"> {</font></br></div>
<div id="83" class="line"><div class="fold"> </div>
<font class="Normal"> carp </font><font class="Operator">"</font><font class="SpecialString">Call '</font><font class="DataType">$call</font><font class="Operator">'</font><font class="SpecialString"> is not a replace type</font><font class="Operator">"</font><font class="Normal">;</font></br></div>
<div id="84" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">return</font><font class="Normal"> </font><font class="Function">undef</font></br></div>
<div id="85" class="line"><div class="fold"> </div>
<font class="Normal"> }</font></br></div>
<div id="86" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="87" class="line"><div class="fold"> </div>
</br></div>
<div id="88" class="line"><div id="88f" class="fold" onclick="block_fold('88', '96')">-</div><div id="88e" class="fold" onclick="block_expand('88', '96')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">Call2WriteText</font><font class="Normal"> {</font></br></div>
<div id="89" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> (</font><font class="DataType">$self</font><font class="Normal">, </font><font class="DataType">$call</font><font class="Normal">, </font><font class="DataType">$index</font><font class="Normal">, </font><font class="DataType">$txt</font><font class="Normal">) = </font><font class="DataType">@_</font><font class="Normal">;</font></br></div>
<div id="90" class="line"><div id="90f" class="fold" onclick="block_fold('90', '92')">-</div><div id="90e" class="fold" onclick="block_expand('90', '92')" style="display:none;">+</div>
<font class="Normal"> </font><font class="Keyword">if</font><font class="Normal"> (</font><font class="DataType">$call</font><font class="Normal"> =~ </font><font class="Operator">/</font><font class="Others">.</font><font class="Char">*</font><font class="Others">write</font><font class="Char">$</font><font class="Operator">/</font><font class="Normal">) {</font></br></div>
<div id="91" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">return</font><font class="Normal"> </font><font class="DataType">$txt</font></br></div>
<div id="92" class="line"><div id="92f" class="fold" onclick="block_fold('92', '95')">-</div><div id="92e" class="fold" onclick="block_expand('92', '95')" style="display:none;">+</div>
<font class="Normal"> } </font><font class="Keyword">else</font><font class="Normal"> {</font></br></div>
<div id="93" class="line"><div class="fold"> </div>
<font class="Normal"> carp </font><font class="Operator">"</font><font class="SpecialString">Call '</font><font class="DataType">$call</font><font class="Operator">'</font><font class="SpecialString"> is not a write type</font><font class="Operator">"</font><font class="Normal">;</font></br></div>
<div id="94" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">return</font><font class="Normal"> </font><font class="Function">undef</font></br></div>
<div id="95" class="line"><div class="fold"> </div>
<font class="Normal"> }</font></br></div>
<div id="96" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="97" class="line"><div class="fold"> </div>
</br></div>
<div id="98" class="line"><div id="98f" class="fold" onclick="block_fold('98', '102')">-</div><div id="98e" class="fold" onclick="block_expand('98', '102')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">Callback</font><font class="Normal"> {</font></br></div>
<div id="99" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal"> = </font><font class="Function">shift</font><font class="Normal">;</font></br></div>
<div id="100" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">if</font><font class="Normal"> (</font><font class="DataType">@_</font><font class="Normal">) { </font><font class="DataType">$self</font><font class="Normal">->{CALLBACK} = </font><font class="Function">shift</font><font class="Normal">; }</font></br></div>
<div id="101" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">return</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">->{CALLBACK};</font></br></div>
<div id="102" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="103" class="line"><div class="fold"> </div>
</br></div>
<div id="104" class="line"><div id="104f" class="fold" onclick="block_fold('104', '107')">-</div><div id="104e" class="fold" onclick="block_expand('104', '107')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">CanUndo</font><font class="Normal"> {</font></br></div>
<div id="105" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal"> = </font><font class="Function">shift</font><font class="Normal">;</font></br></div>
<div id="106" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">return</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">Broadcast</font><font class="Normal">(</font><font class="Operator">'</font><font class="String">canundo</font><font class="Operator">'</font><font class="Normal">);</font></br></div>
<div id="107" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="108" class="line"><div class="fold"> </div>
</br></div>
<div id="109" class="line"><div id="109f" class="fold" onclick="block_fold('109', '112')">-</div><div id="109e" class="fold" onclick="block_expand('109', '112')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">CanRedo</font><font class="Normal"> {</font></br></div>
<div id="110" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal"> = </font><font class="Function">shift</font><font class="Normal">;</font></br></div>
<div id="111" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">return</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">Broadcast</font><font class="Normal">(</font><font class="Operator">'</font><font class="String">canredo</font><font class="Operator">'</font><font class="Normal">);</font></br></div>
<div id="112" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="113" class="line"><div class="fold"> </div>
</br></div>
<div id="114" class="line"><div id="114f" class="fold" onclick="block_fold('114', '119')">-</div><div id="114e" class="fold" onclick="block_expand('114', '119')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">Clear</font><font class="Normal"> {</font></br></div>
<div id="115" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal"> = </font><font class="Function">shift</font><font class="Normal">;</font></br></div>
<div id="116" class="line"><div id="116f" class="fold" onclick="block_fold('116', '118')">-</div><div id="116e" class="fold" onclick="block_expand('116', '118')" style="display:none;">+</div>
<font class="Normal"> </font><font class="Keyword">unless</font><font class="Normal"> (</font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">Broadcast</font><font class="Normal">(</font><font class="Operator">'</font><font class="String">clear</font><font class="Operator">'</font><font class="Normal">)) {</font></br></div>
<div id="117" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">SUPER</font><font class="Normal">::</font><font class="DataType">Clear</font><font class="Normal">;</font></br></div>
<div id="118" class="line"><div class="fold"> </div>
<font class="Normal"> }</font></br></div>
<div id="119" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="120" class="line"><div class="fold"> </div>
</br></div>
<div id="121" class="line"><div id="121f" class="fold" onclick="block_fold('121', '125')">-</div><div id="121e" class="fold" onclick="block_expand('121', '125')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">ClearSelection</font><font class="Normal"> {</font></br></div>
<div id="122" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal"> = </font><font class="Function">shift</font><font class="Normal">;</font></br></div>
<div id="123" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$ins</font><font class="Normal"> = </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">GetInsertionPoint</font><font class="Normal">;</font></br></div>
<div id="124" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">SetSelection</font><font class="Normal">(</font><font class="DataType">$ins</font><font class="Normal">, </font><font class="DataType">$ins</font><font class="Normal">);</font></br></div>
<div id="125" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="126" class="line"><div class="fold"> </div>
</br></div>
<div id="127" class="line"><div id="127f" class="fold" onclick="block_fold('127', '132')">-</div><div id="127e" class="fold" onclick="block_expand('127', '132')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">Command</font><font class="Normal"> {</font></br></div>
<div id="128" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal"> = </font><font class="Function">shift</font><font class="Normal">;</font></br></div>
<div id="129" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$name</font><font class="Normal"> = </font><font class="Function">shift</font><font class="Normal">;</font></br></div>
<div id="130" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">if</font><font class="Normal"> (</font><font class="DataType">@_</font><font class="Normal">) { </font><font class="DataType">$self</font><font class="Normal">->{COMMANDS}->{</font><font class="DataType">$name</font><font class="Normal">} = </font><font class="Function">shift</font><font class="Normal"> }</font></br></div>
<div id="131" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">return</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">->{COMMANDS}->{</font><font class="DataType">$name</font><font class="Normal">}</font></br></div>
<div id="132" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="133" class="line"><div class="fold"> </div>
</br></div>
<div id="134" class="line"><div id="134f" class="fold" onclick="block_fold('134', '139')">-</div><div id="134e" class="fold" onclick="block_expand('134', '139')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">Copy</font><font class="Normal"> {</font></br></div>
<div id="135" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal"> = </font><font class="Function">shift</font><font class="Normal">;</font></br></div>
<div id="136" class="line"><div id="136f" class="fold" onclick="block_fold('136', '138')">-</div><div id="136e" class="fold" onclick="block_expand('136', '138')" style="display:none;">+</div>
<font class="Normal"> </font><font class="Keyword">unless</font><font class="Normal"> (</font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">Broadcast</font><font class="Normal">(</font><font class="Operator">'</font><font class="String">copy</font><font class="Operator">'</font><font class="Normal">)) {</font></br></div>
<div id="137" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">SUPER</font><font class="Normal">::</font><font class="DataType">Copy</font><font class="Normal">;</font></br></div>
<div id="138" class="line"><div class="fold"> </div>
<font class="Normal"> }</font></br></div>
<div id="139" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="140" class="line"><div class="fold"> </div>
</br></div>
<div id="141" class="line"><div id="141f" class="fold" onclick="block_fold('141', '146')">-</div><div id="141e" class="fold" onclick="block_expand('141', '146')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">Cut</font><font class="Normal"> {</font></br></div>
<div id="142" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal"> = </font><font class="Function">shift</font><font class="Normal">;</font></br></div>
<div id="143" class="line"><div id="143f" class="fold" onclick="block_fold('143', '145')">-</div><div id="143e" class="fold" onclick="block_expand('143', '145')" style="display:none;">+</div>
<font class="Normal"> </font><font class="Keyword">unless</font><font class="Normal"> (</font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">Broadcast</font><font class="Normal">(</font><font class="Operator">'</font><font class="String">cut</font><font class="Operator">'</font><font class="Normal">)) {</font></br></div>
<div id="144" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">SUPER</font><font class="Normal">::</font><font class="DataType">Cut</font><font class="Normal">;</font></br></div>
<div id="145" class="line"><div class="fold"> </div>
<font class="Normal"> }</font></br></div>
<div id="146" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="147" class="line"><div class="fold"> </div>
</br></div>
<div id="148" class="line"><div id="148f" class="fold" onclick="block_fold('148', '157')">-</div><div id="148e" class="fold" onclick="block_expand('148', '157')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">DoRemove</font><font class="Normal"> {</font></br></div>
<div id="149" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal"> = </font><font class="Function">shift</font><font class="Normal">;</font></br></div>
<div id="150" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> (</font><font class="DataType">$index</font><font class="Normal">, </font><font class="DataType">$txt</font><font class="Normal">, </font><font class="DataType">$sel</font><font class="Normal">, </font><font class="DataType">$ins</font><font class="Normal">) = </font><font class="DataType">@_</font><font class="Normal">;</font></br></div>
<div id="151" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">ClearSelection</font><font class="Normal">;</font></br></div>
<div id="152" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">SUPER</font><font class="Normal">::</font><font class="DataType">Remove</font><font class="Normal">(</font><font class="DataType">$index</font><font class="Normal">, </font><font class="DataType">$index</font><font class="Normal"> + </font><font class="Function">length</font><font class="Normal">(</font><font class="DataType">$txt</font><font class="Normal">));</font></br></div>
<div id="153" class="line"><div id="153f" class="fold" onclick="block_fold('153', '155')">-</div><div id="153e" class="fold" onclick="block_expand('153', '155')" style="display:none;">+</div>
<font class="Normal"> </font><font class="Keyword">if</font><font class="Normal"> (</font><font class="Function">defined</font><font class="Normal">(</font><font class="DataType">$ins</font><font class="Normal">)) {</font></br></div>
<div id="154" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">SetInsertionPoint</font><font class="Normal">(</font><font class="DataType">$ins</font><font class="Normal">);</font></br></div>
<div id="155" class="line"><div class="fold"> </div>
<font class="Normal"> }</font></br></div>
<div id="156" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">return</font><font class="Normal"> </font><font class="DecVal">1</font></br></div>
<div id="157" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="158" class="line"><div class="fold"> </div>
</br></div>
<div id="159" class="line"><div id="159f" class="fold" onclick="block_fold('159', '170')">-</div><div id="159e" class="fold" onclick="block_expand('159', '170')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">DoReplace</font><font class="Normal"> {</font></br></div>
<div id="160" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> (</font><font class="DataType">$self</font><font class="Normal">, </font><font class="DataType">$index</font><font class="Normal">, </font><font class="DataType">$old</font><font class="Normal">, </font><font class="DataType">$txt</font><font class="Normal">, </font><font class="DataType">$sel</font><font class="Normal">, </font><font class="DataType">$ins</font><font class="Normal">) = </font><font class="DataType">@_</font><font class="Normal">;</font></br></div>
<div id="161" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">ClearSelection</font><font class="Normal">;</font></br></div>
<div id="162" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">SUPER</font><font class="Normal">::</font><font class="DataType">Replace</font><font class="Normal">(</font><font class="DataType">$index</font><font class="Normal">, </font><font class="DataType">$index</font><font class="Normal"> + </font><font class="Function">length</font><font class="Normal">(</font><font class="DataType">$old</font><font class="Normal">), </font><font class="DataType">$txt</font><font class="Normal">);</font></br></div>
<div id="163" class="line"><div id="163f" class="fold" onclick="block_fold('163', '165')">-</div><div id="163e" class="fold" onclick="block_expand('163', '165')" style="display:none;">+</div>
<font class="Normal"> </font><font class="Keyword">if</font><font class="Normal"> (</font><font class="DataType">$sel</font><font class="Normal">) {</font></br></div>
<div id="164" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">SetSelection</font><font class="Normal">(</font><font class="DataType">$index</font><font class="Normal">, </font><font class="DataType">$index</font><font class="Normal"> + </font><font class="Function">length</font><font class="Normal">(</font><font class="DataType">$txt</font><font class="Normal">));</font></br></div>
<div id="165" class="line"><div class="fold"> </div>
<font class="Normal"> }</font></br></div>
<div id="166" class="line"><div id="166f" class="fold" onclick="block_fold('166', '168')">-</div><div id="166e" class="fold" onclick="block_expand('166', '168')" style="display:none;">+</div>
<font class="Normal"> </font><font class="Keyword">if</font><font class="Normal"> (</font><font class="Function">defined</font><font class="Normal">(</font><font class="DataType">$ins</font><font class="Normal">)) {</font></br></div>
<div id="167" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">SetInsertionPoint</font><font class="Normal">(</font><font class="DataType">$ins</font><font class="Normal">);</font></br></div>
<div id="168" class="line"><div class="fold"> </div>
<font class="Normal"> }</font></br></div>
<div id="169" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">return</font><font class="Normal"> </font><font class="DecVal">1</font></br></div>
<div id="170" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="171" class="line"><div class="fold"> </div>
</br></div>
<div id="172" class="line"><div id="172f" class="fold" onclick="block_fold('172', '184')">-</div><div id="172e" class="fold" onclick="block_expand('172', '184')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">DoWrite</font><font class="Normal"> {</font></br></div>
<div id="173" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> (</font><font class="DataType">$self</font><font class="Normal">, </font><font class="DataType">$index</font><font class="Normal">, </font><font class="DataType">$txt</font><font class="Normal">, </font><font class="DataType">$sel</font><font class="Normal">, </font><font class="DataType">$ins</font><font class="Normal">) = </font><font class="DataType">@_</font><font class="Normal">;</font></br></div>
<div id="174" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">ClearSelection</font><font class="Normal">;</font></br></div>
<div id="175" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">SetInsertionPoint</font><font class="Normal">(</font><font class="DataType">$index</font><font class="Normal">);</font></br></div>
<div id="176" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">SUPER</font><font class="Normal">::</font><font class="DataType">WriteText</font><font class="Normal">(</font><font class="DataType">$txt</font><font class="Normal">);</font></br></div>
<div id="177" class="line"><div id="177f" class="fold" onclick="block_fold('177', '179')">-</div><div id="177e" class="fold" onclick="block_expand('177', '179')" style="display:none;">+</div>
<font class="Normal"> </font><font class="Keyword">if</font><font class="Normal"> (</font><font class="DataType">$sel</font><font class="Normal">) {</font></br></div>
<div id="178" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">SetSelection</font><font class="Normal">(</font><font class="DataType">$index</font><font class="Normal">, </font><font class="DataType">$index</font><font class="Normal"> + </font><font class="Function">length</font><font class="Normal">(</font><font class="DataType">$txt</font><font class="Normal">));</font></br></div>
<div id="179" class="line"><div class="fold"> </div>
<font class="Normal"> }</font></br></div>
<div id="180" class="line"><div id="180f" class="fold" onclick="block_fold('180', '182')">-</div><div id="180e" class="fold" onclick="block_expand('180', '182')" style="display:none;">+</div>
<font class="Normal"> </font><font class="Keyword">if</font><font class="Normal"> (</font><font class="Function">defined</font><font class="Normal">(</font><font class="DataType">$ins</font><font class="Normal">)) {</font></br></div>
<div id="181" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">SetInsertionPoint</font><font class="Normal">(</font><font class="DataType">$ins</font><font class="Normal">);</font></br></div>
<div id="182" class="line"><div class="fold"> </div>
<font class="Normal"> }</font></br></div>
<div id="183" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">return</font><font class="Normal"> </font><font class="DecVal">1</font></br></div>
<div id="184" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="185" class="line"><div class="fold"> </div>
</br></div>
<div id="186" class="line"><div id="186f" class="fold" onclick="block_fold('186', '198')">-</div><div id="186e" class="fold" onclick="block_expand('186', '198')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">FindPluginId</font><font class="Normal"> {</font></br></div>
<div id="187" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> (</font><font class="DataType">$self</font><font class="Normal">, </font><font class="DataType">$name</font><font class="Normal">) = </font><font class="DataType">@_</font><font class="Normal">;</font></br></div>
<div id="188" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$plgs</font><font class="Normal"> = </font><font class="DataType">$self</font><font class="Normal">->{PLUGINS};</font></br></div>
<div id="189" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$index</font><font class="Normal"> = </font><font class="DecVal">0</font><font class="Normal">;</font></br></div>
<div id="190" class="line"><div id="190f" class="fold" onclick="block_fold('190', '195')">-</div><div id="190e" class="fold" onclick="block_expand('190', '195')" style="display:none;">+</div>
<font class="Normal"> </font><font class="Keyword">foreach</font><font class="Normal"> (</font><font class="DataType">@$plgs</font><font class="Normal">) {</font></br></div>
<div id="191" class="line"><div id="191f" class="fold" onclick="block_fold('191', '193')">-</div><div id="191e" class="fold" onclick="block_expand('191', '193')" style="display:none;">+</div>
<font class="Normal"> </font><font class="Keyword">if</font><font class="Normal"> (</font><font class="DataType">$name</font><font class="Normal"> </font><font class="Operator">eq</font><font class="Normal"> </font><font class="DataType">$plgs</font><font class="Normal">->[</font><font class="DataType">$index</font><font class="Normal">]->Name) {</font></br></div>
<div id="192" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">return</font><font class="Normal"> </font><font class="DataType">$index</font></br></div>
<div id="193" class="line"><div class="fold"> </div>
<font class="Normal"> }</font></br></div>
<div id="194" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$index</font><font class="Normal"> ++;</font></br></div>
<div id="195" class="line"><div class="fold"> </div>
<font class="Normal"> }</font></br></div>
<div id="196" class="line"><div class="fold"> </div>
<font class="Comment"># carp "Plugin $name is not loaded\n";</font></br></div>
<div id="197" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">return</font><font class="Normal"> </font><font class="Function">undef</font><font class="Normal">;</font></br></div>
<div id="198" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="199" class="line"><div class="fold"> </div>
</br></div>
<div id="200" class="line"><div id="200f" class="fold" onclick="block_fold('200', '209')">-</div><div id="200e" class="fold" onclick="block_expand('200', '209')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">FindPlugin</font><font class="Normal"> {</font></br></div>
<div id="201" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> (</font><font class="DataType">$self</font><font class="Normal">, </font><font class="DataType">$name</font><font class="Normal">) = </font><font class="DataType">@_</font><font class="Normal">;</font></br></div>
<div id="202" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$plgs</font><font class="Normal"> = </font><font class="DataType">$self</font><font class="Normal">->{PLUGINS};</font></br></div>
<div id="203" class="line"><div id="203f" class="fold" onclick="block_fold('203', '207')">-</div><div id="203e" class="fold" onclick="block_expand('203', '207')" style="display:none;">+</div>
<font class="Normal"> </font><font class="Keyword">foreach</font><font class="Normal"> (</font><font class="DataType">@$plgs</font><font class="Normal">) {</font></br></div>
<div id="204" class="line"><div id="204f" class="fold" onclick="block_fold('204', '206')">-</div><div id="204e" class="fold" onclick="block_expand('204', '206')" style="display:none;">+</div>
<font class="Normal"> </font><font class="Keyword">if</font><font class="Normal"> (</font><font class="DataType">$name</font><font class="Normal"> </font><font class="Operator">eq</font><font class="Normal"> </font><font class="Preprocessor">$_</font><font class="Normal">-></font><font class="DataType">Name</font><font class="Normal">) {</font></br></div>
<div id="205" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">return</font><font class="Normal"> </font><font class="Preprocessor">$_</font></br></div>
<div id="206" class="line"><div class="fold"> </div>
<font class="Normal"> }</font></br></div>
<div id="207" class="line"><div class="fold"> </div>
<font class="Normal"> }</font></br></div>
<div id="208" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">return</font><font class="Normal"> </font><font class="Function">undef</font><font class="Normal">;</font></br></div>
<div id="209" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="210" class="line"><div class="fold"> </div>
</br></div>
<div id="211" class="line"><div id="211f" class="fold" onclick="block_fold('211', '225')">-</div><div id="211e" class="fold" onclick="block_expand('211', '225')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">GetClipboardText</font><font class="Normal"> {</font></br></div>
<div id="212" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal"> = </font><font class="Function">shift</font><font class="Normal">;</font></br></div>
<div id="213" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$txt</font><font class="Normal"> = </font><font class="Function">undef</font><font class="Normal">;</font></br></div>
<div id="214" class="line"><div id="214f" class="fold" onclick="block_fold('214', '223')">-</div><div id="214e" class="fold" onclick="block_expand('214', '223')" style="display:none;">+</div>
<font class="Normal"> </font><font class="Keyword">if</font><font class="Normal"> (wxTheClipboard->Open) {</font></br></div>
<div id="215" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">if</font><font class="Normal"> (</font><font class="DataType">$debug</font><font class="Normal">) { </font><font class="Function">print</font><font class="Normal"> </font><font class="Operator">"</font><font class="SpecialString">Clipboard open</font><font class="Char">\n</font><font class="Operator">"</font><font class="Normal"> }</font></br></div>
<div id="216" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$textdata</font><font class="Normal"> = </font><font class="Function">Wx::TextDataObject</font><font class="Normal">->new;</font></br></div>
<div id="217" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$ok</font><font class="Normal"> = wxTheClipboard->GetData( </font><font class="DataType">$textdata</font><font class="Normal"> );</font></br></div>
<div id="218" class="line"><div id="218f" class="fold" onclick="block_fold('218', '220')">-</div><div id="218e" class="fold" onclick="block_expand('218', '220')" style="display:none;">+</div>
<font class="Normal"> </font><font class="Keyword">if</font><font class="Normal">( </font><font class="DataType">$ok</font><font class="Normal"> ) {</font></br></div>
<div id="219" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$txt</font><font class="Normal"> = </font><font class="DataType">$textdata</font><font class="Normal">-></font><font class="DataType">GetText</font><font class="Normal">;</font></br></div>
<div id="220" class="line"><div class="fold"> </div>
<font class="Normal"> }</font></br></div>
<div id="221" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">if</font><font class="Normal"> (</font><font class="DataType">$debug</font><font class="Normal"> </font><font class="Operator">and</font><font class="Normal"> </font><font class="Function">defined</font><font class="Normal">(</font><font class="DataType">$txt</font><font class="Normal">)) { </font><font class="Function">print</font><font class="Normal"> </font><font class="Operator">"</font><font class="SpecialString">Clipboard text: </font><font class="DataType">$txt</font><font class="Char">\n</font><font class="Operator">"</font><font class="Normal"> }</font></br></div>
<div id="222" class="line"><div class="fold"> </div>
<font class="Normal"> wxTheClipboard->Close;</font></br></div>
<div id="223" class="line"><div class="fold"> </div>
<font class="Normal"> }</font></br></div>
<div id="224" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">return</font><font class="Normal"> </font><font class="DataType">$txt</font><font class="Normal">;</font></br></div>
<div id="225" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="226" class="line"><div class="fold"> </div>
</br></div>
<div id="227" class="line"><div id="227f" class="fold" onclick="block_fold('227', '232')">-</div><div id="227e" class="fold" onclick="block_expand('227', '232')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">GetLineNumber</font><font class="Normal"> {</font></br></div>
<div id="228" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> (</font><font class="DataType">$self</font><font class="Normal">, </font><font class="DataType">$index</font><font class="Normal">) = </font><font class="DataType">@_</font><font class="Normal">;</font></br></div>
<div id="229" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">unless</font><font class="Normal"> (</font><font class="Function">defined</font><font class="Normal">(</font><font class="DataType">$index</font><font class="Normal">)) { </font><font class="DataType">$index</font><font class="Normal"> = </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">GetInsertionPoint</font><font class="Normal"> };</font></br></div>
<div id="230" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> (</font><font class="DataType">$col</font><font class="Normal">, </font><font class="DataType">$line</font><font class="Normal">) = </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">PositionToXY</font><font class="Normal">(</font><font class="DataType">$index</font><font class="Normal">);</font></br></div>
<div id="231" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">return</font><font class="Normal"> </font><font class="DataType">$line</font><font class="Normal">;</font></br></div>
<div id="232" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="233" class="line"><div class="fold"> </div>
</br></div>
<div id="234" class="line"><div id="234f" class="fold" onclick="block_fold('234', '238')">-</div><div id="234e" class="fold" onclick="block_expand('234', '238')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">HasSelection</font><font class="Normal"> {</font></br></div>
<div id="235" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal"> = </font><font class="Function">shift</font><font class="Normal">;</font></br></div>
<div id="236" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> (</font><font class="DataType">$selb</font><font class="Normal">, </font><font class="DataType">$sele</font><font class="Normal">) = </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">GetSelection</font><font class="Normal">;</font></br></div>
<div id="237" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">return</font><font class="Normal"> (</font><font class="DataType">$selb</font><font class="Normal"> </font><font class="Operator">ne</font><font class="Normal"> </font><font class="DataType">$sele</font><font class="Normal">)</font></br></div>
<div id="238" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="239" class="line"><div class="fold"> </div>
</br></div>
<div id="240" class="line"><div class="fold"> </div>
<font class="Comment"># </font><font class="Alert">TODO</font><font class="Comment"> make this unicode compatible</font></br></div>
<div id="241" class="line"><div id="241f" class="fold" onclick="block_fold('241', '247')">-</div><div id="241e" class="fold" onclick="block_expand('241', '247')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">IsWriteable</font><font class="Normal"> {</font></br></div>
<div id="242" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> (</font><font class="DataType">$self</font><font class="Normal">, </font><font class="DataType">$key</font><font class="Normal">) = </font><font class="DataType">@_</font><font class="Normal">;</font></br></div>
<div id="243" class="line"><div id="243f" class="fold" onclick="block_fold('243', '245')">-</div><div id="243e" class="fold" onclick="block_expand('243', '245')" style="display:none;">+</div>
<font class="Normal"> </font><font class="Keyword">if</font><font class="Normal"> (((</font><font class="DataType">$key</font><font class="Normal"> >= </font><font class="DecVal">32</font><font class="Normal">) </font><font class="Operator">and</font><font class="Normal"> (</font><font class="DataType">$key</font><font class="Normal"> < </font><font class="DecVal">127</font><font class="Normal">)) </font><font class="Operator">or</font><font class="Normal"> ((</font><font class="DataType">$key</font><font class="Normal"> > </font><font class="DecVal">127</font><font class="Normal">) </font><font class="Operator">and</font><font class="Normal"> (</font><font class="DataType">$key</font><font class="Normal"> < </font><font class="DecVal">256</font><font class="Normal">))) {</font></br></div>
<div id="244" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">return</font><font class="Normal"> </font><font class="DecVal">1</font></br></div>
<div id="245" class="line"><div class="fold"> </div>
<font class="Normal"> }</font></br></div>
<div id="246" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">return</font><font class="Normal"> </font><font class="DecVal">0</font></br></div>
<div id="247" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="248" class="line"><div class="fold"> </div>
</br></div>
<div id="249" class="line"><div id="249f" class="fold" onclick="block_fold('249', '264')">-</div><div id="249e" class="fold" onclick="block_expand('249', '264')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">Listening</font><font class="Normal"> {</font></br></div>
<div id="250" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal"> = </font><font class="Function">shift</font><font class="Normal">;</font></br></div>
<div id="251" class="line"><div id="251f" class="fold" onclick="block_fold('251', '262')">-</div><div id="251e" class="fold" onclick="block_expand('251', '262')" style="display:none;">+</div>
<font class="Normal"> </font><font class="Keyword">if</font><font class="Normal"> (</font><font class="DataType">@_</font><font class="Normal">) {</font></br></div>
<div id="252" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$new</font><font class="Normal"> = </font><font class="Function">shift</font><font class="Normal">;</font></br></div>
<div id="253" class="line"><div id="253f" class="fold" onclick="block_fold('253', '261')">-</div><div id="253e" class="fold" onclick="block_expand('253', '261')" style="display:none;">+</div>
<font class="Normal"> </font><font class="Keyword">unless</font><font class="Normal"> (</font><font class="DataType">$new</font><font class="Normal"> </font><font class="Operator">eq</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">->{LISTENING}) {</font></br></div>
<div id="254" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$plgs</font><font class="Normal"> = </font><font class="DataType">$self</font><font class="Normal">->{PLUGINS};</font></br></div>
<div id="255" class="line"><div id="255f" class="fold" onclick="block_fold('255', '257')">-</div><div id="255e" class="fold" onclick="block_expand('255', '257')" style="display:none;">+</div>
<font class="Normal"> </font><font class="Keyword">if</font><font class="Normal"> (</font><font class="DataType">$new</font><font class="Normal">) {</font></br></div>
<div id="256" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Function">unshift</font><font class="Normal"> </font><font class="DataType">@$plgs</font><font class="Normal">, </font><font class="DataType">$self</font></br></div>
<div id="257" class="line"><div id="257f" class="fold" onclick="block_fold('257', '259')">-</div><div id="257e" class="fold" onclick="block_expand('257', '259')" style="display:none;">+</div>
<font class="Normal"> } </font><font class="Keyword">else</font><font class="Normal"> {</font></br></div>
<div id="258" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Function">shift</font><font class="Normal"> </font><font class="DataType">@$plgs</font></br></div>
<div id="259" class="line"><div class="fold"> </div>
<font class="Normal"> }</font></br></div>
<div id="260" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">->{LISTENING} = </font><font class="DataType">$new</font></br></div>
<div id="261" class="line"><div class="fold"> </div>
<font class="Normal"> }</font></br></div>
<div id="262" class="line"><div class="fold"> </div>
<font class="Normal"> }</font></br></div>
<div id="263" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">return</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">->{LISTENING}</font></br></div>
<div id="264" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="265" class="line"><div class="fold"> </div>
</br></div>
<div id="266" class="line"><div id="266f" class="fold" onclick="block_fold('266', '271')">-</div><div id="266e" class="fold" onclick="block_expand('266', '271')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">LoadFile</font><font class="Normal"> {</font></br></div>
<div id="267" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal"> = </font><font class="Function">shift</font><font class="Normal">;</font></br></div>
<div id="268" class="line"><div id="268f" class="fold" onclick="block_fold('268', '270')">-</div><div id="268e" class="fold" onclick="block_expand('268', '270')" style="display:none;">+</div>
<font class="Normal"> </font><font class="Keyword">unless</font><font class="Normal"> (</font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">Broadcast</font><font class="Normal">(</font><font class="Operator">'</font><font class="String">load</font><font class="Operator">'</font><font class="Normal">, </font><font class="DataType">@_</font><font class="Normal">)) {</font></br></div>
<div id="269" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">SUPER</font><font class="Normal">::</font><font class="DataType">LoadFile</font><font class="Normal">(</font><font class="DataType">@_</font><font class="Normal">);</font></br></div>
<div id="270" class="line"><div class="fold"> </div>
<font class="Normal"> }</font></br></div>
<div id="271" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="272" class="line"><div class="fold"> </div>
</br></div>
<div id="273" class="line"><div id="273f" class="fold" onclick="block_fold('273', '285')">-</div><div id="273e" class="fold" onclick="block_expand('273', '285')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">LoadPlugin</font><font class="Normal"> {</font></br></div>
<div id="274" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal"> = </font><font class="Function">shift</font><font class="Normal">;</font></br></div>
<div id="275" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$plug</font><font class="Normal"> = </font><font class="Function">undef</font><font class="Normal">;</font></br></div>
<div id="276" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$name</font><font class="Normal"> = </font><font class="Function">shift</font><font class="Normal">;</font></br></div>
<div id="277" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Comment">#Does anybody have a better idea for this?</font></br></div>
<div id="278" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$name</font><font class="Normal"> = </font><font class="Operator">"</font><font class="SpecialString">Syntax::Kamelon::Wx::PluggableTextCtrl::</font><font class="DataType">$name</font><font class="Operator">"</font><font class="Normal">;</font></br></div>
<div id="279" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$plug</font><font class="Normal"> = </font><font class="DataType">$name</font><font class="Normal">-></font><font class="DataType">new</font><font class="Normal">(</font><font class="DataType">$self</font><font class="Normal">, </font><font class="DataType">@_</font><font class="Normal">);</font></br></div>
<div id="280" class="line"><div id="280f" class="fold" onclick="block_fold('280', '282')">-</div><div id="280e" class="fold" onclick="block_expand('280', '282')" style="display:none;">+</div>
<font class="Normal"> </font><font class="Keyword">if</font><font class="Normal"> (</font><font class="Function">defined</font><font class="Normal">(</font><font class="DataType">$plug</font><font class="Normal">)) {</font></br></div>
<div id="281" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">RegisterPlugin</font><font class="Normal">(</font><font class="DataType">$plug</font><font class="Normal">);</font></br></div>
<div id="282" class="line"><div id="282f" class="fold" onclick="block_fold('282', '284')">-</div><div id="282e" class="fold" onclick="block_expand('282', '284')" style="display:none;">+</div>
<font class="Normal"> } </font><font class="Keyword">else</font><font class="Normal"> {</font></br></div>
<div id="283" class="line"><div class="fold"> </div>
<font class="Normal"> carp </font><font class="Operator">"</font><font class="SpecialString">unable to load plugin </font><font class="DataType">$name</font><font class="Char">\n</font><font class="Operator">"</font><font class="Normal">;</font></br></div>
<div id="284" class="line"><div class="fold"> </div>
<font class="Normal"> }</font></br></div>
<div id="285" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="286" class="line"><div class="fold"> </div>
</br></div>
<div id="287" class="line"><div id="287f" class="fold" onclick="block_fold('287', '293')">-</div><div id="287e" class="fold" onclick="block_expand('287', '293')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">Name</font><font class="Normal"> {</font></br></div>
<div id="288" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal"> = </font><font class="Function">shift</font><font class="Normal">;</font></br></div>
<div id="289" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$name</font><font class="Normal"> = </font><font class="Function">ref</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">;</font></br></div>
<div id="290" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$name</font><font class="Normal"> =~</font><font class="Operator">s/</font><font class="Others">.</font><font class="Char">*</font><font class="Others">::</font><font class="Operator">//</font><font class="Normal">;</font></br></div>
<div id="291" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">if</font><font class="Normal"> (</font><font class="DataType">$debug</font><font class="Normal">) { </font><font class="Function">print</font><font class="Normal"> </font><font class="Operator">"</font><font class="SpecialString">plugin name is </font><font class="DataType">$name</font><font class="Char">\n</font><font class="Operator">"</font><font class="Normal"> }</font></br></div>
<div id="292" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">return</font><font class="Normal"> </font><font class="DataType">$name</font></br></div>
<div id="293" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="294" class="line"><div class="fold"> </div>
</br></div>
<div id="295" class="line"><div id="295f" class="fold" onclick="block_fold('295', '310')">-</div><div id="295e" class="fold" onclick="block_expand('295', '310')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">OnChar</font><font class="Normal"> {</font></br></div>
<div id="296" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> (</font><font class="DataType">$self</font><font class="Normal">, </font><font class="DataType">$event</font><font class="Normal">) = </font><font class="DataType">@_</font><font class="Normal">;</font></br></div>
<div id="297" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$k</font><font class="Normal"> = </font><font class="DataType">$event</font><font class="Normal">-></font><font class="DataType">GetKeyCode</font><font class="Normal">;</font></br></div>
<div id="298" class="line"><div id="298f" class="fold" onclick="block_fold('298', '304')">-</div><div id="298e" class="fold" onclick="block_expand('298', '304')" style="display:none;">+</div>
<font class="Normal"> </font><font class="Keyword">if</font><font class="Normal"> (</font><font class="DataType">$k</font><font class="Normal"> </font><font class="Operator">eq</font><font class="Normal"> </font><font class="DecVal">322</font><font class="Normal">) { </font><font class="Comment">#Insert key pressed, record flip insert/ovr mode.</font></br></div>
<div id="299" class="line"><div id="299f" class="fold" onclick="block_fold('299', '301')">-</div><div id="299e" class="fold" onclick="block_expand('299', '301')" style="display:none;">+</div>
<font class="Normal"> </font><font class="Keyword">if</font><font class="Normal"> (</font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">OvrMode</font><font class="Normal">) {</font></br></div>
<div id="300" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">OvrMode</font><font class="Normal">(</font><font class="DecVal">0</font><font class="Normal">)</font></br></div>
<div id="301" class="line"><div id="301f" class="fold" onclick="block_fold('301', '303')">-</div><div id="301e" class="fold" onclick="block_expand('301', '303')" style="display:none;">+</div>
<font class="Normal"> } </font><font class="Keyword">else</font><font class="Normal"> {</font></br></div>
<div id="302" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">OvrMode</font><font class="Normal">(</font><font class="DecVal">1</font><font class="Normal">)</font></br></div>
<div id="303" class="line"><div class="fold"> </div>
<font class="Normal"> }</font></br></div>
<div id="304" class="line"><div class="fold"> </div>
<font class="Normal"> }</font></br></div>
<div id="305" class="line"><div id="305f" class="fold" onclick="block_fold('305', '307')">-</div><div id="305e" class="fold" onclick="block_expand('305', '307')" style="display:none;">+</div>
<font class="Normal"> </font><font class="Keyword">unless</font><font class="Normal"> (</font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">Broadcast</font><font class="Normal">(</font><font class="Operator">'</font><font class="String">key</font><font class="Operator">'</font><font class="Normal">, </font><font class="DataType">$event</font><font class="Normal">)) {</font></br></div>
<div id="306" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$event</font><font class="Normal">-></font><font class="DataType">Skip</font><font class="Normal">;</font></br></div>
<div id="307" class="line"><div class="fold"> </div>
<font class="Normal"> }</font></br></div>
<div id="308" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$callback</font><font class="Normal"> = </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">Callback</font><font class="Normal">;</font></br></div>
<div id="309" class="line"><div class="fold"> </div>
<font class="Normal"> &</font><font class="DataType">$callback</font><font class="Normal">;</font></br></div>
<div id="310" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="311" class="line"><div class="fold"> </div>
</br></div>
<div id="312" class="line"><div id="312f" class="fold" onclick="block_fold('312', '316')">-</div><div id="312e" class="fold" onclick="block_expand('312', '316')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">OvrMode</font><font class="Normal"> {</font></br></div>
<div id="313" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal"> = </font><font class="Function">shift</font><font class="Normal">;</font></br></div>
<div id="314" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">if</font><font class="Normal"> (</font><font class="DataType">@_</font><font class="Normal">) { </font><font class="DataType">$self</font><font class="Normal">->{OVRMODE} = </font><font class="Function">shift</font><font class="Normal">; }</font></br></div>
<div id="315" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">return</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">->{OVRMODE};</font></br></div>
<div id="316" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="317" class="line"><div class="fold"> </div>
</br></div>
<div id="318" class="line"><div id="318f" class="fold" onclick="block_fold('318', '323')">-</div><div id="318e" class="fold" onclick="block_expand('318', '323')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">Paste</font><font class="Normal"> {</font></br></div>
<div id="319" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal"> = </font><font class="Function">shift</font><font class="Normal">;</font></br></div>
<div id="320" class="line"><div id="320f" class="fold" onclick="block_fold('320', '322')">-</div><div id="320e" class="fold" onclick="block_expand('320', '322')" style="display:none;">+</div>
<font class="Normal"> </font><font class="Keyword">unless</font><font class="Normal"> (</font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">Broadcast</font><font class="Normal">(</font><font class="Operator">'</font><font class="String">paste</font><font class="Operator">'</font><font class="Normal">)) {</font></br></div>
<div id="321" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">SUPER</font><font class="Normal">::</font><font class="DataType">Paste</font><font class="Normal">;</font></br></div>
<div id="322" class="line"><div class="fold"> </div>
<font class="Normal"> }</font></br></div>
<div id="323" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="324" class="line"><div class="fold"> </div>
</br></div>
<div id="325" class="line"><div id="325f" class="fold" onclick="block_fold('325', '336')">-</div><div id="325e" class="fold" onclick="block_expand('325', '336')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">Plugin</font><font class="Normal"> {</font></br></div>
<div id="326" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal"> = </font><font class="Function">shift</font><font class="Normal">;</font></br></div>
<div id="327" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$id</font><font class="Normal"> = </font><font class="Function">shift</font><font class="Normal">;</font></br></div>
<div id="328" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$plgs</font><font class="Normal"> = </font><font class="DataType">$self</font><font class="Normal">->{PLUGINS};</font></br></div>
<div id="329" class="line"><div id="329f" class="fold" onclick="block_fold('329', '331')">-</div><div id="329e" class="fold" onclick="block_expand('329', '331')" style="display:none;">+</div>
<font class="Normal"> </font><font class="Keyword">unless</font><font class="Normal"> (</font><font class="DataType">$id</font><font class="Normal"> =~ </font><font class="Operator">/</font><font class="Char">^</font><font class="BaseN">\d</font><font class="Char">+$</font><font class="Operator">/</font><font class="Normal">) {</font></br></div>
<div id="330" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$id</font><font class="Normal"> = </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">FindPluginId</font><font class="Normal">(</font><font class="DataType">$id</font><font class="Normal">);</font></br></div>
<div id="331" class="line"><div class="fold"> </div>
<font class="Normal"> }</font></br></div>
<div id="332" class="line"><div id="332f" class="fold" onclick="block_fold('332', '334')">-</div><div id="332e" class="fold" onclick="block_expand('332', '334')" style="display:none;">+</div>
<font class="Normal"> </font><font class="Keyword">if</font><font class="Normal"> (</font><font class="DataType">@_</font><font class="Normal">) { </font></br></div>
<div id="333" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">->{PLUGINS}->[</font><font class="DataType">$id</font><font class="Normal">] = </font><font class="Function">shift</font><font class="Normal">; </font></br></div>
<div id="334" class="line"><div class="fold"> </div>
<font class="Normal"> }</font></br></div>
<div id="335" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">return</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">->{PLUGINS}->[</font><font class="DataType">$id</font><font class="Normal">];</font></br></div>
<div id="336" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="337" class="line"><div class="fold"> </div>
</br></div>
<div id="338" class="line"><div id="338f" class="fold" onclick="block_fold('338', '348')">-</div><div id="338e" class="fold" onclick="block_expand('338', '348')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">Receive</font><font class="Normal"> {</font></br></div>
<div id="339" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal"> = </font><font class="Function">shift</font><font class="Normal">;</font></br></div>
<div id="340" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$name</font><font class="Normal"> = </font><font class="Function">shift</font><font class="Normal">;</font></br></div>
<div id="341" class="line"><div class="fold"> </div>
<font class="Comment"># if ($debug) { print "received $name\n"; print Dumper $self->{COMMANDS} }</font></br></div>
<div id="342" class="line"><div id="342f" class="fold" onclick="block_fold('342', '346')">-</div><div id="342e" class="fold" onclick="block_expand('342', '346')" style="display:none;">+</div>
<font class="Normal"> </font><font class="Keyword">if</font><font class="Normal"> (</font><font class="Function">exists</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">->{COMMANDS}->{</font><font class="DataType">$name</font><font class="Normal">}) {</font></br></div>
<div id="343" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">if</font><font class="Normal"> (</font><font class="DataType">$debug</font><font class="Normal">) { </font><font class="Function">print</font><font class="Normal"> </font><font class="Operator">"</font><font class="SpecialString">executing </font><font class="DataType">$name</font><font class="Char">\n</font><font class="Operator">"</font><font class="Normal"> }</font></br></div>
<div id="344" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$cmd</font><font class="Normal"> = </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">Command</font><font class="Normal">(</font><font class="DataType">$name</font><font class="Normal">);</font></br></div>
<div id="345" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">return</font><font class="Normal"> &</font><font class="DataType">$cmd</font><font class="Normal">(</font><font class="DataType">$self</font><font class="Normal">, </font><font class="DataType">@_</font><font class="Normal">);</font></br></div>
<div id="346" class="line"><div class="fold"> </div>
<font class="Normal"> }</font></br></div>
<div id="347" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">return</font><font class="Normal"> </font><font class="DecVal">0</font></br></div>
<div id="348" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="349" class="line"><div class="fold"> </div>
</br></div>
<div id="350" class="line"><div id="350f" class="fold" onclick="block_fold('350', '355')">-</div><div id="350e" class="fold" onclick="block_expand('350', '355')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">Redo</font><font class="Normal"> {</font></br></div>
<div id="351" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal"> = </font><font class="Function">shift</font><font class="Normal">;</font></br></div>
<div id="352" class="line"><div id="352f" class="fold" onclick="block_fold('352', '354')">-</div><div id="352e" class="fold" onclick="block_expand('352', '354')" style="display:none;">+</div>
<font class="Normal"> </font><font class="Keyword">unless</font><font class="Normal"> (</font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">Broadcast</font><font class="Normal">(</font><font class="Operator">'</font><font class="String">redo</font><font class="Operator">'</font><font class="Normal">)) {</font></br></div>
<div id="353" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">SUPER</font><font class="Normal">::</font><font class="DataType">Redo</font><font class="Normal">;</font></br></div>
<div id="354" class="line"><div class="fold"> </div>
<font class="Normal"> }</font></br></div>
<div id="355" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="356" class="line"><div class="fold"> </div>
</br></div>
<div id="357" class="line"><div id="357f" class="fold" onclick="block_fold('357', '361')">-</div><div id="357e" class="fold" onclick="block_expand('357', '361')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">RegisterPlugin</font><font class="Normal"> {</font></br></div>
<div id="358" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> (</font><font class="DataType">$self</font><font class="Normal">, </font><font class="DataType">$plug</font><font class="Normal">) = </font><font class="DataType">@_</font><font class="Normal">;</font></br></div>
<div id="359" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$pl</font><font class="Normal"> = </font><font class="DataType">$self</font><font class="Normal">->{PLUGINS};</font></br></div>
<div id="360" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Function">push</font><font class="Normal"> </font><font class="DataType">@$pl</font><font class="Normal">, </font><font class="DataType">$plug</font><font class="Normal">;</font></br></div>
<div id="361" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="362" class="line"><div class="fold"> </div>
</br></div>
<div id="363" class="line"><div id="363f" class="fold" onclick="block_fold('363', '369')">-</div><div id="363e" class="fold" onclick="block_expand('363', '369')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">Remove</font><font class="Normal"> {</font></br></div>
<div id="364" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal"> = </font><font class="Function">shift</font><font class="Normal">;</font></br></div>
<div id="365" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">@call</font><font class="Normal"> = </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">Remove2Call</font><font class="Normal">(</font><font class="DataType">@_</font><font class="Normal">);</font></br></div>
<div id="366" class="line"><div id="366f" class="fold" onclick="block_fold('366', '368')">-</div><div id="366e" class="fold" onclick="block_expand('366', '368')" style="display:none;">+</div>
<font class="Normal"> </font><font class="Keyword">unless</font><font class="Normal"> (</font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">Broadcast</font><font class="Normal">(</font><font class="DataType">@call</font><font class="Normal">)) {</font></br></div>
<div id="367" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">SUPER</font><font class="Normal">::</font><font class="DataType">Remove</font><font class="Normal">(</font><font class="DataType">@_</font><font class="Normal">);</font></br></div>
<div id="368" class="line"><div class="fold"> </div>
<font class="Normal"> }</font></br></div>
<div id="369" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="370" class="line"><div class="fold"> </div>
</br></div>
<div id="371" class="line"><div id="371f" class="fold" onclick="block_fold('371', '377')">-</div><div id="371e" class="fold" onclick="block_expand('371', '377')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">Remove2Call</font><font class="Normal"> {</font></br></div>
<div id="372" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> (</font><font class="DataType">$self</font><font class="Normal">, </font><font class="DataType">$begin</font><font class="Normal">, </font><font class="DataType">$end</font><font class="Normal">) = </font><font class="DataType">@_</font><font class="Normal">;</font></br></div>
<div id="373" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$sel</font><font class="Normal"> = </font><font class="DecVal">0</font><font class="Normal">;</font></br></div>
<div id="374" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> (</font><font class="DataType">$selb</font><font class="Normal">, </font><font class="DataType">$sele</font><font class="Normal">) = </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">GetSelection</font><font class="Normal">;</font></br></div>
<div id="375" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">if</font><font class="Normal"> ((</font><font class="DataType">$selb</font><font class="Normal"> </font><font class="Operator">eq</font><font class="Normal"> </font><font class="DataType">$begin</font><font class="Normal">) </font><font class="Operator">and</font><font class="Normal"> (</font><font class="DataType">$sele</font><font class="Normal"> </font><font class="Operator">eq</font><font class="Normal"> </font><font class="DataType">$end</font><font class="Normal">)) { </font><font class="DataType">$sel</font><font class="Normal"> = </font><font class="DecVal">1</font><font class="Normal"> }</font></br></div>
<div id="376" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">return</font><font class="Normal"> (</font><font class="Operator">'</font><font class="String">remove</font><font class="Operator">'</font><font class="Normal">, </font><font class="DataType">$begin</font><font class="Normal">, </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">GetRange</font><font class="Normal">(</font><font class="DataType">$begin</font><font class="Normal">, </font><font class="DataType">$end</font><font class="Normal">), </font><font class="DataType">$sel</font><font class="Normal">)</font></br></div>
<div id="377" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="378" class="line"><div class="fold"> </div>
</br></div>
<div id="379" class="line"><div id="379f" class="fold" onclick="block_fold('379', '385')">-</div><div id="379e" class="fold" onclick="block_expand('379', '385')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">Replace</font><font class="Normal"> {</font></br></div>
<div id="380" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal"> = </font><font class="Function">shift</font><font class="Normal">;</font></br></div>
<div id="381" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">@call</font><font class="Normal"> = </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">Replace2Call</font><font class="Normal">(</font><font class="DataType">@_</font><font class="Normal">);</font></br></div>
<div id="382" class="line"><div id="382f" class="fold" onclick="block_fold('382', '384')">-</div><div id="382e" class="fold" onclick="block_expand('382', '384')" style="display:none;">+</div>
<font class="Normal"> </font><font class="Keyword">unless</font><font class="Normal"> (</font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">Broadcast</font><font class="Normal">(</font><font class="DataType">@call</font><font class="Normal">)) {</font></br></div>
<div id="383" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">SUPER</font><font class="Normal">::</font><font class="DataType">Replace</font><font class="Normal">(</font><font class="DataType">@_</font><font class="Normal">);</font></br></div>
<div id="384" class="line"><div class="fold"> </div>
<font class="Normal"> }</font></br></div>
<div id="385" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="386" class="line"><div class="fold"> </div>
</br></div>
<div id="387" class="line"><div id="387f" class="fold" onclick="block_fold('387', '393')">-</div><div id="387e" class="fold" onclick="block_expand('387', '393')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">Replace2Call</font><font class="Normal"> {</font></br></div>
<div id="388" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> (</font><font class="DataType">$self</font><font class="Normal">, </font><font class="DataType">$begin</font><font class="Normal">, </font><font class="DataType">$end</font><font class="Normal">, </font><font class="DataType">$txt</font><font class="Normal">) = </font><font class="DataType">@_</font><font class="Normal">;</font></br></div>
<div id="389" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$sel</font><font class="Normal"> = </font><font class="DecVal">0</font><font class="Normal">;</font></br></div>
<div id="390" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> (</font><font class="DataType">$selb</font><font class="Normal">, </font><font class="DataType">$sele</font><font class="Normal">) = </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">GetSelection</font><font class="Normal">;</font></br></div>
<div id="391" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">if</font><font class="Normal"> ((</font><font class="DataType">$selb</font><font class="Normal"> </font><font class="Operator">eq</font><font class="Normal"> </font><font class="DataType">$begin</font><font class="Normal">) </font><font class="Operator">and</font><font class="Normal"> (</font><font class="DataType">$sele</font><font class="Normal"> </font><font class="Operator">eq</font><font class="Normal"> </font><font class="DataType">$end</font><font class="Normal">)) { </font><font class="DataType">$sel</font><font class="Normal"> = </font><font class="DecVal">1</font><font class="Normal"> }</font></br></div>
<div id="392" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">return</font><font class="Normal"> (</font><font class="Operator">'</font><font class="String">replace</font><font class="Operator">'</font><font class="Normal">, </font><font class="DataType">$begin</font><font class="Normal">, </font><font class="DataType">$txt</font><font class="Normal">, </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">GetRange</font><font class="Normal">(</font><font class="DataType">$begin</font><font class="Normal">, </font><font class="DataType">$end</font><font class="Normal">), </font><font class="DataType">$sel</font><font class="Normal">)</font></br></div>
<div id="393" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="394" class="line"><div class="fold"> </div>
</br></div>
<div id="395" class="line"><div id="395f" class="fold" onclick="block_fold('395', '400')">-</div><div id="395e" class="fold" onclick="block_expand('395', '400')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">SaveFile</font><font class="Normal"> {</font></br></div>
<div id="396" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal"> = </font><font class="Function">shift</font><font class="Normal">;</font></br></div>
<div id="397" class="line"><div id="397f" class="fold" onclick="block_fold('397', '399')">-</div><div id="397e" class="fold" onclick="block_expand('397', '399')" style="display:none;">+</div>
<font class="Normal"> </font><font class="Keyword">unless</font><font class="Normal"> (</font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">Broadcast</font><font class="Normal">(</font><font class="Operator">'</font><font class="String">save</font><font class="Operator">'</font><font class="Normal">, </font><font class="DataType">@_</font><font class="Normal">)) {</font></br></div>
<div id="398" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">SUPER</font><font class="Normal">::</font><font class="DataType">SaveFile</font><font class="Normal">(</font><font class="DataType">@_</font><font class="Normal">);</font></br></div>
<div id="399" class="line"><div class="fold"> </div>
<font class="Normal"> }</font></br></div>
<div id="400" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="401" class="line"><div class="fold"> </div>
</br></div>
<div id="402" class="line"><div id="402f" class="fold" onclick="block_fold('402', '405')">-</div><div id="402e" class="fold" onclick="block_expand('402', '405')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">NativePlugins</font><font class="Normal"> {</font></br></div>
<div id="403" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal"> = </font><font class="Function">shift</font><font class="Normal">;</font></br></div>
<div id="404" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">return</font><font class="Normal"> </font><font class="Operator">qw[</font><font class="Normal"> Highlighter KeyEchoes UndoRedo </font><font class="Operator">]</font></br></div>
<div id="405" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="406" class="line"><div class="fold"> </div>
</br></div>
<div id="407" class="line"><div id="407f" class="fold" onclick="block_fold('407', '410')">-</div><div id="407e" class="fold" onclick="block_expand('407', '410')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">Syntax</font><font class="Normal"> {</font></br></div>
<div id="408" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal"> = </font><font class="Function">shift</font><font class="Normal">;</font></br></div>
<div id="409" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">return</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">Broadcast</font><font class="Normal">(</font><font class="Operator">'</font><font class="String">syntax</font><font class="Operator">'</font><font class="Normal">, </font><font class="DataType">@_</font><font class="Normal">);</font></br></div>
<div id="410" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="411" class="line"><div class="fold"> </div>
</br></div>
<div id="412" class="line"><div id="412f" class="fold" onclick="block_fold('412', '417')">-</div><div id="412e" class="fold" onclick="block_expand('412', '417')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">Undo</font><font class="Normal"> {</font></br></div>
<div id="413" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal"> = </font><font class="Function">shift</font><font class="Normal">;</font></br></div>
<div id="414" class="line"><div id="414f" class="fold" onclick="block_fold('414', '416')">-</div><div id="414e" class="fold" onclick="block_expand('414', '416')" style="display:none;">+</div>
<font class="Normal"> </font><font class="Keyword">unless</font><font class="Normal"> (</font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">Broadcast</font><font class="Normal">(</font><font class="Operator">'</font><font class="String">undo</font><font class="Operator">'</font><font class="Normal">)) {</font></br></div>
<div id="415" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">SUPER</font><font class="Normal">::</font><font class="DataType">Undo</font><font class="Normal">;</font></br></div>
<div id="416" class="line"><div class="fold"> </div>
<font class="Normal"> }</font></br></div>
<div id="417" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="418" class="line"><div class="fold"> </div>
</br></div>
<div id="419" class="line"><div id="419f" class="fold" onclick="block_fold('419', '425')">-</div><div id="419e" class="fold" onclick="block_expand('419', '425')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">WriteText</font><font class="Normal"> {</font></br></div>
<div id="420" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">$self</font><font class="Normal"> = </font><font class="Function">shift</font><font class="Normal">;</font></br></div>
<div id="421" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> </font><font class="DataType">@call</font><font class="Normal"> = </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">WriteText2Call</font><font class="Normal">(</font><font class="DataType">@_</font><font class="Normal">);</font></br></div>
<div id="422" class="line"><div id="422f" class="fold" onclick="block_fold('422', '424')">-</div><div id="422e" class="fold" onclick="block_expand('422', '424')" style="display:none;">+</div>
<font class="Normal"> </font><font class="Keyword">unless</font><font class="Normal"> (</font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">Broadcast</font><font class="Normal">(</font><font class="DataType">@call</font><font class="Normal">)) {</font></br></div>
<div id="423" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">SUPER</font><font class="Normal">::</font><font class="DataType">WriteText</font><font class="Normal">(</font><font class="DataType">@_</font><font class="Normal">);</font></br></div>
<div id="424" class="line"><div class="fold"> </div>
<font class="Normal"> }</font></br></div>
<div id="425" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="426" class="line"><div class="fold"> </div>
</br></div>
<div id="427" class="line"><div id="427f" class="fold" onclick="block_fold('427', '430')">-</div><div id="427e" class="fold" onclick="block_expand('427', '430')" style="display:none;">+</div>
<font class="Keyword">sub </font><font class="Function">WriteText2Call</font><font class="Normal"> {</font></br></div>
<div id="428" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">my</font><font class="Normal"> (</font><font class="DataType">$self</font><font class="Normal">, </font><font class="DataType">$txt</font><font class="Normal">) = </font><font class="DataType">@_</font><font class="Normal">;</font></br></div>
<div id="429" class="line"><div class="fold"> </div>
<font class="Normal"> </font><font class="Keyword">return</font><font class="Normal"> (</font><font class="Operator">'</font><font class="String">write</font><font class="Operator">'</font><font class="Normal">, </font><font class="DataType">$self</font><font class="Normal">-></font><font class="DataType">GetInsertionPoint</font><font class="Normal">, </font><font class="DataType">$txt</font><font class="Normal">, </font><font class="DecVal">0</font><font class="Normal">);</font></br></div>
<div id="430" class="line"><div class="fold"> </div>
<font class="Normal">}</font></br></div>
<div id="431" class="line"><div class="fold"> </div>
</br></div>
<div id="432" class="line"><div class="fold"> </div>
</br></div>
<div id="433" class="line"><div class="fold"> </div>
<font class="DecVal">1</font><font class="Normal">;</font></br></div>
<div id="434" class="line"><div class="fold"> </div>
<font class="Keyword">__END__</font></br></div>
</div>
</body>
</html>