Mark all nodes as read action.

I am/was in need of an action to mark all nodes as read (for a forum). I found some D6 code and modified to suit D7. I have made a custom module that makes the necessary action, but it would probably be a good feature to implement to VBO. The code for my stand-alone module is below, in case this never makes it into VBO (and this is probably the module where people will look for such an action). Zip of module also attached.

mark_read.info

name = Mark Read
description = Creates an action to mark nodes as read, suitable for Views Bulk Operations.
core = 7.x

mark_read.install

<?php

/**
 * @file
 * Installation and update functions.
 */

/**
 * Implements hook_uninstall().
 */
function mark_read_uninstall() {
  // Remove Mark Read actuin that is now orphaned.
  actions_synchronize(TRUE);
}

mark_read.module

<?php
/**
 * Implements hook_action_info().
 */
function mark_read_action_info() {
  return array(
    'mark_read_node_action' => array(
      'label' => t('Mark as read'),
      'type' => 'node',
      'configurable' => FALSE,
      'triggers' => array('any'),
      ),
  );
}

/**
* Callback for mark_read_action_info
*/
function mark_read_node_action($object, $context = array()) {
  if(isset($object->nid)) {
    node_tag_new($object);
  } else if(isset($context['nid'])) {
    node_tag_new($context);
  }
}