hiifong/pmd
1
0
Fork 0
forked from phoedos/pmd
Code Pull Requests Activity

Added anchors

Browse Source 
git-svn-id: https://pmd.svn.sourceforge.net/svnroot/pmd/trunk@2407 51baf565-9d33-0410-a72c-fc3788e3496d
This commit is contained in:
Tom Copeland
2003-11-20 17:32:04 +00:00
parent dd7418951d
commit dccd2f398d
2 changed files with 7 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

1
pmd-web/src/upload_webpmd.sh
View File

@ -1,2 +1,3 @@
#!/bin/bash
scp webpmd.pl tomcopeland@pmd.sf.net:/home/groups/p/pm/pmd/cgi-bin/
scp PMD/Project.pm tomcopeland@pmd.sf.net:/home/groups/p/pm/pmd/cgi-bin/PMD/

9
pmd-web/src/webpmd.pl
View File

@ -59,7 +59,9 @@ sub loadProjectList() {
if (-e $project->getRptFile()) {
$jobLink="<a href=\"@{[$project->getRptURL]}\">@{[$project->getTitle()]}</a>";
}
$result="${result}<tr><td>${jobLink}</td><td></td><td>@{[$project->getHomePage()]}</td>";
$result="${result}\n<tr><td>${jobLink}</td>";
$result="${result}<td></td>";
$result="${result}<td><a name=\"@{[$project->getUnixName()]}\"></a>@{[$project->getHomePage()]}</td>";
$result="${result}<td>@{[$project->getNCSS()]}</td>";
my $pctg = $project->getPctg();
my $color="red";
@ -73,12 +75,13 @@ sub loadProjectList() {
$pctg = "N/A";
$color = "white";
}
$result="${result}<td align=center>@{[$project->getLines()]}</td><td bgcolor=$color align=center>$pctg</td>";
$result="${result}<td align=center>@{[$project->getLines()]}</td>";
$result="${result}<td bgcolor=$color align=center>$pctg</td>";
my $cpdLink="0";
if (-e $project->getCPDRptFile() && $project->getCPDLines() > 0) {
$cpdLink="<a href=\"@{[$project->getCPDRptURL]}\">@{[$project->getCPDLines()]}</a>";
}
$result = "${result}<td align=center>$cpdLink</td></tr>";
$result = "${result}<td align=center>$cpdLink</td></tr>\n";
}
$result="${result}</tr></table>";
return $result;