--- loncom/interface/lonparmset.pm 2012/05/09 19:46:30 1.523
+++ loncom/interface/lonparmset.pm 2012/12/17 15:00:41 1.529
@@ -1,7 +1,7 @@
# The LearningOnline Network with CAPA
# Handler to set parameters for assessments
#
-# $Id: lonparmset.pm,v 1.523 2012/05/09 19:46:30 raeburn Exp $
+# $Id: lonparmset.pm,v 1.529 2012/12/17 15:00:41 raeburn Exp $
#
# Copyright Michigan State University Board of Trustees
#
@@ -661,7 +661,7 @@ sub storeparm_by_symb {
}
sub log_parmset {
- return &Apache::lonnet::instructor_log('parameterlog',@_);
+ return &Apache::lonnet::write_log('course','parameterlog',@_);
}
sub storeparm_by_symb_inner {
@@ -768,11 +768,14 @@ sub valout {
my $result = '';
# Values of zero are valid.
if (! $value && $value ne '0') {
- if ($editable) {
- $result = '*';
- } else {
- $result=' ';
- }
+ if ($editable) {
+ $result =
+ '';
+ } else {
+ $result=' ';
+ }
} else {
if ($type eq 'date_interval') {
my ($sec,$min,$hour,$mday,$mon,$year)=gmtime($value);
@@ -2911,7 +2914,7 @@ sub storedata {
if (&Apache::lonnet::del('resourcedata',\@deldata,$dom,$crs) eq 'ok') {
my %loghash=map { $_ => '' } @deldata;
&log_parmset(\%loghash,1);
- $r->print('
'. - ($foundkeys?'':&mt('There are no parameters.')).'
'. + ($foundkeys?'':''.&mt('There are no parameters.').'').''. &Apache::loncommon::end_page()); } @@ -3595,8 +3598,9 @@ ENDOVER } elsif ($data{'realm_type'} eq 'symb') { my ($map,$resid,$url) = &Apache::lonnet::decode_symb($data{'realm'}); - $r->print(&mt('Resource: [_1]