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

(-)a/misc/translator/xgettext-pref (-3 / +3 lines)
Lines 116-132 sub add_prefs { Link Here
116
            }
116
            }
117
        }
117
        }
118
        for my $element (@$pref) {
118
        for my $element (@$pref) {
119
            my $new_context = $pref_name ? "$context > $pref_name" : $context;
119
            if ( ref($element) eq 'HASH' ) {
120
            if ( ref($element) eq 'HASH' ) {
120
                while ( my ( $key, $value ) = each(%$element) ) {
121
                while ( my ( $key, $value ) = each(%$element) ) {
121
                    next unless $key eq 'choices' or $key eq 'multiple' or $key eq 'multiple_sortable';
122
                    next unless $key eq 'choices' or $key eq 'multiple' or $key eq 'multiple_sortable';
122
                    next unless ref($value) eq 'HASH';
123
                    next unless ref($value) eq 'HASH';
123
                    for my $ckey ( keys %$value ) {
124
                    for my $ckey ( keys %$value ) {
124
                        add_po( $file, "$context > $pref_name", $value->{$ckey} );
125
                        add_po( $file, $new_context, $value->{$ckey} );
125
                    }
126
                    }
126
                }
127
                }
127
            }
128
            }
128
            elsif ($element) {
129
            elsif ($element) {
129
                add_po( $file, "$context > $pref_name", $element );
130
                add_po( $file, $new_context, $element );
130
            }
131
            }
131
        }
132
        }
132
    }
133
    }
133
- 

Return to bug 26547