comparison s4-funcs.sh @ 31:737a6e2717a9

Regexp fix
author HIROSE Yuuji <yuuji@gentei.org>
date Wed, 22 Jul 2015 09:34:35 +0900
parents 514acfff7453
children 54dba4c5e61d
comparison
equal deleted inserted replaced
30:a9f061d74153 31:737a6e2717a9
1177 sql="select rowid||':'||gname as 'グループ名',説明 from (select (select rowid from grp g where g.gname=grp_s.gname) as rowid,gname,max(case key when 'gecos' then val end) as '説明',max(case key when 'tag' then val end) as 'tag',max(case key when 'mtime' then val end) as mtime from grp_s group by gname having tag='$tag' order by mtime desc);" 1177 sql="select rowid||':'||gname as 'グループ名',説明 from (select (select rowid from grp g where g.gname=grp_s.gname) as rowid,gname,max(case key when 'gecos' then val end) as '説明',max(case key when 'tag' then val end) as 'tag',max(case key when 'mtime' then val end) as mtime from grp_s group by gname having tag='$tag' order by mtime desc);"
1178 err PersonalGroupList= `echo $sql` 1178 err PersonalGroupList= `echo $sql`
1179 echo "<h2>$tn</h2>" 1179 echo "<h2>$tn</h2>"
1180 echo '<table class="b listgroup">' 1180 echo '<table class="b listgroup">'
1181 sq -header -html $db "$sql" \ 1181 sq -header -html $db "$sql" \
1182 | sed "s,\(<TR><TD>\)\([0-9]*\):\([-_A-z0-9]*\)</TD>,\1$href\2\">\3</a>," 1182 | sed "s,\(<TR><TD>\)\([0-9]*\):\([^ ]*\)</TD>,\1$href\2\">\3</a>,"
1183 echo '</table>' 1183 echo '</table>'
1184 done 1184 done
1185 echo '</div>' 1185 echo '</div>'
1186 } 1186 }
1187 iconhref() ( 1187 iconhref() (

yatex.org