version 1.386, 2007/01/04 14:59:57
|
version 1.388, 2007/01/04 21:24:39
|
Line 2125 sub processHandGrade {
|
Line 2125 sub processHandGrade {
|
if ($encrypturl =~ /^yes$/i) { |
if ($encrypturl =~ /^yes$/i) { |
$baseurl = &Apache::lonenc::encrypted($feedurl,1); |
$baseurl = &Apache::lonenc::encrypted($feedurl,1); |
$showsymb = &Apache::lonenc::encrypted($symb,1); |
$showsymb = &Apache::lonenc::encrypted($symb,1); |
|
} else { |
|
$baseurl = $feedurl; |
|
$showsymb = $symb; |
} |
} |
if ($includemsg =~ /savemsg|newmsg\Q$ctr\E/) { |
if ($includemsg =~ /savemsg|newmsg\Q$ctr\E/) { |
$subject = $env{'form.msgsub'} if ($includemsg =~ /msgsub/); |
$subject = $env{'form.msgsub'} if ($includemsg =~ /msgsub/); |
Line 2534 sub handback_files {
|
Line 2537 sub handback_files {
|
$message .= ' The returned file(s) are named: '. $file_msg; |
$message .= ' The returned file(s) are named: '. $file_msg; |
$message .= " and can be found in your portfolio space."; |
$message .= " and can be found in your portfolio space."; |
my $url = (&Apache::lonnet::decode_symb($symb))[2]; |
my $url = (&Apache::lonnet::decode_symb($symb))[2]; |
my $feedurl = &Apache::lonnet::declutter($url); |
my $feedurl = &Apache::lonnet::clutter($url); |
my $encrypturl=&Apache::lonnet::EXT('resource.0.encrypturl', |
my $encrypturl=&Apache::lonnet::EXT('resource.0.encrypturl', |
$symb,$domain,$stuname); |
$symb,$domain,$stuname); |
my ($baseurl,$showsymb); |
my ($baseurl,$showsymb); |