function views_revisions_revision_page in Views Revisions 6

Same name and namespace in other branches

1. 7 views_revisions.module \views_revisions_revision_page()

Page callback function for the views revisions revision page.

1 string reference to 'views_revisions_revision_page'

views_revisions_menu in ./views_revisions.module

Implements hook_menu().

File

./views_revisions.module, line 146

A module to provide revisions of Views.

Code

function views_revisions_revision_page($form_state, $vrvid) {
  $form = array();
  $html = '';
  $result = db_query("SELECT vr.vrvid, vr.vid, vr.uid, vr.created, vr.log, vr.data, u.name, vv.name as view_name\n    FROM {views_revisions} vr\n    LEFT OUTER JOIN {users} u ON vr.uid = u.uid\n    INNER JOIN {views_view} vv ON vr.vid = vv.vid\n    WHERE vrvid = %d", $vrvid);
  $revision = db_fetch_object($result);
  $header = array(
    array(
      "data" => t('User'),
    ),
    array(
      "data" => t('Message'),
    ),
    array(
      "data" => t('Created'),
    ),
  );
  $rows = array(
    array(
      l($revision->name, "user/{$revision->uid}"),
      $revision->log,
      format_date($revision->created, 'custom', 'Y-m-d H:i:s'),
    ),
  );
  $table = theme('table', $header, $rows);
  $form['export_data'] = array(
    '#title' => t('Export data before revision was made'),
    '#type' => 'textarea',
    '#value' => $revision->data,
    '#rows' => 32,
  );
  $html .= "<h2>{$revision->view_name}</h2>" . '<p>' . l('View', "admin/build/views/edit/{$revision->view_name}") . ' &raquo; ' . l('Revisions', "admin/build/views/revisions/{$revision->view_name}") . ' &raquo;' . '</p>' . $table . '<p>' . l('Go to Import Page', 'admin/build/views/import') . '</p>';
  $form['#prefix'] = $html;
  return $form;
}