Mercurial > pub > Impl

comparison Lib/IMPL/DOM/Navigator/Builder.pm @ 112:0ed8e2541b1c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Form processing mechanism
author wizard
date Tue, 18 May 2010 17:59:31 +0400
parents 83e356614c1e
children 7b14e0122b79
comparison
equal deleted inserted replaced
111:6c25ea91c985 112:0ed8e2541b1c
15 public _direct property BuildErrors => prop_get | prop_list; 15 public _direct property BuildErrors => prop_get | prop_list;
16 public _direct property Document => prop_get | owner_set; 16 public _direct property Document => prop_get | owner_set;
17 } 17 }
18 18
19 our %CTOR = ( 19 our %CTOR = (
20 'IMPL::DOM::Navigator' => sub { IMPL::DOM::Document::Empty; } 20 'IMPL::DOM::Navigator' => sub { IMPL::DOM::Document->Empty; }
21 ); 21 );
22 22
23 sub CTOR { 23 sub CTOR {
24 my ($this,$docClass,$schema) = @_; 24 my ($this,$docClass,$schema) = @_;
25 25
106 106
107 $this->{$_schemaNavi}->SchemaBack(); 107 $this->{$_schemaNavi}->SchemaBack();
108 $this->SUPER::Back(); 108 $this->SUPER::Back();
109 } 109 }
110 110
111 sub saveState {
112 my ($this) = @_;
113
114 $this->{$_schemaNavi}->saveState;
115 $this->SUPER::saveState;
116 }
117
118 sub restoreState {
119 my ($this) = @_;
120
121 $this->{$_schemaNavi}->restoreState;
122 $this->SUPER::restoreState;
123 }
124
111 1; 125 1;
112 126
113 __END__ 127 __END__
114 128
115 =pod 129 =pod