Return to loncommon.pm CVS log | Up to [LON-CAPA] / loncom / interface |
version 1.1290, 2017/08/11 18:58:16 | version 1.1291, 2017/08/11 19:27:35 |
---|---|
Line 13695 sub load_tmp_file { | Line 13695 sub load_tmp_file { |
sub valid_datatoken { | sub valid_datatoken { |
my ($datatoken) = @_; | my ($datatoken) = @_; |
if ($datatoken =~ /^$match_username\_$match_domain\_enroll_$match_courseid\_\d+_\d+$/) { | if ($datatoken =~ /^$match_username\_$match_domain\_enroll_$match_domain\_$match_courseid\_\d+_\d+$/) { |
return $datatoken; | return $datatoken; |
} | } |
return; | return; |