version 1.48, 2006/08/10 22:05:18
|
version 1.49, 2007/03/08 01:58:45
|
Line 944 your changes.</td>
|
Line 944 your changes.</td>
|
'); |
'); |
my ($result,$perm_reqd)=&Apache::lonnet::auto_photo_permission($crs,$dom); |
my ($result,$perm_reqd)=&Apache::lonnet::auto_photo_permission($crs,$dom); |
my $can_enable = 1; |
my $can_enable = 1; |
my $institution = $Apache::lonnet::domaindescription{$dom}; |
my $institution = &Apache::lonnet::domain($dom,'description'); |
if ($result eq 'ok') { |
if ($result eq 'ok') { |
if ($perm_reqd eq 'yes') { |
if ($perm_reqd eq 'yes') { |
if (!($enrollvar{'photopermission'} eq 'yes')) { |
if (!($enrollvar{'photopermission'} eq 'yes')) { |
Line 2346 sub photo_permission {
|
Line 2346 sub photo_permission {
|
sub print_photo_agreement { |
sub print_photo_agreement { |
my ($r,$realm,$dom,$crs,$action,$tasktitleref,$conditions,$courseowner)=@_; |
my ($r,$realm,$dom,$crs,$action,$tasktitleref,$conditions,$courseowner)=@_; |
my $response; |
my $response; |
my $institution = $Apache::lonnet::domaindescription{$dom}; |
my $institution = &Apache::lonnet::domain($dom,'description'); |
if (&user_is_courseowner($courseowner)) { |
if (&user_is_courseowner($courseowner)) { |
$response = ' |
$response = ' |
<script type="text/javascript"> |
<script type="text/javascript"> |