diff Lib/IMPL/DOM/Navigator.pm @ 194:4d0e1962161c

Replaced tabs with spaces IMPL::Web::View - fixed document model, new features (control classes, document constructor parameters)
author cin
date Tue, 10 Apr 2012 20:08:29 +0400
parents d1676be8afcc
children a4d9126edcbb
line wrap: on
line diff
--- a/Lib/IMPL/DOM/Navigator.pm	Tue Apr 10 08:13:22 2012 +0400
+++ b/Lib/IMPL/DOM/Navigator.pm	Tue Apr 10 20:08:29 2012 +0400
@@ -155,18 +155,18 @@
 }
 
 sub pathLength {
-	my ($this) = @_;
-	$this->{$_path} ? scalar @{$this->{$_path}} : 0;
+    my ($this) = @_;
+    $this->{$_path} ? scalar @{$this->{$_path}} : 0;
 }
 
 sub GetNodeFromHistory {
-	my ($this,$index) = @_;
-	
-	if (my $state = $this->{$_path} ? $this->{$_path}->[$index] : undef ) {
-		return $state->{alternatives}[$state->{current}]
-	} else {
-		return undef;
-	}
+    my ($this,$index) = @_;
+    
+    if (my $state = $this->{$_path} ? $this->{$_path}->[$index] : undef ) {
+        return $state->{alternatives}[$state->{current}]
+    } else {
+        return undef;
+    }
 }
 
 sub clone {