Bug 7354: Can't edit local use system preferences

Fixes adding and editing of local use system preferences and redirects to correct
page after saving.

To test:
- Create a new local use system preference
- Edit an existing local use system preference from summary page
- Edit an existing local use system preference using 'Edit'
- Delete a local use system preference

Signed-off-by: Chris Cormack <chrisc@catalyst.net.nz>
Signed-off-by: Paul Poulain <paul.poulain@biblibre.com>
Signed-off-by: Jared Camins-Esakov <jcamins@cpbibliography.com>
This commit is contained in:
Katrin Fischer 2012-04-12 08:59:32 +02:00 committed by Jared Camins-Esakov
parent ed2420273b
commit 2ae75d65d3
1 changed files with 4 additions and 5 deletions

View File

@ -95,7 +95,7 @@ $tabsysprefs{AutoLocation} = "Admin";
$tabsysprefs{DebugLevel} = "Admin";
$tabsysprefs{SessionStorage} = "Admin";
# This script is depricated so all of these prefs are lumped here to avoid their being displayed in the local use prefs tab
# This script is deprecated so all of these prefs are lumped here to avoid their being displayed in the local use prefs tab
$tabsysprefs{noItemTypeImages} = "Admin";
$tabsysprefs{OPACBaseURL} = "Admin";
@ -692,9 +692,8 @@ if ( $op eq 'add_form' ) {
}
$data->{'lang'} = $template->param('lang');
$template->param( GetPrefParams($data) );
my $prefparams = GetPrefParams($data);
$template->param( %$prefparams );
$template->param( searchfield => $searchfield );
################## ADD_VALIDATE ##################################
@ -745,7 +744,7 @@ if ( $op eq 'add_form' ) {
}
}
$sth->finish;
print "Content-Type: text/html\n\n<META HTTP-EQUIV=Refresh CONTENT=\"0; URL=systempreferences.pl?tab=" . $tabsysprefs{ $input->param('variable') } . "\"></html>";
print "Content-Type: text/html\n\n<META HTTP-EQUIV=Refresh CONTENT=\"0; URL=systempreferences.pl?tab=\"></html>";
exit;
################## DELETE_CONFIRM ##################################
# called by default form, used to confirm deletion of data in DB