Changeset 12169 for trunk/gsdl/perllib/plugins/StructuredHTMLPlug.pm

Timestamp:

2006-07-12T14:12:36+12:00 (18 years ago)

Author:

mdewsnip

Message:

Tidied up that horrible long line in the new() function of every plugin.

File:

• trunk/gsdl/perllib/plugins/StructuredHTMLPlug.pm (modified) (1 diff)

trunk/gsdl/perllib/plugins/StructuredHTMLPlug.pm

@@ -91 +91 @@
     if(defined $options) { push(@{$hashArgOptLists->{"OptList"}},$options)};
     
-    my $self = (defined $hashArgOptLists)? new HTMLPlug($pluginlist,$inputargs,$hashArgOptLists): new HTMLPlug($pluginlist,$inputargs);
+    my $self = new HTMLPlug($pluginlist, $inputargs, $hashArgOptLists);
     
     return bless $self, $class;