--- loncom/interface/groupsort.pm 2013/01/09 03:56:28 1.71 +++ loncom/interface/groupsort.pm 2013/07/15 14:32:44 1.73 @@ -2,7 +2,7 @@ # The LON-CAPA group sort handler # Allows for sorting prior to import into RAT. # -# $Id: groupsort.pm,v 1.71 2013/01/09 03:56:28 raeburn Exp $ +# $Id: groupsort.pm,v 1.73 2013/07/15 14:32:44 bisitz Exp $ # # Copyright Michigan State University Board of Trustees # @@ -339,8 +339,8 @@ END if ($env{'form.recover'}) { $r->print(<  - + onclick="finish_import()" />  + END } else { # --- Continue Buttons @@ -350,12 +350,12 @@ END

$lt{'fin'}

  + onclick="window.location='$resurl?inhibitmenu=yes&catalogmode=import'" />    + onclick="window.location='/adm/searchcat?inhibitmenu=yes&catalogmode=import'" />    - + onclick="finish_import()" />  +

END @@ -421,12 +421,12 @@ END $r->print(""); $r->print(""); $r->print(""); - if (($env{'form.recover'}) && + if (($env{'form.recover'}) && ($resource->{'url'} =~ m{/uploaded/$match_domain/$match_courseid/supplemental/})) { - my $title = &Apache::loncommon::parse_supplemental_title($resource->{'title'}); + my $title = &Apache::loncommon::parse_supplemental_title($resource->{'title'}); $r->print($title); } else { - $r->print($resource->{'title'}); + $r->print($resource->{'title'}); } $r->print($resource->{'notes'}."\n"); $r->print($resource->{'url'}."" @@ -488,7 +488,7 @@ sub select_box { my ($total,$sel) = @_; my $string; $string = '