Mercurial > hg > reproctool-df

comparison reproctool.cgi @ 10:de10d02dc715

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Using item images for non-IGB browsers
author Dominic Cleal <dominic@computerkb.co.uk>
date Sun, 25 Jan 2009 13:14:07 +0000
parents 6b98a17fbe22
children f749981ad862
comparison
equal deleted inserted replaced
9:6b98a17fbe22 10:de10d02dc715
120 120
121 <body> 121 <body>
122 <table> 122 <table>
123 END 123 END
124 124
125 my $igb = ($ENV{HTTP_USER_AGENT} =~ /EVE-minibrowser/i);
126
125 for my $item (@output) 127 for my $item (@output)
126 { 128 {
127 if ($col == $cols) 129 if ($col == $cols)
128 { 130 {
129 print "</tr><tr>\n"; 131 print "</tr><tr>\n";
133 my ($style, $img, $text, $link, $colour); 135 my ($style, $img, $text, $link, $colour);
134 136
135 if (defined $item->{id}) 137 if (defined $item->{id})
136 { 138 {
137 $style = "meta$item->{meta}"; 139 $style = "meta$item->{meta}";
138 $img = "typeicon:$item->{id}"; 140 if ($igb)
139 $link = "showinfo:$item->{id}"; 141 {
142 $img = "typeicon:$item->{id}";
143 $link = "showinfo:$item->{id}";
144 }
145 else
146 {
147 $img = "$img_http_path/icons/icons_items_png/64_64/icon$item->{icon}.png";
148 }
149
140 if ($item->{meta} == 4) 150 if ($item->{meta} == 4)
141 { 151 {
142 $text = $item->{name}; 152 $text = $item->{name};
143 $colour = "#FF0000"; 153 $colour = "#FF0000";
144 } 154 }