rat/lonratedt.pm - diff

Return to lonratedt.pm CVS log

Up to [LON-CAPA] / rat

version 1.52, 2004/01/14 22:47:46	version 1.53, 2004/01/15 03:18:20
Line 911 sub smpedt {	Line 911 sub smpedt {

# ----------------------------------------------------- Start simple RAT screen	# ----------------------------------------------------- Start simple RAT screen
my $editscript=&editscript('simple');	my $editscript=&editscript('simple');
my $bodytag=&Apache::loncommon::bodytag(undef,undef,undef,1);	my $bodytag=&Apache::loncommon::bodytag(undef,undef,undef,1).
	&Apache::loncommon::help_open_topic('Sequence_Simple_Editor_Creation').
	&Apache::loncommon::help_open_faq(6).
	&Apache::loncommon::help_open_bug('RAT');
my %lt=&Apache::lonlocal::texthash(	my %lt=&Apache::lonlocal::texthash(
'sa' => 'Save',	'sa' => 'Save',
'nt' => 'New Title',	'nt' => 'New Title',
Line 1067 sub viewmap {	Line 1070 sub viewmap {
my ($r,$url,$adv,$errtext)=@_;	my ($r,$url,$adv,$errtext)=@_;
$r->print('<html>'.	$r->print('<html>'.
&Apache::loncommon::bodytag('Edit Content of a Map').	&Apache::loncommon::bodytag('Edit Content of a Map').
&buttons($adv));	&Apache::loncommon::help_open_faq(6).
	&Apache::loncommon::help_open_bug('RAT').
	&buttons($adv));
if ($errtext) {	if ($errtext) {
$r->print($errtext.'<hr>');	$r->print($errtext.'<hr />');
}	}
my $idx=0;	my $idx=0;
$r->print('<h1>'.$url.'</h1>');	$r->print('<h1>'.$url.'</h1>');