View | Details | Raw Unified | Return to bug 18494
Collapse All | Expand All

(-)a/C4/Members.pm (-3 / +4 lines)
Lines 358-364 sub ModMember { Link Here
358
358
359
    # trim whitespace from data which has some non-whitespace in it.
359
    # trim whitespace from data which has some non-whitespace in it.
360
    foreach my $field_name (keys(%data)) {
360
    foreach my $field_name (keys(%data)) {
361
        if ( defined $data{$field_name} && $data{$field_name} =~ /\S/ ) {
361
        if ( defined $data{$field_name} && $data{$field_name} =~ /\S/
362
            && !ref($data{$field_name}) ) {
362
            $data{$field_name} =~ s/^\s*|\s*$//g;
363
            $data{$field_name} =~ s/^\s*|\s*$//g;
363
        }
364
        }
364
    }
365
    }
Lines 452-458 sub AddMember { Link Here
452
453
453
    # trim whitespace from data which has some non-whitespace in it.
454
    # trim whitespace from data which has some non-whitespace in it.
454
    foreach my $field_name (keys(%data)) {
455
    foreach my $field_name (keys(%data)) {
455
        if ( defined $data{$field_name} && $data{$field_name} =~ /\S/ ) {
456
        if ( defined $data{$field_name} && $data{$field_name} =~ /\S/
457
            && !ref($data{$field_name}) ) {
456
            $data{$field_name} =~ s/^\s*|\s*$//g;
458
            $data{$field_name} =~ s/^\s*|\s*$//g;
457
        }
459
        }
458
    }
460
    }
459
- 

Return to bug 18494