loncom/homework/outputtags.pm - diff

Return to outputtags.pm CVS log

Up to [LON-CAPA] / loncom / homework

Diff for /loncom/homework/outputtags.pm between versions 1.13 and 1.19

version 1.13, 2001/12/04 15:17:56	version 1.19, 2002/08/19 19:06:02
Line 32 use strict;	Line 32 use strict;
use Apache::lonnet;	use Apache::lonnet;
use POSIX qw(strftime);	use POSIX qw(strftime);

sub BEGIN {	BEGIN {
&Apache::lonxml::register('Apache::outputtags',('displayduedate','displaytitle'));	&Apache::lonxml::register('Apache::outputtags',('displayduedate','displaytitle'));
}	}

Line 58 sub start_displayduedate {	Line 58 sub start_displayduedate {
$result ='<table border="on"><tr><td>No due date set.</td></tr></table>';	$result ='<table border="on"><tr><td>No due date set.</td></tr></table>';
}	}
} elsif ( $target eq 'edit' ) {	} elsif ( $target eq 'edit' ) {
$result=&Apache::edit::tag_start($target,$token,	$result=&Apache::edit::tag_start($target,$token);
&Apache::lonxml::description($token));
$result.='</td></tr>';	$result.='</td></tr>';
$result.=&Apache::edit::end_table();	$result.=&Apache::edit::end_table();
}	}
Line 79 sub start_displaytitle {	Line 78 sub start_displaytitle {
if ($target eq 'web') {	if ($target eq 'web') {
$result="<h1>$Apache::lonhomework::name</h1>";	$result="<h1>$Apache::lonhomework::name</h1>";
} elsif ($target eq 'edit') {	} elsif ($target eq 'edit') {
$result=&Apache::edit::tag_start($target,$token,	$result=&Apache::edit::tag_start($target,$token);
&Apache::lonxml::description($token));
$result.='</td></tr>';	$result.='</td></tr>';
$result.=&Apache::edit::end_table();	$result.=&Apache::edit::end_table();
	} elsif ($target eq 'tex') {
	$Apache::lonhomework::name=~s/%/\%/g;
	$Apache::lonhomework::name=~s/&/\&/g;
	$result='\vskip 0 mm\noindent\textbf{'.$Apache::lonhomework::name.'}\vskip 0 mm';
}	}
return $result;	return $result;
}	}

FreeBSD-CVSweb <freebsd-cvsweb@FreeBSD.org>

Removed from v.1.13
changed lines
	Added in v.1.19