Lines 605-611
sub _ModStoredFields {
Link Here
|
605 |
my ( @fields_to_update, @values_to_update ); |
605 |
my ( @fields_to_update, @values_to_update ); |
606 |
|
606 |
|
607 |
foreach (@FIELDS) { |
607 |
foreach (@FIELDS) { |
608 |
if ( $params{$_} ) { |
608 |
if ( defined($params{$_}) ) { |
609 |
push( @fields_to_update, $_ ); |
609 |
push( @fields_to_update, $_ ); |
610 |
push( @values_to_update, $params{$_} ); |
610 |
push( @values_to_update, $params{$_} ); |
611 |
} |
611 |
} |
Lines 671-679
sub _SwapAllFields {
Link Here
|
671 |
my %course_item_fields; |
671 |
my %course_item_fields; |
672 |
my %item_fields; |
672 |
my %item_fields; |
673 |
foreach (@FIELDS) { |
673 |
foreach (@FIELDS) { |
674 |
if ( $course_item->{$_} ) { |
674 |
if ( defined( $course_item->{$_} ) ) { |
675 |
$course_item_fields{$_} = $course_item->{$_}; |
675 |
$course_item_fields{$_} = $course_item->{$_}; |
676 |
$item_fields{$_} = $item->{$_}; |
676 |
$item_fields{$_} = $item->{$_} || q{}; |
677 |
} |
677 |
} |
678 |
} |
678 |
} |
679 |
|
679 |
|
680 |
- |
|
|