1
));
}
function scratchpads_relations_itis_disable(){
module_load_include('fields.inc', 'scratchpads_relations_itis');
/*
* watchdog('debug', ' entities ' . print_r($entities, TRUE) . '
');
*/
$biological_vids = variable_get('biological_vids', array());
$vocabularies = entity_load('taxonomy_vocabulary', array_keys($biological_vids));
foreach($vocabularies as $vid => $vocabulary){
foreach(scratchpads_relations_itis_fields($vocabulary->vid) as $field){
// Deleting instance.
$field['field_instance']['bundle'] = $vocabulary->machine_name;
field_delete_instance($field['field_instance']);
if(field_info_field($field['field_config']['field_name'])){
field_delete_field($field['field_config']['field_name']);
watchdog('debug', ' Deleted ' . print_r($field['field_config']['field_name'], TRUE) . '
');
}
}
// -- Definitive delete
field_purge_batch(1000);
foreach(scratchpads_relations_itis_groups($vocabulary->vid) as $group){
$group['bundle'] = $vocabulary->machine_name;
$group['identifier'] = "{$group['group_name']}|{$group['bundle']}";
$group = (object)$group;
ctools_include('export');
field_group_group_export_delete($group, FALSE);
}
}
}