From fd736e7f67e5b6b7a0ba6e7d7a8c4dedaf8c0105 Mon Sep 17 00:00:00 2001
From: Colin Kuskie <colink@perldreamer.com>
Date: Thu, 8 Apr 2010 16:25:54 -0700
Subject: [PATCH] SUPER handling for Wobject.

---
 lib/WebGUI/Asset/Wobject.pm | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/lib/WebGUI/Asset/Wobject.pm b/lib/WebGUI/Asset/Wobject.pm
index f4703201d..b79a04ddc 100644
--- a/lib/WebGUI/Asset/Wobject.pm
+++ b/lib/WebGUI/Asset/Wobject.pm
@@ -341,15 +341,15 @@ Returns output parsed under the current style.  See also Asset::processStyle.
 
 =cut
 
-sub processStyle {
+override processStyle => sub {
 	my ($self, $output, $options) = @_;
-    $output   = $self->SUPER::processStyle($output, $options);
+    $output   = super();
     my $style = $self->session->style;
     if ($style->useMobileStyle) {
         return $style->process($output,$self->get("mobileStyleTemplateId"));
     }
     return $style->process($output,$self->get("styleTemplateId"));
-}
+};
 
 
 #-------------------------------------------------------------------