loncom/interface/groupsort.pm - diff

Return to groupsort.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.28, 2004/05/18 14:26:34	version 1.30, 2005/02/17 08:29:42
Line 105 ENDADV	Line 105 ENDADV
}	}

# output start of web page	# output start of web page
	my $html=&Apache::lonxml::xmlbegin();
$r->print(<<END);	$r->print(<<END);
<html>	$html
<head>	<head>
<title>The LearningOnline Network With CAPA Group Sorter</title>	<title>The LearningOnline Network With CAPA Group Sorter</title>
<script language='javascript'>	<script language='javascript'>
Line 319 END	Line 319 END

# --- Expand here if "GO BACK" button desired	# --- Expand here if "GO BACK" button desired
if ($ENV{'form.catalogmode'} eq 'groupimport') {	if ($ENV{'form.catalogmode'} eq 'groupimport') {
	my $resurl = &Apache::loncommon::lastresurl();
$r->print(<<END);	$r->print(<<END);
<input type="button" name="alter" value="$lt{'gb'}"	<input type="button" name="alter" value="$lt{'gb'}"
onClick="window.location='/res/?catalogmode=groupimport'" />	onClick="window.location='$resurl?catalogmode=groupimport'" />
END	END
}	}
if ($ENV{'form.catalogmode'} eq 'groupsearch') {	if ($ENV{'form.catalogmode'} eq 'groupsearch') {