push(@cols, "<a href=\"http_access.cgi?index=$h->{'index'}\">".
"$v[0]</a>");
push(@cols, &html_escape(join(' ', @v[1..$#v])));
- local $mover;
- if ($hc != @http-1) {
- $mover .= "<a href=\"move_http.cgi?$hc+1\">".
- "<img src=images/down.gif border=0></a>";
- }
- else {
- $mover .= "<img src=images/gap.gif>";
- }
- if ($hc != 0) {
- $mover .= "<a href=\"move_http.cgi?$hc+-1\">".
- "<img src=images/up.gif border=0></a>";
- }
- else {
- $mover .= "<img src=images/gap.gif>";
- }
+ local $mover = &ui_up_down_arrows(
+ "move_http.cgi?$hc+-1",
+ "move_http.cgi?$hc+1",
+ $hc != 0,
+ $hc != @http-1
+ );
push(@cols, $mover);
print &ui_checked_columns_row(\@cols, \@tds, "d",$h->{'index'});
$hc++;
push(@cols, "<a href=\"icp_access.cgi?index=$i->{'index'}\">".
"$v[0]</a>");
push(@cols, &html_escape(join(' ', @v[1..$#v])));
- local $mover;
- if ($hc != @icp-1) {
- $mover .= "<a href=\"move_icp.cgi?$hc+1\">".
- "<img src=images/down.gif border=0></a>";
- }
- else {
- $mover .= "<img src=images/gap.gif>";
- }
- if ($hc != 0) {
- $mover .= "<a href=\"move_icp.cgi?$hc+-1\">".
- "<img src=images/up.gif border=0></a>";
- }
- else {
- $mover .= "<img src=images/gap.gif>";
- }
+ local $mover = &ui_up_down_arrows(
+ "move_icp.cgi?$ic+-1",
+ "move_icp.cgi?$ic+1",
+ $ic != 0,
+ $ic != @icp-1);
push(@cols, $mover);
print &ui_checked_columns_row(\@cols, \@tds, "d",$i->{'index'});
$ic++;
local $openerid = "hiddenopener_$name";
local $defimg = $status ? "open.gif" : "closed.gif";
local $defclass = $status ? 'opener_shown' : 'opener_hidden';
-$rv .= "<a href=\"javascript:hidden_opener('$divid', '$openerid')\" id='$openerid'><img border=0 src='$gconfig{'webprefix'}/images/$defimg'></a>\n";
+$rv .= "<a href=\"javascript:hidden_opener('$divid', '$openerid')\" id='$openerid'><img border=0 src='$gconfig{'webprefix'}/images/$defimg' alt='*'></a>\n";
$rv .= "<a href=\"javascript:hidden_opener('$divid', '$openerid')\">$title</a><br>\n";
$rv .= "<div class='$defclass' id='$divid'>\n";
return $rv;
return $rv;
}
+# ui_up_down_arrows(uplink, downlink, up-show, down-show)
+# Returns HTML for moving some objects in a table up or down
+sub ui_up_down_arrows
+{
+return &theme_ui_up_down_arrows(@_) if (defined(&theme_ui_up_down_arrows));
+local ($uplink, $downlink, $upshow, $downshow) = @_;
+local $mover;
+local $imgdir = "$gconfig{'webprefix'}/images";
+if ($downshow) {
+ $mover .= "<a href=\"$downlink\">".
+ "<img src=$imgdir/movedown.gif border=0></a>";
+ }
+else {
+ $mover .= "<img src=$imgdir/movegap.gif>";
+ }
+if ($upshow) {
+ $mover .= "<a href=\"$uplink\">".
+ "<img src=$imgdir/moveup.gif border=0></a>";
+ }
+else {
+ $mover .= "<img src=$imgdir/movegap.gif>";
+ }
+return $mover;
+}
+
####################### javascript functions
# js_disable_input(&disable-inputs, &enable-inputs, [tag])