From 3f52bd337fed20cd1c8130cb3a7f66cef2b9e96b Mon Sep 17 00:00:00 2001
From: Scott Walters <scott@slowass.net>
Date: Mon, 19 Jul 2010 12:33:32 -0400
Subject: [PATCH] Don't AUTOLOAD calls to DESTROY.  Avoids Could not load
 WebGUI::Form::DESTROY because Can't locate WebGUI/Form/DESTROY.pm in
 /data/WebGUI/lib/WebGUI/Pluggable.pm line 247.

---
 lib/WebGUI/HTMLForm.pm | 1 +
 1 file changed, 1 insertion(+)

diff --git a/lib/WebGUI/HTMLForm.pm b/lib/WebGUI/HTMLForm.pm
index 683f21e83..8de01edf4 100644
--- a/lib/WebGUI/HTMLForm.pm
+++ b/lib/WebGUI/HTMLForm.pm
@@ -82,6 +82,7 @@ sub AUTOLOAD {
     our $AUTOLOAD;
 	my $self = shift;
     my $name = ucfirst((split /::/, $AUTOLOAD)[-1]);
+    return if $name eq 'DESTROY';
     my %params = @_;
 	$params{rowClass} ||= $self->{_class};
     my $control = eval { WebGUI::Pluggable::instanciate("WebGUI::Form::".$name, "new", [ $self->session, %params ]) };