]> git.decadent.org.uk Git - memories.git/blobdiff - Memories.pm
HIGHLY EXPERIMENTAL - first stage of getting Tagtools to do what it was made for
[memories.git] / Memories.pm
index 1a0b994edd3a96dc15f0a68b23443608421b5be8..43f9a3e003e2d9de31c1a6cef320661e8b7264b0 100644 (file)
@@ -4,6 +4,7 @@ our $VERSION = "1.2";
 use Maypole::Application qw(Authentication::UserSessionCookie);
 use HTML::TagCloud;
 use URI;
+use Tagtools;
 use Memories::Config;
 use Memories::DBI;
 use Memories::Photo;
@@ -15,12 +16,12 @@ use Memories::Album;
 use URI::Escape;
 use Calendar::Simple;
 use XML::RSS;
-use Tagtools;
 
 Memories->config->auth->{ user_field } = "name";
 Memories->config->model("Maypole::Model::CDBI::Plain");
 Memories->setup([qw/ Memories::Photo Memories::User Memories::Tag
 Memories::Album Memories::SystemTag/]);
+Memories->setup_tagging("photo");
 
 sub message {
     my ($self, $message) = @_;