--- rat/map.pm 2007/07/12 01:04:32 1.7 +++ rat/map.pm 2007/08/02 01:47:42 1.8 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # routines for modyfing .sequence and .page files # -# $Id: map.pm,v 1.7 2007/07/12 01:04:32 albertel Exp $ +# $Id: map.pm,v 1.8 2007/08/02 01:47:42 albertel Exp $ # # Copyright Michigan State University Board of Trustees # @@ -284,11 +284,11 @@ sub pastetarget { my @insertorder=(); foreach (@which) { if (defined($_)) { - my ($name,$url)=split(/\=/,$_); + my ($name,$url,$residx)=split(/\=/,$_); $name=&unescape($name); $url=&unescape($url); if ($url) { - my $idx=&getresidx($url); + my $idx=&getresidx($url,$residx); $insertorder[$#insertorder+1]=$idx; my $ext='false'; if ($url=~/^http\:\/\//) { $ext='true'; }