From 21767a57892c456db329019a3d0be467a1c83d51 Mon Sep 17 00:00:00 2001
From: JT Smith <jt@plainblack.com>
Date: Thu, 31 Mar 2005 17:04:44 +0000
Subject: [PATCH] reworking preload a little

---
 docs/changelog/6.x.x.txt |  4 ++++
 lib/WebGUI/Form.pm       |  1 -
 sbin/preload.perl        | 51 +++++++++++++++++++++++++---------------
 sbin/testEnvironment.pl  |  3 ---
 4 files changed, 36 insertions(+), 23 deletions(-)

diff --git a/docs/changelog/6.x.x.txt b/docs/changelog/6.x.x.txt
index fed11e680..e599a37f8 100644
--- a/docs/changelog/6.x.x.txt
+++ b/docs/changelog/6.x.x.txt
@@ -1,3 +1,7 @@
+6.6.0
+ - Added a new admin panel for inline content editing.
+ - Tweaked the preloader so WebGUI uses a little less memory per process.
+
 6.5.5
  - fix [ 1171569 ] add/edit sql report help link has wrong namespace
  - Fixed a bug in the collaboration system that caused replies to fail.
diff --git a/lib/WebGUI/Form.pm b/lib/WebGUI/Form.pm
index ca3101201..4a78f9cc9 100644
--- a/lib/WebGUI/Form.pm
+++ b/lib/WebGUI/Form.pm
@@ -15,7 +15,6 @@ package WebGUI::Form;
 =cut
 
 use strict;
-use HTTP::BrowserDetect;
 use Tie::IxHash;
 use WebGUI::Asset;
 use WebGUI::Asset::Template;
diff --git a/sbin/preload.perl b/sbin/preload.perl
index 25d2424c0..01205049c 100644
--- a/sbin/preload.perl
+++ b/sbin/preload.perl
@@ -23,43 +23,56 @@ use ModPerl::Registry (); # Uncomment this for use with mod_perl 2.0
 #----------------------------------------
 # System controlled Perl modules.
 #----------------------------------------
-use Cache::FileCache ();
+
+
+
 use CGI (); CGI->compile(':all');
 use CGI::Carp ();
 use CGI::Util ();
-use Digest::MD5 ();
-use Image::Magick ();
 use File::Copy ();
 use File::Path ();
 use FileHandle ();
-use Net::SMTP ();
 use POSIX ();
 use URI::Escape ();
-use SOAP::Lite ();
+use HTTP::Request ();
+use HTTP::Headers ();
+use Digest::MD5 ();
+use DBI ();
+use HTML::Parser ();
+use HTML::TagFilter ();
+use HTML::Template ();
+use Parse::PlainConfig ();
+use Net::SMTP ();
+use Cache::Cache ();
+use Tie::IxHash ();
+use Tie::CPHash ();
 use Time::HiRes ();
+use Date::Manip ();
+use Image::Magick ();
+use XML::Simple ();
+
+####
+# less commonly used so you may not want them to load into memory
+###
+#use Compress::Zlib (); # used only by themes
+#use Archive::Tar (); # used only by themes
+#use IO::Zlib (); # used only by themes
+#use SOAP::Lite (); # used only by WS Client
+#use Net::LDAP (); # used only by LDAP authentication module
+#use XML::RSSLite (); # used only by syndicated content wobject
+#use DBIx::FullTextSearch (); #used only by search engine
+#use HTML::Highlight (); # used only by search engine
+
 
 
 #----------------------------------------
 # Database connectivity.
 #----------------------------------------
-#use Apache::DBI (); # Uncomment if you want to enable connection pooling. Not recommended on low memory systems.
-use DBI ();
+#use Apache::DBI (); # Uncomment if you want to enable connection pooling. Not recommended on low memory systems, or systems using database slaves
 DBI->install_driver("mysql"); # Change to match your database driver.
 
 
 
-#----------------------------------------
-# Distributed utilities external to WebGUI.
-#----------------------------------------
-#use HTML::Parser (); # commented because it is causing problems with attachments
-#use HTML::TagFilter (); # commented because it is causing problems with attachments
-use Parse::PlainConfig ();
-use Date::Manip ();
-use Tie::CPHash ();
-use Tie::IxHash ();
-# use XML::RSSLite ();
-use XML::Simple ();
-
 #----------------------------------------
 # WebGUI modules.
 #----------------------------------------
diff --git a/sbin/testEnvironment.pl b/sbin/testEnvironment.pl
index e04b3d11b..566b2c60f 100644
--- a/sbin/testEnvironment.pl
+++ b/sbin/testEnvironment.pl
@@ -66,9 +66,6 @@ checkModule("HTML::Highlight",0.20);
 checkModule("HTML::TagFilter",0.07);
 checkModule("HTML::Template",2.6);
 checkModule("Parse::PlainConfig",1.1);
-checkModule("Parse::RecDescent",1.94);
-checkModule("HTTP::BrowserDetect",0.97);
-checkModule("Text::Balanced",1.95);
 checkModule("XML::RSSLite",0.11);
 checkModule("DBIx::FullTextSearch",0.73);