Lines 514-519
sub get_columns_for {
Link Here
|
514 |
my $rows = C4::Context->dbh->selectall_arrayref($sql, { Slice => {} }); |
514 |
my $rows = C4::Context->dbh->selectall_arrayref($sql, { Slice => {} }); |
515 |
for my $row (@{$rows}) { |
515 |
for my $row (@{$rows}) { |
516 |
next if $row->{'Field'} eq 'timestamp'; # this is really an irrelevant field and there may be other common fields that should be excluded from the list |
516 |
next if $row->{'Field'} eq 'timestamp'; # this is really an irrelevant field and there may be other common fields that should be excluded from the list |
|
|
517 |
next if $row->{'Field'} eq 'password'; # passwords can no longer be shown in notices so the password field should be removed as a template option |
517 |
push @fields, { |
518 |
push @fields, { |
518 |
value => $table_prefix . $row->{Field}, |
519 |
value => $table_prefix . $row->{Field}, |
519 |
text => $table_prefix . $row->{Field}, |
520 |
text => $table_prefix . $row->{Field}, |
520 |
- |
|
|