</%doc>
<%args>
+$qa => $m->caller_args(1)->{'qa'}
+$dbh
$thingstring
$emsgstore
$perresult
-$qa => $m->caller_args(1)->{'qa'}
</%args>
<%perl>
my $stringval= $qa->{$thingstring};
ts_request= false;
ts_Request();
}
-window.onload= ts_Needed;
+register_onload(ts_Needed);
</&script>
<input type="text" <% $m->content %>