--- loncom/interface/loncommon.pm 2003/08/26 17:20:45 1.113 +++ loncom/interface/loncommon.pm 2003/09/09 18:46:28 1.114 @@ -1,7 +1,7 @@ # The LearningOnline Network with CAPA # a pile of common routines # -# $Id: loncommon.pm,v 1.113 2003/08/26 17:20:45 bowersj2 Exp $ +# $Id: loncommon.pm,v 1.114 2003/09/09 18:46:28 www Exp $ # # Copyright Michigan State University Board of Trustees # @@ -1780,7 +1780,7 @@ show a snapshot of what student was look sub get_student_view { my ($symb,$username,$domain,$courseid,$target) = @_; - my ($map,$id,$feedurl) = split(/___/,$symb); + my ($map,$id,$feedurl) = &Apache::lonnet::decode_symb($symb); my (%old,%moreenv); my @elements=('symb','courseid','domain','username'); foreach my $element (@elements) { @@ -1816,7 +1816,7 @@ show a snapshot of how student was answe sub get_student_answers { my ($symb,$username,$domain,$courseid,%form) = @_; - my ($map,$id,$feedurl) = split(/___/,$symb); + my ($map,$id,$feedurl) = &Apache::lonnet::decode_symb($symb); my (%old,%moreenv); my @elements=('symb','courseid','domain','username'); foreach my $element (@elements) {