(Insert label here)
Patch by afuna.
diffs (28 lines):
diff -r 863165dfc54e -r 4adaa4a856ec cgi-bin/LJ/S2.pm
--- a/cgi-bin/LJ/S2.pm Fri Sep 11 13:47:03 2009 +0000
+++ b/cgi-bin/LJ/S2.pm Fri Sep 11 14:20:57 2009 +0000
@@ -3657,8 +3657,8 @@ sub EntryPage__print_multiform_actionlin
my ($ctx, $this) = @_;
return unless $this->{'multiform_on'};
my $pr = $ctx->[S2::PROPS];
- $S2::pout->($pr->{'text_multiform_des'} . "\n" .
- LJ::html_select({'name' => 'mode' },
+ $S2::pout->( LJ::labelfy( 'multiform_mode', $pr->{text_multiform_des} ) .
"\n" .
+ LJ::html_select( { name => 'mode', id => 'multiform_mode' },
"" => "",
map { $_ => $pr->{"text_multiform_opt_$_"} }
qw(unscreen screen delete deletespam)) . "\n" .
diff -r 863165dfc54e -r 4adaa4a856ec htdocs/talkread.bml
--- a/htdocs/talkread.bml Fri Sep 11 13:47:03 2009 +0000
+++ b/htdocs/talkread.bml Fri Sep 11 14:20:57 2009 +0000
@@ -837,8 +837,8 @@ body<=
$ret .= "<div align='center'>" . LJ::make_qr_target('bottom') .
"</div>" if $remote;
if ($showmultiform && $multiform_selects) {
- $ret .= "<p>$ML{'.talkmulti.des'} ";
- $ret .= LJ::html_select({'name' => 'mode' },
+ $ret .= "<p><label
for='multiform_mode'>$ML{'.talkmulti.des'}</label>";
+ $ret .= LJ::html_select( { name => 'mode', id =>
'multiform_mode' },
'' => '',
'unscreen' =>
$ML{'.talkmulti.unscreen'},
'screen' =>
$ML{'.talkmulti.screen'},
_______________________________________________
dw-changelog mailing list
[email protected]
http://lists.dwscoalition.org/mailman/listinfo/dw-changelog