# This module is part of , and is released
# under the terms of the GPL version 2, or any later version. See the
# file README and COPYING for more information.
-# Copyright 2003 by Don Armstrong <don@donarmstrong.com>.
-# $Id: $
+# Copyright 2008 by Don Armstrong <don@donarmstrong.com>.
+# $Id$
package ;
use base qw(Exporter);
BEGIN{
- ($VERSION) = q$Revision: 1.3 $ =~ /^Revision:\s+([^\s+])/;
+ ($VERSION) = q$Revision$ =~ /^Revision:\s+([^\s+])/;
$DEBUG = 0 unless defined $DEBUG;
- @EXPORT = ()
-# %EXPORT_TAGS = (a => [qw()]
-# );
+ @EXPORT = ();
+ %EXPORT_TAGS = (#a => [qw()],
+ );
@EXPORT_OK = ();
-# Exporter::export_ok_tags(qw(add get));
+ Exporter::export_ok_tags(keys %EXPORT_TAGS);
$EXPORT_TAGS{all} = [@EXPORT_OK];
}