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

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

Return to bug 37784