# | Line 33 | Line 33 | my($cvs2clpath) = "/home/sites/www.i-scream.org.uk/bin | |
---|---|---|
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 | ||
# | Line 47 | Line 48 | print <<"END"; | |
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> | |
# | Line 91 | Line 104 | foreach my $module (@modules) { | |
104 | } | |
105 | ||
106 | print <<"END"; | |
107 | + | |
108 | + | </td> |
109 | + | </tr> |
110 | + | </table> |
111 | ||
112 | </body> | |
113 |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |