Mercurial > pub > Impl

changeset 392:54b1dc9e808a

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
fixed web-resources access check
author sergey
date Fri, 14 Feb 2014 03:31:45 +0400
parents 2287c72f303a
children 69a1f1508696
files Lib/IMPL/Web/Application/Resource.pm
diffstat 1 files changed, 7 insertions(+), 0 deletions(-) [+]
line wrap: on
line diff
--- a/Lib/IMPL/Web/Application/Resource.pm	Thu Feb 13 20:17:22 2014 +0400
+++ b/Lib/IMPL/Web/Application/Resource.pm	Fri Feb 14 03:31:45 2014 +0400
@@ -77,6 +77,13 @@
 	shift->model;
 }
 
+sub AccessCheck {
+	my ($this,$verb) = @_;
+	
+	$this->_invoke($this->access,$verb)
+		if $this->access;
+}
+
 sub Fetch {
 	my ($this,$childId) = @_;