# ==================================================================
# Gossamer Mail - enhanced email management system
#
#   Website  : http://gossamer-threads.com/
#   Support  : http://gossamer-threads.com/scripts/support/
#   Revision : $Id: mod_perl.pm,v 1.16 2004/03/09 19:29:03 jagerman Exp $
#
# Copyright (c) 2003 Gossamer Threads Inc.  All Rights Reserved.
# Redistribution in part or in whole strictly prohibited. Please
# see LICENSE file for full details.
# ==================================================================

package GMail::mod_perl;
# ==================================================================
    use strict;

# If under mod_perl, we use Apache::DBI to cache connections.
use GT::Base qw/$MOD_PERL/;
BEGIN {
    if ($MOD_PERL) { require Apache::DBI }
    print STDERR "\nPreload Gossamer Mail modules into mod_perl:\n\t";
}

use GMail();
BEGIN { print STDERR " ." }

# Preload commonly used GT libs.
use constants();
use GT::AutoLoader();
use GT::Cache();
use GT::CGI();
use GT::Date();
use GT::Dumper();
use GT::TempFile();
use GT::Template();
use GT::Template::Parser();
use GT::Template::Inheritance();
use GT::WWW();
BEGIN { print STDERR " ." }
use GT::Mail();
use GT::Mail::POP3();
use GT::Mail::Parts();
use GT::Mail::Parse();
use GT::Mail::Encoder();
use GT::Plugins();
use GT::MD5();
use GT::Text::Tools();
BEGIN { print STDERR " ." }
use GT::SQL();
use GT::SQL::Table();
use GT::SQL::Tree();
use GT::SQL::Relation();
use GT::SQL::Driver();
use GT::SQL::Display::HTML::Table();
use GT::SQL::Display::HTML::Relation();
BEGIN { print STDERR " ." }

# Preload GMail modules
use GMail::AddressBook();
use GMail::Admin::Help();
use GMail::Admin::SendEmail();
use GMail::Admin::Setup::Email::Admin();
use GMail::Admin::Setup::Email::Password();
use GMail::Admin::Setup::Email::Register();
use GMail::Admin::Setup::Email::Validate();
use GMail::Admin::Setup::Email::Welcome();
use GMail::Admin::Setup::Email();
use GMail::Admin::Setup::Filters();
use GMail::Admin::Setup::Footer();
use GMail::Admin::Setup::Locations();
use GMail::Admin::Setup::Password();
use GMail::Admin::Setup::Reserved();
use GMail::Admin::Setup::Template();
use GMail::Admin::Setup::User();
use GMail::Admin::Setup();
use GMail::Admin::Stats();
use GMail::Admin::Tools();
use GMail::Admin();
BEGIN { print STDERR " ." }
use GMail::Auth();
use GMail::Compose();
use GMail::Config();
use GMail::Email();
use GMail::Folders();
use GMail::Messages();
use GMail::NoAuth();
use GMail::NoAuth::Login();
use GMail::NoAuth::Join();
use GMail::Options();
use GMail::Options::AutoReply();
use GMail::Options::Compose();
use GMail::Options::Display();
use GMail::Options::Filters();
use GMail::Options::Misc();
use GMail::Options::MailBox();
use GMail::Options::POP3();
use GMail::Options::Profile();
use GMail::Options::Spam();
BEGIN { print STDERR " ." }
use GMail::POP3();
use GMail::Plugins();
use GMail::Profiles();
use GMail::SQL::Admin();
use GMail::SQL::Display::HTML::Relation();
use GMail::SQL::Relation();
use GMail::SQL::Table::msgs();
use GMail::Signatures();
use GMail::User();
BEGIN { print STDERR " .\nAll modules loaded okay!\n" }

print STDERR "Compiling all functions ...";

GT::AutoLoader::compile_all();

print STDERR " All modules compiled and loaded okay!\n\n";

1;