'submit', '#value' => t('Save configuration')); if ($automatic_defaults) { $form = _system_settings_form_automatic_defaults($form); } if (!empty($_POST) && form_get_errors()) { drupal_set_message(t('The settings have not been saved because of the errors.'), 'error'); } $form['#submit'][] = 'system_settings_form_submit'; // By default, render the form using theme_system_settings_form(). if (!isset($form['#theme'])) { $form['#theme'] = 'system_settings_form'; } return $form; } /** * Module settings form. */ function superfish_admin_settings() { $form['superfish_number'] = array( '#type' => 'select', '#title' => t('Number of blocks'), '#multiple' => FALSE, '#options' => drupal_map_assoc(range(1, 50)), '#description' => t('The number of Superfish menu blocks.'), '#default_value' => variable_get('superfish_number', 4), ); $form['superfish_slp'] = array( '#type' => 'textarea', '#title' => t('Path to Superfish library'), '#description' => t('Edit only if you are sure of what you are doing.'), '#default_value' => variable_get('superfish_slp', libraries_get_path('superfish') . "/jquery.hoverIntent.minified.js\n" . libraries_get_path('superfish') . "/jquery.bgiframe.min.js\n" . libraries_get_path('superfish') . "/superfish.js\n" . libraries_get_path('superfish') . "/supersubs.js\n" . libraries_get_path('superfish') . "/supposition.js\n" . libraries_get_path('superfish') . "/sftouchscreen.js"), '#rows' => 7, ); return superfish_system_settings_form($form, FALSE); } /** * Implements hook_validate(). */ function superfish_admin_settings_validate($form, &$form_state) { $error = array(); // Trimming blank lines and such $sf_library = preg_replace("/(^[\r\n]*|[\r\n]+)[\s\t]*[\r\n]+/", "\n", trim($form_state['values']['superfish_slp'])); $sf_library = explode("\n", $sf_library); // Crystal clear foreach ($sf_library as $s) { if (!file_exists($s)) { $error[] = $s; } } if (!empty($error)) { $error_message = ''; if (count($error) > 1) { foreach ($error as $e) { $error_message .= '
  • ' . $e . '
  • '; } $error_message = t('Files not found') . ': '; } else { $error_message = t('File not found') . ': ' . $error[0]; } form_set_error('superfish_slp', $error_message); } }