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 |
- |
|
|