From 56e7854ae38ac4617e4e86a715181d75789de8b8 Mon Sep 17 00:00:00 2001
From: Colin Kuskie <colink@perldreamer.com>
Date: Thu, 21 Dec 2006 17:25:48 +0000
Subject: [PATCH] remove calls to non-existant tables in Wiki* purge methods

---
 docs/changelog/7.x.x.txt               | 1 +
 lib/WebGUI/Asset/WikiPage.pm           | 7 -------
 lib/WebGUI/Asset/Wobject/WikiMaster.pm | 7 -------
 3 files changed, 1 insertion(+), 14 deletions(-)

diff --git a/docs/changelog/7.x.x.txt b/docs/changelog/7.x.x.txt
index 2b027057d..348777eb2 100644
--- a/docs/changelog/7.x.x.txt
+++ b/docs/changelog/7.x.x.txt
@@ -1,4 +1,5 @@
 7.3.3
+ - fix: Wiki Purge throws fatal
 
 
 7.3.2
diff --git a/lib/WebGUI/Asset/WikiPage.pm b/lib/WebGUI/Asset/WikiPage.pm
index 98bd689e0..1febbce8b 100644
--- a/lib/WebGUI/Asset/WikiPage.pm
+++ b/lib/WebGUI/Asset/WikiPage.pm
@@ -258,13 +258,6 @@ sub processPropertiesFromFormPost {
         $self->setSize($size);
 }	
 
-#-------------------------------------------------------------------
-sub purge {
-	my $self = shift;
-	$self->session->db->write("DELETE FROM WikiMaster_titleIndex WHERE assetId = ?", [$self->getId]);
-	return $self->SUPER::purge;
-}
-
 #-------------------------------------------------------------------
 sub view {
 	my $self = shift;
diff --git a/lib/WebGUI/Asset/Wobject/WikiMaster.pm b/lib/WebGUI/Asset/Wobject/WikiMaster.pm
index b669e66c1..298471be4 100644
--- a/lib/WebGUI/Asset/Wobject/WikiMaster.pm
+++ b/lib/WebGUI/Asset/Wobject/WikiMaster.pm
@@ -288,13 +288,6 @@ sub processPropertiesFromFormPost {
 	return $ret;
 }
 
-#-------------------------------------------------------------------
-sub purge {
-	my $self = shift;
-	$self->session->db->write('DELETE FROM WikiMaster_titleIndex WHERE assetId = ?', [$self->getId]);
-	return $self->SUPER::purge;
-}
-
 #-------------------------------------------------------------------
 sub view {
 	my $self = shift;