Changeset 12169 for trunk/gsdl/perllib/plugins/TEXTPlug.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/TEXTPlug.pm (modified) (1 diff)

trunk/gsdl/perllib/plugins/TEXTPlug.pm

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