From f2561a749104432eb6d4c545fce9be8252d61bdf 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 faf61d0b7..d6bd5a44d 100644
--- a/lib/WebGUI/HTMLForm.pm
+++ b/lib/WebGUI/HTMLForm.pm
@@ -81,6 +81,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 ]) };