Changeset 4294 for trunk/WysiwygPlugin/lib/Foswiki/Plugins/WysiwygPlugin/TML2HTML.pm

Timestamp:

06/24/09 19:53:49 (3 years ago)

Author:

MichaelTempest

Message:

Item1770: perltidy

File:

• trunk/WysiwygPlugin/lib/Foswiki/Plugins/WysiwygPlugin/TML2HTML.pm (modified) (3 diffs)

trunk/WysiwygPlugin/lib/Foswiki/Plugins/WysiwygPlugin/TML2HTML.pm

@@ -601 +601 @@
 
     my $xmltags = $this->{opts}->{xmltag};
+
     # Take out custom XML tags
     sub _takeOutCustomXmlProcess {
         my ( $this, $state, $scoop ) = @_;
         my $params = $state->{tagParams};
-        my $tag = $state->{tag};
+        my $tag    = $state->{tag};
         my $markup = "<$tag$params>$scoop</$tag>";
-        if ($this->{opts}->{xmltag}->{$tag}->($markup)) {
+        if ( $this->{opts}->{xmltag}->{$tag}->($markup) ) {
             return $this->_liftOut( $markup, 'PROTECTED' );
         }
         else {
-            return $this->_liftOut( "<$tag$params>", 'PROTECTED' ) . $scoop . $this->_liftOut( "</$tag>", 'PROTECTED' );
+            return $this->_liftOut( "<$tag$params>", 'PROTECTED' ) . $scoop
+              . $this->_liftOut( "</$tag>", 'PROTECTED' );
         }
     }
@@ -624 +626 @@
 
 sub _takeOutBlocks {
+
     # my ( $this, $intext, $tag ) = @_;
 
@@ -653 +656 @@
     my $scoop;
 
-    # &$fn may rely on the existence of these fields, 
+    # &$fn may rely on the existence of these fields,
     # and may add more fields, if needed
     my %state = ( tag => $tag, n => 0, tagParams => undef );