--- quos.cgi 2004/10/28 14:35:02 1.7
+++ quos.cgi 2004/10/28 15:37:43 1.8
@@ -294,27 +294,37 @@
$html .= "<table>\n";
$html .= " <tr>\n";
$html .= " <td>";
-$html .= " " . $cgi->popup_menu(
- -name => $nr_cols,
+$html .= " " . "← " . $cgi->popup_menu(
+ -name => "nr_cols",
-values => [ 0..9 ],
-default => $nr_cols,
) . "\n";
-$html .= " </td>\n";
-$html .= " <td>\n";
-$html .= " " . $cgi->popup_menu(
- -name => $nr_rows,
+$html .= " " . "↓ " . $cgi->popup_menu(
+ -name => "nr_rows",
-values => [1..9],
-default => $nr_rows,
) . "\n";
$html .= " </td>\n";
$html .= " <td>\n";
-$html .= " " . $cgi->submit('act_matrix_upd', 'update') . "\n";
+$html .= " " . $cgi->submit(
+ -name => 'act_matrix_upd',
+ -value => 'update',
+ -class => 'update'
+) . "\n";
$html .= " </td>\n";
$html .= " <td>\n";
-$html .= " " . $cgi->submit('act_matrix_clear', 'clear') . "\n";
+$html .= " " . $cgi->submit(
+ -name => 'act_matrix_clear',
+ -value => 'clear',
+ -class => 'clear'
+) . "\n";
$html .= " </td>\n";
$html .= " <td>\n";
-$html .= " " . $cgi->submit('act_matrix_submit', 'submit') . "\n";
+$html .= " " . $cgi->submit(
+ -name => 'act_matrix_submit',
+ -value => 'submit',
+ -class => 'submit'
+) . "\n";
$html .= " </td>\n";
$html .= " </tr>\n";
$html .= "</table>\n";
@@ -330,27 +340,45 @@
-name => "namexx",
-values => ['HTML: by-group', 'HTML: by-xxx', 'TXT: by-group'], # FIXME
-default => 'HTML: by-group', # FIXME
- -class => 'default',
+ -class => 'nameget',
) . "\n";
$html .= " </td>\n";
$html .= " <td>\n";
-$html .= " " . $cgi->submit('act_matrix_clear', 'load') . "\n";
+$html .= " " . $cgi->submit(
+ -name => 'act_matrix_clear',
+ -value => 'load',
+ -class => 'load'
+) . "\n";
$html .= " </td>\n";
$html .= " <td>\n";
-$html .= " " . $cgi->submit('act_matrix_submit', 'delete') . "\n";
+$html .= " " . $cgi->submit(
+ -name => 'act_matrix_submit',
+ -value => 'delete',
+ -class => 'delete'
+) . "\n";
$html .= " </td>\n";
$html .= " </tr>\n";
$html .= " <tr>\n";
$html .= " <td>\n";
$html .= " " . $cgi->textfield(
- -name =>'name_persquery'
+ -name => 'name_persquery',
+ -value => '',
+ -class => 'nameset'
) . "\n";
$html .= " </td>\n";
$html .= " <td>\n";
-$html .= " " . $cgi->submit('act_matrix_clear', 'save') . "\n";
+$html .= " " . $cgi->submit(
+ -name => 'act_matrix_clear',
+ -value => 'save',
+ -class => 'save'
+) . "\n";
$html .= " </td>\n";
$html .= " <td>\n";
-$html .= " " . $cgi->submit('act_matrix_hyperlink', 'hyperlink') . "\n";
+$html .= " " . $cgi->submit(
+ -name => 'act_matrix_hyperlink',
+ -value => 'hyperlink',
+ -class => 'hyperlink'
+) . "\n";
$html .= " </td>\n";
$html .= " </tr>\n";
$html .= "</table>\n";
|