diff --git a/docs/changelog/5.x.x.txt b/docs/changelog/5.x.x.txt
index 524d8ec3e..8f20d0f95 100644
--- a/docs/changelog/5.x.x.txt
+++ b/docs/changelog/5.x.x.txt
@@ -19,6 +19,9 @@
usernames in the database. (Thanks to Martin Kamerbeek.)
- Fixed a bug in the 5.4.3-5.4.4 upgrade script that some users experienced
with null values in their DataForm.
+ - If the Cache Timeout on a given page is set to 10 seconds or less, that
+ page will not be cached.
+
5.4.4
- Updated Finnish translation. (Thanks to Markus Hynna.)
diff --git a/docs/upgrades/upgrade_5.4.4-5.5.0.pl b/docs/upgrades/upgrade_5.4.4-5.5.0.pl
index de28c66e8..9cef298e1 100644
--- a/docs/upgrades/upgrade_5.4.4-5.5.0.pl
+++ b/docs/upgrades/upgrade_5.4.4-5.5.0.pl
@@ -39,12 +39,6 @@ my $macros = $conf->get("macros");
delete $macros->{"\\"};
$macros->{"\\\\"} = "Backslash_pageUrl";
$conf->set("macros"=>$macros);
-my $wobjects = $conf->get("wobjects");
-my @newWobjects = qw(SOAPClient);
-foreach (@{$wobjects}) {
- push(@newWobjects, $_);
-}
-$conf->set("wobjects"=>\@newWobjects);
$conf->set("searchAndReplace"=>undef);
$conf->write;
diff --git a/etc/WebGUI.conf.original b/etc/WebGUI.conf.original
index 6fe0582db..946901203 100644
--- a/etc/WebGUI.conf.original
+++ b/etc/WebGUI.conf.original
@@ -70,15 +70,3 @@ macros = a => a_account, \
T => T_topMenuVertical, \
u => u_companyUrl
-searchAndReplace = \
- :) => "
", \
- :-) => "
", \
- :( => "
", \
- :-( => "
", \
- ;) => "
", \
- ;-) => "
", \
- :D => "
", \
- :p => "
", \
- :O => "
", \
- WebGUI => "WebGUI"
-
diff --git a/lib/WebGUI.pm b/lib/WebGUI.pm
index 81a8839b6..c0f69fb0b 100644
--- a/lib/WebGUI.pm
+++ b/lib/WebGUI.pm
@@ -225,7 +225,9 @@ sub _processOperations {
sub page {
my ($cache, $debug, $positions, $wobjectOutput, $pageEdit, $httpHeader, $content, $operationOutput, $template);
WebGUI::Session::open($_[0],$_[1]);
- my $useCache = ($session{form}{op} eq "" && $session{form}{wid} eq "" && $session{form}{makePrintable} eq "" && not $session{var}{adminOn});
+ my $useCache = ($session{form}{op} eq "" && $session{form}{wid} eq "" && $session{form}{makePrintable} eq ""
+ && (($session{page}{cacheTimeout} > 10 && $session{user}{userId} !=1) || ($session{page}{cacheTimeout} > 10 && $session{user}{userId} == 1))
+ && not $session{var}{adminOn});
if ($useCache) {
$cache = WebGUI::Cache->new("page_".$session{page}{pageId}."_".$session{user}{userId});
$content = $cache->get;