4 include_once 
"./Services/Object/classes/class.ilObjectGUI.php" ;
 
   18         public function __construct($a_data, $a_id, $a_call_by_reference = 
true, $a_prepare_output = 
true)
 
   23                 $this->lng->loadLanguageModule(
"webr");
 
   30                 $next_class = $this->ctrl->getNextClass($this);
 
   31                 $cmd = $this->ctrl->getCmd();
 
   35                 if(!$ilAccess->checkAccess(
"read", 
"", $this->object->getRefId()))
 
   37                         $ilErr->raiseError($this->lng->txt(
"no_permission"), $ilErr->WARNING);
 
   42                         case 'ilpermissiongui':
 
   43                                 $this->tabs_gui->setTabActive(
"perm_settings");
 
   44                                 include_once 
"Services/AccessControl/classes/class.ilPermissionGUI.php";
 
   46                                 $this->ctrl->forwardCommand($perm_gui);
 
   52                                         $cmd = 
"editSettings";
 
   64                 if ($rbacsystem->checkAccess(
"visible,read", $this->object->getRefId()))
 
   66                         $this->tabs_gui->addTarget(
"settings",
 
   67                                 $this->ctrl->getLinkTarget($this, 
"editSettings"),
 
   68                                 array(
"editSettings", 
"view"));
 
   71                 if ($rbacsystem->checkAccess(
"edit_permission", $this->object->getRefId()))
 
   73                         $this->tabs_gui->addTarget(
"perm_settings",
 
   74                                 $this->ctrl->getLinkTargetByClass(
"ilpermissiongui", 
"perm"),
 
   75                                 array(), 
"ilpermissiongui");
 
   81                 $this->tabs_gui->setTabActive(
'settings');      
 
   87                 $this->tpl->setContent($a_form->getHTML());
 
   98                 if($form->checkInput())
 
  100                         $ilSetting->set(
"links_dynamic", $form->getInput(
"links_dynamic"));
 
  103                         $this->ctrl->redirect($this, 
"editSettings");
 
  106                 $form->setValuesByPost();
 
  114                 include_once 
"Services/Form/classes/class.ilPropertyFormGUI.php";
 
  116                 $form->setFormAction($this->ctrl->getFormAction($this, 
"saveSettings"));
 
  117                 $form->setTitle($this->lng->txt(
"settings"));
 
  121                 $cb->
setInfo($this->lng->txt(
"links_dynamic_info"));    
 
  122                 $cb->setChecked($ilSetting->get(
"links_dynamic"));              
 
  125                 $form->addCommandButton(
"saveSettings", $this->lng->txt(
"save"));
 
  126                 $form->addCommandButton(
"view", $this->lng->txt(
"cancel"));