--- rat/lonratedt.pm 2005/04/07 06:56:27 1.65 +++ rat/lonratedt.pm 2005/04/07 07:34:52 1.66 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # Edit Handler for RAT Maps # -# $Id: lonratedt.pm,v 1.65 2005/04/07 06:56:27 albertel Exp $ +# $Id: lonratedt.pm,v 1.66 2005/04/07 07:34:52 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -733,24 +733,8 @@ sub smpedt { } # ---------------------------------------------------------- Process form input - my @importselect=(); - my @targetselect=(); - undef @importselect; - undef @targetselect; - if (defined($env{'form.importsel'})) { - if (ref($env{'form.importsel'})) { - @importselect=sort(@{$env{'form.importsel'}}); - } else { - @importselect=($env{'form.importsel'}); - } - } - if (defined($env{'form.target'})) { - if (ref($env{'form.target'})) { - @targetselect=sort(@{$env{'form.target'}}); - } else { - @targetselect=($env{'form.target'}); - } - } + my @importselect=&Apache::loncommon::get_env_multiple('form.importsel'); + my @targetselect=&Apache::loncommon::get_env_multiple('form.target'); # ============================================================ Process commands my $targetdetail=$env{'form.targetdetail'};