comparison Lib/IMPL/DOM/Navigator.pm @ 238:b8c724f6de36

DOM model refactoring TT view refactoring, controls are no longer derived from DOM nodes bugfixes
author sergey
date Tue, 16 Oct 2012 01:33:06 +0400
parents a4d9126edcbb
children 4ddb27ff4a0b
comparison
equal deleted inserted replaced
237:61db68166c37 238:b8c724f6de36
13 } 13 }
14 14
15 sub CTOR { 15 sub CTOR {
16 my ($this,$CurrentNode) = @_; 16 my ($this,$CurrentNode) = @_;
17 17
18 die IMPL::InvalidArgumentException("A starting node is a required paramater") unless $CurrentNode; 18 die IMPL::InvalidArgumentException->new("A starting node is a required paramater") unless $CurrentNode;
19 19
20 $this->{$_state} = { alternatives => [ $CurrentNode ], current => 0 }; 20 $this->{$_state} = { alternatives => [ $CurrentNode ], current => 0 };
21 } 21 }
22 22
23 sub _initNavigator { 23 sub _initNavigator {
24 my ($this,$CurrentNode) = @_; 24 my ($this,$CurrentNode) = @_;
25 25
26 die IMPL::InvalidArgumentException("A starting node is a required paramater") unless $CurrentNode; 26 die IMPL::InvalidArgumentException->new("A starting node is a required paramater") unless $CurrentNode;
27 27
28 $this->{$_state} = { alternatives => [ $CurrentNode ], current => 0 }; 28 $this->{$_state} = { alternatives => [ $CurrentNode ], current => 0 };
29 delete $this->{$_path}; 29 delete $this->{$_path};
30 delete $this->{$_savedstates}; 30 delete $this->{$_savedstates};
31 } 31 }