Mercurial > pub > Impl
comparison Lib/IMPL/Web/AutoLocator.pm @ 292:6dc1c369eb71
sync
| author | cin |
|---|---|
| date | Tue, 26 Feb 2013 02:21:03 +0400 |
| parents | 32aceba4ee6d |
| children | 793cc7f0a7e7 |
comparison
equal
deleted
inserted
replaced
| 291:5d14baa35790 | 292:6dc1c369eb71 |
|---|---|
| 53 } | 53 } |
| 54 | 54 |
| 55 return $this->new(%args); | 55 return $this->new(%args); |
| 56 } | 56 } |
| 57 | 57 |
| 58 sub Query { | |
| 59 my ($this,$query) = @_; | |
| 60 | |
| 61 my %args; | |
| 62 | |
| 63 $args{base} = $this->base; | |
| 64 $args{view} = $this->view if $this->view; | |
| 65 $args{hash} = $this->hash if $this->hash; | |
| 66 $args{query} = ref $query eq 'HASH' ? hashMerge($this->query,$query) : $query; | |
| 67 | |
| 68 return $this->new(%args); | |
| 69 } | |
| 70 | |
| 58 sub SetView { | 71 sub SetView { |
| 59 my ($this,$newView) = @_; | 72 my ($this,$newView) = @_; |
| 60 | 73 |
| 61 $this->view($newView); | 74 $this->view($newView); |
| 62 | 75 |
