X-Git-Url: https://git.octo.it/?a=blobdiff_plain;f=lib%2FOnis%2FPlugins%2FLongterm.pm;h=f4216fa5aa146d44d3ef838e2615998aba4e849a;hb=7e3c4b5eacb8bcbfff65fdd4d5def64e079991b7;hp=9e92c8bdc44468b73fab1562924ceac947757c2b;hpb=942b56647efea6b2c0a7f1da4772ceca3ac5ef83;p=onis.git

diff --git a/lib/Onis/Plugins/Longterm.pm b/lib/Onis/Plugins/Longterm.pm
index 9e92c8b..f4216fa 100644
--- a/lib/Onis/Plugins/Longterm.pm
+++ b/lib/Onis/Plugins/Longterm.pm
@@ -3,12 +3,23 @@ package Onis::Plugins::Longterm;
 use strict;
 use warnings;
 
+use Exporter;
+
 use Onis::Config (qw(get_config));
 use Onis::Html (qw(get_filehandle));
 use Onis::Language (qw(translate));
 use Onis::Data::Core (qw(register_plugin get_main_nick get_most_recent_time nick_to_ident nick_to_name));
 use Onis::Data::Persistent ();
 
+=head1 NAME
+
+Onis::Plugins::Longterm
+
+=cut
+
+@Onis::Plugins::Longterm::EXPORT_OK = (qw(get_longterm));
+@Onis::Plugins::Longterm::ISA = ('Exporter');
+
 register_plugin ('TEXT', \&add);
 register_plugin ('ACTION', \&add);
 register_plugin ('OUTPUT', \&output);
@@ -202,3 +213,41 @@ sub output
 	}
 	print $fh "  </tr>\n</table>\n\n";
 }
+
+=head1 EXPORTED FUNCTIONS
+
+=over 4
+
+=item B<get_longterm> (I<$nick>)
+
+Returns the longterm-statistics for I<$nick>. The numbers are array-counters.
+The format is as follows:
+
+  [
+    [0, 0, 0, 0], # oldest day
+    ...,
+    [0, 0, 0, 0], # yesterday
+    [0, 0, 0, 0]  # today
+  ]
+
+=cut
+
+sub get_longterm
+{
+	my $nick = shift;
+
+	if (!defined ($LongtermData->{$nick}))
+	{
+		return ([]);
+	}
+
+	return ($LongtermData->{$nick});
+}
+
+=back
+
+=head1 AUTHOR
+
+Florian octo Forster E<lt>octo at verplant.orgE<gt>
+
+=cut