Changeset 1832 for trunk/LATMOS-Accounts/lib/LATMOS/Accounts
- Timestamp:
- 08/25/16 12:53:28 (8 years ago)
- Location:
- trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases
- Files:
-
- 2 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Objects.pm
r1698 r1832 314 314 ! 315 315 my $val = $self->get_c_field($1); 316 sprintf('%' . ($2 || 's'), ref $val ? join(',', @$val) : ( $val||''))316 sprintf('%' . ($2 || 's'), ref $val ? join(',', @$val) : (defined($val) ? $val : '')) 317 317 !egx; 318 318 $fmt; -
trunk/LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql/Employment.pm
r1811 r1832 127 127 if ($now->epoch > $eend) { 128 128 return -1; 129 } else { 130 return 0; 129 131 } 130 132 } else {
Note: See TracChangeset
for help on using the changeset viewer.