version 1.6, 2002/08/21 17:18:08
|
version 1.7, 2002/09/11 15:01:43
|
Line 243 ENDFORM
|
Line 243 ENDFORM
|
'<a href="/adm/announcements?month='.$pm.'&year='.$py.'">Previous Month</a> '. |
'<a href="/adm/announcements?month='.$pm.'&year='.$py.'">Previous Month</a> '. |
'<a href="/adm/announcements?month='.$fm.'&year='.$fy.'">Next Month</a><p>'. |
'<a href="/adm/announcements?month='.$fm.'&year='.$fy.'">Next Month</a><p>'. |
'<table border="2" cols="7" rows="5"><tr><th>Sun</th><th>Mon</th>'. |
'<table border="2" cols="7" rows="5"><tr><th>Sun</th><th>Mon</th>'. |
'<th>Tue</th><th>Wed</th><th>Thu</th><th>Fri</th><th>Sat</th>'); |
'<th>Tue</th><th>Wed</th><th>Thu</th><th>Fri</th><th>Sat</th></tr>'); |
|
|
my $tk=&Apache::loncommon::maketime(%firstday); |
my $tk=&Apache::loncommon::maketime(%firstday); |
my $outp; |
my $outp; |
Line 268 ENDFORM
|
Line 268 ENDFORM
|
$r->print('</tr>'); |
$r->print('</tr>'); |
} |
} |
# ------------------------------------------------------------------- End table |
# ------------------------------------------------------------------- End table |
|
$r->print('</table>'); |
if ($allowed) { $r->print('</form>'); } |
if ($allowed) { $r->print('</form>'); } |
$r->print('</table><p>'. |
$r->print('<p>'. |
'<a href="/adm/announcements?month='.$pm.'&year='.$py.'">Previous Month</a> '. |
'<a href="/adm/announcements?month='.$pm.'&year='.$py.'">Previous Month</a> '. |
'<a href="/adm/announcements?month='.$fm.'&year='.$fy.'">Next Month</a><p>'. |
'<a href="/adm/announcements?month='.$fm.'&year='.$fy.'">Next Month</a><p>'. |
'</body></html>'); |
'</body></html>'); |