changeset 189:972cb5ab0c5f

Rename m4 to _m4
author HIROSE Yuuji <yuuji@gentei.org>
date Sat, 23 Apr 2016 17:34:04 +0859
parents 952e0a160efd
children ba6c2c3c0373
files s4-blog.sh
diffstat 1 files changed, 19 insertions(+), 19 deletions(-) [+]
line wrap: on
line diff
--- a/s4-blog.sh	Sat Apr 23 17:29:34 2016 +0859
+++ b/s4-blog.sh	Sat Apr 23 17:34:04 2016 +0859
@@ -454,10 +454,10 @@
   title=`getvalbyid blog title $1`
   ge=`gecos $owner`
   lshandoutsub $owner "$@" \
-      |m4 -D_TITLE_="提出状況" \
-	  -D_FORMHEAD_="$time [$title]@${ge:-$owner}" \
-	  -D_FORM_="syscmd(cat)" -D_DUMPHEAD_= -D_DUMPTABLE_= \
-	  $layout/html.m4.html $layout/form+dump-whead.m4.html
+      |_m4 -D_TITLE_="提出状況" \
+	   -D_FORMHEAD_="$time [$title]@${ge:-$owner}" \
+	   -D_FORM_="syscmd(cat)" -D_DUMPHEAD_= -D_DUMPTABLE_= \
+	   $layout/html.m4.html $layout/form+dump-whead.m4.html
 }
 lshandoutsub() {
   # $1=owner $2=rowid of blog
@@ -574,7 +574,7 @@
 	  where m.val is not null order by $by $ord;"
   err lshandoutbyauthor: sql=`echo "$sql"`
   title="個人提出ファイル"
-  m4 -D_TITLE_=$title $layout/html.m4.html
+  _m4 -D_TITLE_=$title $layout/html.m4.html
   hra="<a href=\"?lsmyfile+"
   hrb="<a href=\"?showattc+article_m+"
   hrc="<a href=\"?replyblog+"
@@ -583,8 +583,8 @@
       | sed -e "s|\(<TR><TD>\)\([^/]*\)/\([0-9]*\)|\1$hrb\3\">\2</a>|" \
 	    -e "s|,t,\(.*\):\([^<]*\)\(</TD>\)|$hrc\2\">\1</a>\3|" \
 	    -e "s|\(<TH>\)\([A-Z]*\)\(</TH>\)|\1$hra\2$lkod\">\2</a>|" \
-      | m4 -D_TITLE_=$title -D_FORM_="<p>($by$jord)</p>" \
-	   -D_DUMPTABLE_="syscmd(cat)" $layout/form+dump.m4.html
+      | _m4 -D_TITLE_=$title -D_FORM_="<p>($by$jord)</p>" \
+	    -D_DUMPTABLE_="syscmd(cat)" $layout/form+dump.m4.html
   echo '</table>'
 }
 searchart() {
@@ -697,13 +697,13 @@
   echo "${guide}新規話題作成"	> $tmpd/title.$$
   listblog $listing		> $tmpd/listblog.$$
   genform $formdir/blog.def \
-      | m4 -D_TITLE_="spaste(\`$tmpd/title.$$')" \
-	   -D_FORMHEAD_="序文は簡単に詳しくはコメントに" \
-	   -D_DUMPHEAD_="これまでの蓄積" \
-	   -D_FORM_="syscmd(\`cat')" \
-	   -D_DUMPTABLE_="spaste(\`$tmpd/listblog.$$')" \
-	   $layout/html.m4.html \
-	   $layout/form+dump-whead.m4.html
+      | _m4 -D_TITLE_="spaste(\`$tmpd/title.$$')" \
+	    -D_FORMHEAD_="序文は簡単に詳しくはコメントに" \
+	    -D_DUMPHEAD_="これまでの蓄積" \
+	    -D_FORM_="syscmd(\`cat')" \
+	    -D_DUMPTABLE_="spaste(\`$tmpd/listblog.$$')" \
+	    $layout/html.m4.html \
+	    $layout/form+dump-whead.m4.html
 }
 
 blog_reply() {
@@ -745,9 +745,9 @@
   echo "$title" > $tmpd/title.$$
   echo "$subtitle" > $tmpd/subtitle.$$
   ${BLOG_SHOW:-blog_showentry} blog $rowid \
-      | m4 -D_TITLE_="spaste(\`$tmpd/title.$$')" -D_BODYCLASS_=general \
-	   -D_FORMHEAD_="spaste(\`$tmpd/subtitle.$$')" \
-	   -D_FORM_='' \
-	   -D_DUMPTABLE_="syscmd(cat)" -D_DUMPHEAD_="" \
-	   $layout/html.m4.html $layout/form+dump-whead.m4.html
+      | _m4 -D_TITLE_="spaste(\`$tmpd/title.$$')" -D_BODYCLASS_=general \
+	    -D_FORMHEAD_="spaste(\`$tmpd/subtitle.$$')" \
+	    -D_FORM_='' \
+	    -D_DUMPTABLE_="syscmd(cat)" -D_DUMPHEAD_="" \
+	    $layout/html.m4.html $layout/form+dump-whead.m4.html
 }

yatex.org