function _menu_block_form_block_admin_display_form_alter in Menu Block 7.3

Same name and namespace in other branches

1. 6.2 menu_block.admin.inc \_menu_block_form_block_admin_display_form_alter()
2. 7.2 menu_block.admin.inc \_menu_block_form_block_admin_display_form_alter()

Alters the block admin form to add delete links next to menu blocks.

1 call to _menu_block_form_block_admin_display_form_alter()

menu_block_form_block_admin_display_form_alter in ./menu_block.module

File

./menu_block.admin.inc, line 85

Provides infrequently used functions and hooks for menu_block.

Code

function _menu_block_form_block_admin_display_form_alter(&$form, $form_state) {
  $exported = menu_block_get_exported_blocks();
  foreach (variable_get('menu_block_ids', array()) as $delta) {
    if (!isset($exported[$delta])) {
      $form['blocks']['menu_block_' . $delta]['delete'] = array(
        '#type' => 'link',
        '#title' => t('delete'),
        '#href' => 'admin/structure/block/delete-menu-block/' . $delta,
      );
    }
  }
  if (variable_get('menu_block_suppress_core')) {
    foreach (array_keys(menu_get_menus(FALSE)) as $delta) {
      if (empty($form['blocks']['menu_' . $delta]['region']['#default_value'])) {
        unset($form['blocks']['menu_' . $delta]);
      }
    }
    foreach (array_keys(menu_list_system_menus()) as $delta) {
      if (empty($form['blocks']['system_' . $delta]['region']['#default_value'])) {
        unset($form['blocks']['system_' . $delta]);
      }
    }
  }
}