if (@ds && $#ds > 0) {
print qq{<response>
<action type='html' target='div_record' errorCode='' errorMessage='' >
- }, $out->apply(
+ }, $iconv_utf8->convert( $out->apply(
template => $template,
data => \@ds,
- ), qq{
+ ) ), qq{
-<script type='text/javascript'>
+</action>
+<action type='javascript' errorCode='' errorMessage='' >
<!--
var el = iwfGetById('div_record_nr');
if (el) el.innerHTML = '# <b>$rec</b>';
//iwfShow('div_record');
iwfOpacity('div_record', 100);
//-->
-</script>
-
</action>
</response>
};
<action type='html' target='div_record' errorCode='' errorMessage='' >
<b>Record $rec not found!</b>
-<script type='text/javascript'>
+</action>
+<action type='javascript' errorCode='' errorMessage='' >
<!--
var el = iwfGetById('div_record_nr');
- if (el) el.innerHTML = '<strike>$rec</strike>';
+ if (el) el.innerHTML = '<strike> $rec </strike>';
//-->
-</script>
-
</action>
</response>
};
if ($q->param('save_template')) {
- my $tmpl = $q->param('tt_template') || die "no template?";
+ my $tmpl = $iconv_loc->convert( $q->param('tt_template') ) || die "no template?";
+ sub _conv_js {
+ my $t = shift || return;
+ return $iconv_loc->convert(chr(hex($t)));
+ }
+ $tmpl =~ s/%u([a-fA-F0-9]{4})/_conv_js($1)/gex;
+
my $tmpl_file = $out->{'include_path'} . '/' . $template;
- write_file($tmpl_file . '.new', $iconv_loc->convert($tmpl)) || die "can't save $tmpl_file: $!";
+ write_file($tmpl_file . '.new', $tmpl) || die "can't save $tmpl_file: $!";
rename $tmpl_file . '.new', $tmpl_file || die "can't rename to $tmpl_file: $!";
print qq{<response>
<action type='html' target='div_status' errorCode='' errorMessage='' >
-$template saved
+<tt>$template</tt> saved
</action>
<action type='js'>
<!--
+iwfShow('div_status', 1);
reload_rec();
+iwfHideGentlyDelay('div_status', 2, 2000, 1);
-->
</action>
</response>
<action type='html' target='div_template' errorCode='' errorMessage='' >
<pre>}, Dumper($q->Vars), qq{</pre>
-<form name="frmEditor" action="$self" method="post"
-iwfTarget="div_status"
->
+<form name="frmEditor" action="$self" method="post" iwfTarget="div_status" >
<textarea name="tt_template" cols="80" rows="10" style="display: block;">
$tmpl
<br/>
<input type="button" name="save_template" value="Save" onclick="javascript:iwfRequest(this);" />
-<input type="checkbox" name="checkin_template" id="checkin_checkbox" label="checkin" />
-<span id="div_status" style="color: #808080;">idle</span>
+<!--
+<input type="checkbox" name="checkin_template" id="checkin_checkbox" label="checkin" /> checkin
+-->
+ <span id="div_status" style="color: #808080;">idle</span>
<input type='hidden' value='hidden post value' name='hidValue' />
</form>
</action>
+<action type='js'>
+<!--
+iwfHideGentlyDelay('div_status', 2, 2000, 1);
+-->
+</action>
</response>
};
}
function load_rec(nr) {
+ if (nr == 1) {
+ iwfHide('a_left_arr', 1);
+ } else {
+ iwfShow('a_left_arr', 1);
+ }
update_status(nr+'...');
iwfRequest( url+'/xml/?rec='+nr, 'div_record' );
iwfOpacity('div_record', 30);
}
function dec_rec() {
- rec--;
- load_rec(rec);
+ if (rec > 1) {
+ rec--;
+ load_rec(rec);
+ }
return false;
}
</div>
<div style="background: #e0e0e0; padding: 0.5em; display: block;">
- <a href="$self?rec=}, $rec - 1, qq{" onClick="return dec_rec();">⇦</a>
+ <a id="a_left_arr" href="$self?rec=}, $rec - 1, qq{" onClick="return dec_rec();">⇦</a>
<span id="div_record_nr"> none </span>
- <a href="$self?rec=}, $rec + 1, qq{" onClick="return inc_rec();">⇨</a>
- <a href="$self?rec=}, $rec, qq{" onClick="return reload_rec();">↺</a>
- <a href="#" onClick="iwfRefreshLog(); return false;">▤</a>
+ <a id="a_right_arr" href="$self?rec=}, $rec + 1, qq{" onClick="return inc_rec();">⇨</a>
+ <a id="a_reload" href="$self?rec=}, $rec, qq{" onClick="return reload_rec();">↺</a>
+ <a href="#" onClick="iwfRefreshLog(); return false;">▤</a>
</div>