From 99fc384e8fbb558098133842e6ef2ae27e1687c0 Mon Sep 17 00:00:00 2001
From: helmutm <helmutm@fd906abe-77d9-0310-91a1-e0d9ade77398>
Date: Fri, 5 Nov 2010 09:49:23 +0000
Subject: [PATCH] optionally restrict version listing

git-svn-id: svn://svn.cy55.de/Zope3/src/loops/trunk@4061 fd906abe-77d9-0310-91a1-e0d9ade77398
---
 browser/common.py            | 11 +++++++++++
 versioning/version_macros.pt |  5 ++---
 2 files changed, 13 insertions(+), 3 deletions(-)

diff --git a/browser/common.py b/browser/common.py
index a49a638..c6f3e09 100644
--- a/browser/common.py
+++ b/browser/common.py
@@ -499,6 +499,17 @@ class BaseView(GenericView, I18NView):
         if options:
             return 'useVersioning' in options.value
 
+    @Lazy
+    def showVersions(self):
+        permissions = self.globalOptions('showVersionsPermissions')
+        if permissions:
+            for p in permissions:
+                if checkPermission(p, self.target):
+                    return True
+            else:
+                return False
+        return True
+
     @Lazy
     def versionLevels(self):
         if self.versionable is not None:
diff --git a/versioning/version_macros.pt b/versioning/version_macros.pt
index b82d009..f2f8e2e 100644
--- a/versioning/version_macros.pt
+++ b/versioning/version_macros.pt
@@ -47,9 +47,8 @@
 <!-- portlets -->
 
 <metal:versions define-macro="portlet_versions">
-  <div>
-    <a href="#"
-       tal:attributes="href string:${view/url}/.${macro/info/uniqueId}?loops.viewName=listversions">
+  <div tal:condition="view/showVersions|python:True">
+    <a tal:attributes="href string:${view/url}/.${macro/info/uniqueId}?loops.viewName=listversions">
       <span i18n:translate="">All versions</span>
     </a>
   </div>