XoopsModules25x / smallworld

        }

        $helper->redirect('admin/blocksadmin.php', Constants::REDIRECT_DELAY_MEDIUM, constant('CO_' . $moduleDirNameUpper . '_' . 'UPDATE_SUCCESS'));

        break;

    case ('clone'):

        $bid = Request::getInt('bid', 0);

        xoops_cp_header();

        xoops_loadLanguage('admin', 'system');

        xoops_loadLanguage('admin/blocksadmin', 'system');

        xoops_loadLanguage('admin/groups', 'system');

        //        mpu_adm_menu();

        $myblock = new \XoopsBlock($bid);

        $sql     = 'SELECT module_id FROM ' . $GLOBALS['xoopsDB']->prefix('block_module_link') . ' WHERE block_id=' . (int)$bid;

        $result  = $GLOBALS['xoopsDB']->query($sql);

        $modules = [];

        while (false !== ($row = $GLOBALS['xoopsDB']->fetchArray($result))) {

            $modules[] = (int)$row['module_id'];

        }

        $is_custom = ('C' === $myblock->getVar('block_type') || 'E' === $myblock->getVar('block_type'));

        $block     = [

            'title'      => $myblock->getVar('title') . ' Clone',

            'form_title' => constant('CO_' . $moduleDirNameUpper . '_' . 'BLOCKS_CLONEBLOCK'),

            'name'       => $myblock->getVar('name'),

            'side'       => $myblock->getVar('side'),

            'weight'     => $myblock->getVar('weight'),

            'visible'    => $myblock->getVar('visible'),

            'content'    => $myblock->getVar('content', 'N'),

            'modules'    => $modules,

            'is_custom'  => $is_custom,

            'ctype'      => $myblock->getVar('c_type'),

            'bcachetime' => $myblock->getVar('bcachetime'),

            'op'         => 'clone_ok',

            'bid'        => $myblock->getVar('bid'),

            'edit_form'  => $myblock->getOptions(),

            'template'   => $myblock->getVar('template'),

            'options'    => $myblock->getVar('options'),

        ];

        echo "<a href='" . $helper->url('admin/blocksadmin.php') . "'>" . _AM_BADMIN . "</a>&nbsp;<span class='bold'>&raquo;&raquo;</span>&nbsp;" . _AM_SYSTEM_BLOCKS_CLONEBLOCK . "<br><br>\n";

        require_once __DIR__ . '/blockform.php';

        $form->display();

        break;

    case ('edit'):

        $bid = Request::getInt('bid', 0, 'POST');

        xoops_cp_header();

        require_once __DIR__ . '/blockform.php';

        $form->display();

        break;

    case ('edit'):

        $bid = Request::getInt('bid', 0, 'POST');

        xoops_cp_header();

        xoops_loadLanguage('admin', 'system');

        xoops_loadLanguage('admin/blocksadmin', 'system');

        xoops_loadLanguage('admin/groups', 'system');

        //        mpu_adm_menu();

        $myblock = new \XoopsBlock($bid);

        $sql     = 'SELECT module_id FROM ' . $GLOBALS['xoopsDB']->prefix('block_module_link') . ' WHERE block_id=' . $bid;

        $result  = $GLOBALS['xoopsDB']->query($sql);

        $modules = [];

        while (false !== ($row = $GLOBALS['xoopsDB']->fetchArray($result))) {

            $modules[] = (int)$row['module_id'];

        }

        $is_custom = ('C' === $myblock->getVar('block_type') || 'E' === $myblock->getVar('block_type'));

        $block     = [

            'title'      => $myblock->getVar('title'),

            'form_title' => constant('CO_' . $moduleDirNameUpper . '_' . 'BLOCKS_EDITBLOCK'),

            //        'name'       => $myblock->getVar('name'),

            'side'       => $myblock->getVar('side'),

            'weight'     => $myblock->getVar('weight'),

            'visible'    => $myblock->getVar('visible'),

            'content'    => $myblock->getVar('content', 'N'),

            'modules'    => $modules,

            'is_custom'  => $is_custom,

            'ctype'      => $myblock->getVar('c_type'),

            'bcachetime' => $myblock->getVar('bcachetime'),

            'op'         => 'edit_ok',

            'bid'        => $myblock->getVar('bid'),

            'edit_form'  => $myblock->getOptions(),

            'template'   => $myblock->getVar('template'),

            'options'    => $myblock->getVar('options'),

        ];

        echo "<a href='" . $helper->url('admin/blocksadmin.php') . "'>" . _AM_BADMIN . "</a>&nbsp;<span class='bold'>&raquo;&raquo;</span>&nbsp;" . _AM_SYSTEM_BLOCKS_EDITBLOCK . "<br><br>\n";

        require_once __DIR__ . '/blockform.php';

        $form->display();

        break;

    case('edit_ok'):

        $bid        = Request::getInt('bid', 0);

        $btitle     = Request::getString('btitle');