Bug 19788: Preserve case sensitivity when creating Local preferences
Fix a bug tranforming new local preference variable name in lowercase.
TO TEST:
1. Admin > System preferences > Local use
2. Button New preference. Fill variable field with 'TESTfoo'. Click
Save.
3. The new variable is named: 'testfoo'.
4. Apply the patch.
5. Button New preference. Fill variable field with 'TESTfoo2'. Click
Save.
6. The new variable is properly named: 'TESTfoo2'.
Signed-off-by: Claire Gravely <claire.gravely@bsz-bw.de>
Signed-off-by: Kyle M Hall <kyle@bywatersolutions.com>
Signed-off-by: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
Signed-off-by: Nick Clemens <nick@bywatersolutions.com>
(cherry picked from commit 5ff8eca26c)
Signed-off-by: Fridolin Somers <fridolin.somers@biblibre.com>
This commit is contained in:
parent
1176b2e8f1
commit
0ba2ce047b
|
|
@ -496,6 +496,7 @@ preference.
|
|||
sub set_preference {
|
||||
my ( $self, $variable, $value, $explanation, $type, $options ) = @_;
|
||||
|
||||
my $variable_case = $variable;
|
||||
$variable = lc $variable;
|
||||
|
||||
my $syspref = Koha::Config::SysPrefs->find($variable);
|
||||
|
|
@ -521,7 +522,7 @@ sub set_preference {
|
|||
)->store;
|
||||
} else {
|
||||
$syspref = Koha::Config::SysPref->new(
|
||||
{ variable => $variable,
|
||||
{ variable => $variable_case,
|
||||
value => $value,
|
||||
explanation => $explanation || undef,
|
||||
type => $type,
|
||||
|
|
|
|||
Loading…
Reference in New Issue