# HG changeset patch
# User HIROSE Yuuji <yuuji@gentei.org>
# Date 1482798563 -32399
# Node ID db25589d864c228e80584c3237e8642fe9e85a08
# Parent  f50d4df067b5a3203bc7667fb6b1df38650ff423
Add frozen tag to lshandoutall listings

diff -r f50d4df067b5 -r db25589d864c s4-blog.sh
--- a/s4-blog.sh	Tue Dec 27 09:18:49 2016 +0859
+++ b/s4-blog.sh	Tue Dec 27 09:29:22 2016 +0859
@@ -4,6 +4,7 @@
 # Global error flags
 BLOG_NOTMEM=1
 BLOG_FROZEN=2
+FROZEN_TAG='<span class="frozen">[凍結]</span>'
 
 blog_genform() {
   #
@@ -429,9 +430,11 @@
       [ $brid = 0 ] && continue
       time=`getvalbyid blog ctime $brid|colrm 11`
       title=`getvalbyid blog title $brid|htmlescape`
+      state=`getvalbyid blog state $brid|htmlescape`
       tt="handout_$brid"
+      [ "$state" = "frozen" ] && frozen=" $FROZEN_TAG" || frozen=""
       if [ -z "$CATCSV" ]; then
-	echo "<h2>$time - <a href=\"?replyblog+$brid\">$title</a></h2>"
+	echo "<h2>$time - <a href=\"?replyblog+$brid\">$title</a>$frozen</h2>"
 	lshandoutsub "$owner" $brid "$tt"
       else
 	lshandoutsub "$owner" $brid "$tt" >/dev/null # Only create temp.table
@@ -808,7 +811,7 @@
     if [ $((rc & $BLOG_FROZEN)) -gt 0 ]; then
       isfrozen=true
       frozen_class='frozen"'
-      frozen_flag="<span class=\"$frozen_class\">[凍結]</span>"
+      frozen_flag=$FROZEN_TAG
     fi
   fi
   if isuser "$owner"; then