|
Lines 191-204
Link Here
|
| 191 |
|
191 |
|
| 192 |
$catkey{$name} = $cat[0]; |
192 |
$catkey{$name} = $cat[0]; |
| 193 |
|
193 |
|
|
|
194 |
# figure out the FTP url |
| 195 |
$loc =~ s%/usr/ports/%$baseSVNWEB%; |
| 196 |
$ldesc =~ s%/usr/ports/%$baseSVNWEB%; |
| 197 |
$ldesc .= '?revision=HEAD'; |
| 198 |
|
| 194 |
foreach my $i (sort(@cat)) { |
199 |
foreach my $i (sort(@cat)) { |
| 195 |
$stats{$i}++; |
200 |
$stats{$i}++; |
| 196 |
|
201 |
|
| 197 |
# figure out the FTP url |
|
|
| 198 |
$loc =~ s%/usr/ports/%$baseSVNWEB%; |
| 199 |
$ldesc =~ s%/usr/ports/%$baseSVNWEB%; |
| 200 |
$ldesc .= '?revision=HEAD'; |
| 201 |
|
| 202 |
# The name description and maintainer |
202 |
# The name description and maintainer |
| 203 |
$name =~ s/,.*//g; |
203 |
$name =~ s/,.*//g; |
| 204 |
$name =~ s/\++//g; |
204 |
$name =~ s/\++//g; |