# Album Plugin:	examples/formatting/NAME
# For info:	'album -plugin_info examples/formatting/NAME'
# For usage:	'album -plugin_usage examples/formatting/NAME'
use strict;

sub start_plugin {
  my ($opt) = @_;

  # Setup my hooks
  album::hook($opt,'clean_name',\&clean_name);

  return {
    author => 'David Ljung Madison',
    href => 'http://MarginalHacks.com/',
    version => '1.0',
    description => "Stupid clean_name hook example.  Converts all image names to uppercase.",
  };
}

sub clean_name {
  my ($opt, $hookname, $name, $iscaption) = @_;
  # EVER SINCE I GOT ON AOL I LIKE EVERYTHING IN UPPERCASE!!!!!!!!!
  # (Not really, but it's a simple example)
  uc($name);
}

# Plugins always end with:
1;