SL/Controller/CustomVariableConfig.pm

   1 package SL::Controller::CustomVariableConfig;
   2
   3 use strict;
   4
   5 use parent qw(SL::Controller::Base);
   6
   7 use SL::DB::CustomVariableConfig;
   8
   9 __PACKAGE__->run_before('check_auth');
  10
  11 #
  12 # actions
  13 #
  14
  15 sub action_reorder {
  16   my ($self) = @_;
  17
  18   SL::DB::CustomVariableConfig->reorder_list(@{ $::form->{cvarcfg_id} || [] });
  19
  20   $self->render(\'', { type => 'json' });
  21 }
  22
  23 #
  24 # filters
  25 #
  26
  27 sub check_auth {
  28   $::auth->assert('config');
  29 }
  30
  31 1;