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

(-)a/svc/config/systempreferences (-12 / +7 lines)
Lines 64-73 Used to set a single system preference. Link Here
64
sub set_preference {
64
sub set_preference {
65
    my ( $preference ) = @_;
65
    my ( $preference ) = @_;
66
66
67
    unless ( C4::Context->config('demo') ) {
67
    my $value = join( ',', $query->param( 'value' ) );
68
        my $value = join( ',', $query->param( 'value' ) );
68
    C4::Context->set_preference( $preference, $value );
69
        C4::Context->set_preference( $preference, $value );
70
    }
71
69
72
    C4::Service->return_success( $response );
70
    C4::Service->return_success( $response );
73
}
71
}
Lines 95-110 pref_virtualshelves=0 Link Here
95
=cut
93
=cut
96
94
97
sub set_preferences {
95
sub set_preferences {
98
    unless ( C4::Context->config( 'demo' ) ) {
96
    foreach my $param ( $query->param() ) {
99
        foreach my $param ( $query->param() ) {
97
        my ( $pref ) = ( $param =~ /pref_(.*)/ );
100
            my ( $pref ) = ( $param =~ /pref_(.*)/ );
101
98
102
            next if ( !defined( $pref ) );
99
        next if ( !defined( $pref ) );
103
100
104
            my $value = join( ',', $query->multi_param( $param ) );
101
        my $value = join( ',', $query->multi_param( $param ) );
105
102
106
            C4::Context->set_preference( $pref, $value );
103
        C4::Context->set_preference( $pref, $value );
107
        }
108
    }
104
    }
109
105
110
    C4::Service->return_success( $response );
106
    C4::Service->return_success( $response );
111
- 

Return to bug 29056