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

(-)a/reports/dictionary.pl (-13 / +3 lines)
Lines 84-91 elsif ( $op eq 'cud-add_form_4' ) { Link Here
84
    my $columnstring = join( ',', @columns );
84
    my $columnstring = join( ',', @columns );
85
    my $forbidden    = Koha::Report->new->check_columns( undef, \@columns );
85
    my $forbidden    = Koha::Report->new->check_columns( undef, \@columns );
86
    my @column_loop;
86
    my @column_loop;
87
    foreach my $column (@columns) {
87
    unless ($forbidden) {
88
        unless ($forbidden) {
88
        foreach my $column (@columns) {
89
            my %tmp_hash;
89
            my %tmp_hash;
90
            $tmp_hash{'name'} = $column;
90
            $tmp_hash{'name'} = $column;
91
            my $type = get_column_type($column);
91
            my $type = get_column_type($column);
Lines 115-130 elsif ( $op eq 'cud-add_form_4' ) { Link Here
115
            'columnstring'           => $columnstring,
115
            'columnstring'           => $columnstring,
116
        );
116
        );
117
    } else {
117
    } else {
118
        my $columns = get_columns( $area, $input );
118
        $template->param( 'new_dictionary' => 1, passworderr => 1 );
119
        $template->param(
120
            'step_3'                 => 1,
121
            'area'                   => $area,
122
            'definition_name'        => $definition_name,
123
            'definition_description' => $definition_description,
124
            'columns'                => \@column_loop,
125
            'columnstring'           => $columnstring,
126
            'passworderr'            => 1,
127
        );
128
    }
119
    }
129
120
130
}
121
}
131
- 

Return to bug 37784