From 9fe730adbb1eae525cc977f6e3bd818163855eb1 Mon Sep 17 00:00:00 2001 From: Roy Johnson Date: Tue, 6 Feb 2007 18:06:09 +0000 Subject: [PATCH] fix - Ignoring shortcut overrides --- docs/changelog/7.x.x.txt | 1 + lib/WebGUI/Asset/Shortcut.pm | 1 + lib/WebGUI/Asset/Wobject/Collaboration.pm | 1 + 3 files changed, 3 insertions(+) diff --git a/docs/changelog/7.x.x.txt b/docs/changelog/7.x.x.txt index 35f31eecb..773fda59a 100644 --- a/docs/changelog/7.x.x.txt +++ b/docs/changelog/7.x.x.txt @@ -59,6 +59,7 @@ - fix: SQLForm: set issues (perlDreamer Consulting, LLC) - fix: Collab System FAQ: clicking top link does not bring you back to the top of FAQ (perlDreamer Consulting, LLC) - fix: SQL Report download template (perlDreamer Consulting, LLC) + - fix: Ignoring shortcut overrides. 7.3.8 - Fixed a template variable rewriting problem with HTML::Template::Expr diff --git a/lib/WebGUI/Asset/Shortcut.pm b/lib/WebGUI/Asset/Shortcut.pm index 74bffb109..230eb11b3 100644 --- a/lib/WebGUI/Asset/Shortcut.pm +++ b/lib/WebGUI/Asset/Shortcut.pm @@ -866,6 +866,7 @@ sub www_saveOverride { $self->session->db->write("delete from Shortcut_overrides where assetId=".$self->session->db->quote($self->getId)." and fieldName=".$self->session->db->quote($fieldName)); $self->session->db->write("insert into Shortcut_overrides values (".$self->session->db->quote($self->getId).",".$self->session->db->quote($fieldName).",".$self->session->db->quote($value).")"); $self->uncacheOverrides; + $self->getShortcutOriginal->purgeCache(); return $self->www_manageOverrides; } diff --git a/lib/WebGUI/Asset/Wobject/Collaboration.pm b/lib/WebGUI/Asset/Wobject/Collaboration.pm index 75e028dd7..6e77336c0 100644 --- a/lib/WebGUI/Asset/Wobject/Collaboration.pm +++ b/lib/WebGUI/Asset/Wobject/Collaboration.pm @@ -940,6 +940,7 @@ See WebGUI::Asset::purgeCache() for details. sub purgeCache { my $self = shift; WebGUI::Cache->new($self->session,"view_".$self->getId)->delete; + WebGUI::Cache->new($self->session,$self->_visitorCacheKey)->delete; $self->SUPER::purgeCache; }