Changeset 8595 for lang/perl/XML-Atom-Server-Lite/trunk/lib/XML/Atom/Server/Lite/Entry.pm

Timestamp:

04/01/08 16:45:26 (5 years ago)

Author:

mattn

Message:

lang/perl/XML-Atom-Server-Lite/trunk/lib/XML/Atom/Server/Lite/Entry.pm,
lang/perl/XML-Atom-Server-Lite/trunk/lib/XML/Atom/Server/Lite/Feed.pm:
replace several tabs to spaces.

Files:

• lang/perl/XML-Atom-Server-Lite/trunk/lib/XML/Atom/Server/Lite/Entry.pm (modified) (1 diff)

lang/perl/XML-Atom-Server-Lite/trunk/lib/XML/Atom/Server/Lite/Entry.pm

@@ -8 +8 @@
     my $class = shift;
     my $self = bless {}, $class;
-        $self->{id} = '';
-        $self->{logo} = '';
-        $self->{icon} = '';
-        $self->{title} = '';
-        $self->{link} = [];
-        $self->{subject} = [];
-        $self->{author} = [];
-        $self->{content} = {};
-        $self->{category} = {};
-        $self;
+    $self->{id} = '';
+    $self->{logo} = '';
+    $self->{icon} = '';
+    $self->{title} = '';
+    $self->{link} = [];
+    $self->{subject} = [];
+    $self->{author} = [];
+    $self->{content} = {};
+    $self->{category} = {};
+    $self;
 }