X-Git-Url: http://www.chiark.greenend.org.uk/ucgi/~yarrgweb/git?p=ypp-sc-tools.db-live.git;a=blobdiff_plain;f=yarrg%2Fweb%2Fqtextstring;h=d57f863490fda37637957afd0e988be1e1c4f14d;hp=639e9abf25bc3a3db06a091f776138e856c32092;hb=0759b42dbad7715339b0dceb5e910ea7698fa90a;hpb=742ec1631db983f22545c9c7d6d573865bdc85fa diff --git a/yarrg/web/qtextstring b/yarrg/web/qtextstring index 639e9ab..d57f863 100644 --- a/yarrg/web/qtextstring +++ b/yarrg/web/qtextstring @@ -42,6 +42,7 @@ $thingstring $emsgstore $perresult $prefix => 'ts'; +$helpref => undef; <%perl> my $stringval= $qa->{$thingstring}; @@ -97,7 +98,7 @@ register_onload(<%$p%>Needed); id="<% $thingstring %>" name="<% $thingstring %>" onchange="<%$p%>Needed();" onkeyup="<%$p%>Later();" value="<% $stringval |h %>" - > + ><% defined($helpref) ? "[?]" : '' %>