157 |
del { color: #c88 } |
del { color: #c88 } |
158 |
|); |
|); |
159 |
|
|
160 |
|
my $max_path_len = 0; |
161 |
|
my $path_count; |
162 |
|
|
163 |
$self->iterator( sub { |
$self->iterator( sub { |
164 |
my $e = shift; |
my $e = shift; |
165 |
|
|
188 |
} else { |
} else { |
189 |
push @files, $path; |
push @files, $path; |
190 |
} |
} |
191 |
|
|
192 |
|
$max_path_len = length $path if length $path > $max_path_len; |
193 |
|
$path_count->{$path}++; |
194 |
} |
} |
195 |
|
|
196 |
$html .= qq| |
$html .= qq| |
202 |
| |
| |
203 |
. join("<br>\n", |
. join("<br>\n", |
204 |
map { |
map { |
205 |
qq|<a href="?repository=$repository;path=$_">$_</a>| |
my $path = $_; |
206 |
|
$path =~ s{<[^>]+>}{}g; |
207 |
|
qq|<a href="?repository=$repository;path=$path" title="$path ##">$_</a>| |
208 |
} @files |
} @files |
209 |
) |
) |
210 |
. qq| |
. qq| |
215 |
|
|
216 |
}); |
}); |
217 |
|
|
218 |
|
$self->add_css(qq| |
219 |
|
.files { |
220 |
|
width: ${max_path_len}ex; |
221 |
|
} |
222 |
|
|); |
223 |
|
|
224 |
|
$html =~ s[title="(\S+) ##"]['title="' . $path_count->{$1} . '"']gse; |
225 |
|
|
226 |
return $html; |
return $html; |
227 |
} |
} |
228 |
|
|