phoedos/pmd
1
1
Fork 1
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

cleanups

Browse Source 
git-svn-id: https://pmd.svn.sourceforge.net/svnroot/pmd/trunk@988 51baf565-9d33-0410-a72c-fc3788e3496d
This commit is contained in:
Tom Copeland
2002-09-25 18:50:38 +00:00
parent aeacf35bac
commit c209cf4422
1 changed files with 0 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

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

@ -55,20 +55,12 @@ sub loadProjectList() {
return $result;
}
sub addProject() {
my ($title, $unixname,$moduleDirectory,$srcdir) = @_;
my $cmd="echo \"${title}:${unixname}:${moduleDirectory}:${srcdir}\" > jobs/${moduleDirectory}.txt";
`${cmd}`;
}
sub refreshReport() {
print start_html(-title=>'PMD Results', -head=>meta({-http_equiv=>'Refresh',-content=>'10;URL=http://pmd.sf.net/cgi-bin/webpmd.pl?state=refreshreport'}));
$query->p("This page will refresh with more information every 10 seconds or so");
open(FILE,"results.html");
print $query->p(<FILE>);
}
$page=param("state") || "default";
%states = (