| 33 |
|
my($cvs2clargs) = "--stdout -r -b -t -w -U $cvsroot/CVSROOT/users -l \"-d'\>$firstdate'\" -g \"-d$cvsroot\" -g \"-Q\""; |
| 34 |
|
my($updatecmd) = "/home/sites/www.i-scream.org.uk/bin/fullcvsupdate.sh $modulelist"; |
| 35 |
|
my($logcmd) = "cd /home/sites/www.i-scream.org.uk/cvsscripttemp && $cvs2clpath $cvs2clargs"; |
| 36 |
+ |
my($leftinc) = "/home/sites/www.i-scream.org.uk/web/left.inc"; |
| 37 |
|
|
| 38 |
|
print "Content-type: text/html\n\n"; |
| 39 |
|
|
| 48 |
|
|
| 49 |
|
<body bgcolor="#ffffff" link="#ffffff" alink="#ffffff" vlink="#ffffff" text="#000066"> |
| 50 |
|
|
| 51 |
+ |
<table border="0" cellpadding="2" cellspacing="2"> |
| 52 |
+ |
<tr> |
| 53 |
+ |
<td valign="top"> |
| 54 |
+ |
|
| 55 |
+ |
END |
| 56 |
+ |
print `$leftinc`; |
| 57 |
+ |
print <<"END"; |
| 58 |
+ |
|
| 59 |
+ |
</td> |
| 60 |
+ |
<td valign="top"> |
| 61 |
+ |
|
| 62 |
+ |
|
| 63 |
|
<a href="http://www.i-scream.org.uk"><img border="0" src="../i-scream.gif"></a> |
| 64 |
|
|
| 65 |
|
<h2>$heading</h2> |
| 104 |
|
} |
| 105 |
|
|
| 106 |
|
print <<"END"; |
| 107 |
+ |
|
| 108 |
+ |
</td> |
| 109 |
+ |
</tr> |
| 110 |
+ |
</table> |
| 111 |
|
|
| 112 |
|
</body> |
| 113 |
|
|