Use ui-lib for tables

This commit is contained in:
Jamie Cameron
2023-12-16 11:48:38 -08:00
parent ac26b356ac
commit c2c548a3d6

View File

@@ -69,19 +69,16 @@ return ( \@rv );
sub edit_LogFormat sub edit_LogFormat
{ {
local $rv = "<table border>\n". my $rv = &ui_columns_start([ $text{'mod_log_nickname'},
"<tr $tb> <td><b>$text{'mod_log_nickname'}</b></td> ". $text{'mod_log_fmt'} ]);
"<td><b>$text{'mod_log_fmt'}</b></td> </tr>\n"; my $i = 0;
local $i = 0; foreach my $f (@{$_[0]}, { }) {
foreach $f (@{$_[0]}, { }) { my @w = @{$f->{'words'}};
local @w = @{$f->{'words'}}; $rv .= &ui_columns_row([ &ui_textbox("LogFormat_n_$i", $w[0], 15),
$rv .= "<tr $cb>\n"; &ui_textbox("LogFormat_f_$i", $w[1], 35) ]);
$rv .= "<td><input name=LogFormat_n_$i size=15 value='$w[0]'></td>\n";
$rv .= "<td><input name=LogFormat_f_$i size=35 value='$w[1]'></td>\n";
$rv .= "</tr>\n";
$i++; $i++;
} }
$rv .= "</table>\n"; $rv .= &ui_columns_end();
return (2, $text{'mod_log_format'}, $rv); return (2, $text{'mod_log_format'}, $rv);
} }
sub save_LogFormat sub save_LogFormat