loncom/interface/groupsort.pm - diff

Return to groupsort.pm CVS log

Up to [LON-CAPA] / loncom / interface

version 1.46, 2006/07/21 08:29:47	version 1.49, 2006/09/12 22:13:05
Line 349 END	Line 349 END
END	END

# --- Continue Buttons	# --- Continue Buttons
my $resurl = &Apache::loncommon::lastresurl();	my $resurl =
	&Apache::loncommon::escape_single(&Apache::loncommon::lastresurl());
$r->print(<<END);	$r->print(<<END);
<input type="button" name="alter" value="$lt{'ci'}"	<input type="button" name="alter" value="$lt{'ci'}"
onClick="window.location='$resurl?catalogmode=import'" />	onClick="window.location='$resurl?catalogmode=import'" />
Line 431 sub hidden {	Line 432 sub hidden {
my ($sel,$title,$filelink) = @_;	my ($sel,$title,$filelink) = @_;
my $string = '<input type="hidden" name="title'.$sel.'" value="'.$title.	my $string = '<input type="hidden" name="title'.$sel.'" value="'.$title.
'" />';	'" />';
	$filelink=~s\|^/ext/\|http://\|;
$string .= '<input type="hidden" name="filelink'.$sel.'" value="'.	$string .= '<input type="hidden" name="filelink'.$sel.'" value="'.
$filelink.'" />';	$filelink.'" />';
return $string;	return $string;