Mercurial > pub > Impl
comparison Lib/IMPL/Web/Application/Resource.pm @ 392:54b1dc9e808a
fixed web-resources access check
author | sergey |
---|---|
date | Fri, 14 Feb 2014 03:31:45 +0400 |
parents | 2287c72f303a |
children | ef37ec102dab |
comparison
equal
deleted
inserted
replaced
391:2287c72f303a | 392:54b1dc9e808a |
---|---|
73 } | 73 } |
74 } | 74 } |
75 | 75 |
76 sub HttpGet { | 76 sub HttpGet { |
77 shift->model; | 77 shift->model; |
78 } | |
79 | |
80 sub AccessCheck { | |
81 my ($this,$verb) = @_; | |
82 | |
83 $this->_invoke($this->access,$verb) | |
84 if $this->access; | |
78 } | 85 } |
79 | 86 |
80 sub Fetch { | 87 sub Fetch { |
81 my ($this,$childId) = @_; | 88 my ($this,$childId) = @_; |
82 | 89 |