Mercurial > hgrepos > hgweb.cgi > s4

changeset 465:4c6a3bacfec3

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Show read-time link only to group administrators
author HIROSE Yuuji <yuuji@gentei.org>
date Tue, 22 Aug 2017 08:20:02 +0859
parents 6591b5308ddd
children 929a925f10d8
files s4-blog.sh
diffstat 1 files changed, 5 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/s4-blog.sh	Mon Aug 21 20:39:45 2017 +0859
+++ b/s4-blog.sh	Tue Aug 22 08:20:02 2017 +0859
@@ -131,6 +131,7 @@
 
   blogowner=`getvalbyid blog owner "$2"`
   isgroup "$blogowner" && isgroup=true || isgroup=false
+  isgrpadmin=false			# Reversed later (*1)
 
   # 2015-10-05 check readable
   if ! $iswritable; then
@@ -146,6 +147,8 @@
 	fi
       fi
     fi
+  else	# if writable
+    isgrpowner "$user" "$blogowner" && isgrpadmin=true	# (*1)
   fi
   case `getvalbyid blog notify "$2"` in # "all", "admin" or "no" (or NULL)
     admin)	notifyto=1 ;;
@@ -174,7 +177,8 @@
     href3="(<a href=\"?gethandout+$rowid\" accesskey=\"f\" title=\"F\">ファイル取得</a>)"
   fi
   href4='<a href="#bottom" accesskey="b" title="B"> 末尾へ</a>'
-  href5="<a href=\"?blogseen+$rowid\" accesskey=\"s\" title=\"S\"> 読刻</a>"
+  $isgrpadmin &&
+      href5="<a href=\"?blogseen+$rowid\" accesskey=\"s\" title=\"S\"> 読刻</a>"
   quizmodefile=$td/quiz; rm -f "$quizmodefile"	# XXX: Global state
 
   query<<-EOF |

yatex.org