X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=svc%2Fconfig%2Fsystempreferences;h=c54e7499c4532a825ff372aa838f5b2193a98d82;hb=4585228ea9b5cc407dcec8e4bae499d59007ea96;hp=01cd782dc48cb8814a7a230a226e958c8a72cd9b;hpb=7f3feacfe3897affbf76531eb3abd8cbc88a81e9;p=koha.git

diff --git a/svc/config/systempreferences b/svc/config/systempreferences
index 01cd782dc4..c54e7499c4 100755
--- a/svc/config/systempreferences
+++ b/svc/config/systempreferences
@@ -18,8 +18,7 @@
 # along with Koha; if not, see <http://www.gnu.org/licenses>.
 #
 
-use strict;
-use warnings;
+use Modern::Perl;
 
 use C4::Context;
 use C4::Service;
@@ -42,14 +41,18 @@ batches.
 
 =cut
 
-our ( $query, $response ) = C4::Service->init( parameters => 1 );
+our ( $query, $response ) = C4::Service->init( parameters => 'manage_sysprefs' );
 
 =head2 set_preference
 
 =over 4
 
+=item url path
+
 POST /svc/config/systempreferences/$preference
 
+=item url query
+
 value=$value
 
 =back
@@ -73,8 +76,12 @@ sub set_preference {
 
 =over 4
 
+=item url path
+
 POST /svc/config/systempreferences/
 
+=item url query
+
 pref_$pref1=$value1&pref_$pref2=$value2
 
 =back