Index: squid/helpers/external_acl/wbinfo_group/wbinfo_group.pl
diff -c squid/helpers/external_acl/wbinfo_group/wbinfo_group.pl:1.1.2.1 squid/helpers/external_acl/wbinfo_group/wbinfo_group.pl:1.1.2.2
*** squid/helpers/external_acl/wbinfo_group/wbinfo_group.pl:1.1.2.1	Fri Jul 12 02:33:14 2002
--- squid/helpers/external_acl/wbinfo_group/wbinfo_group.pl	Tue Feb 17 15:37:51 2004
***************
*** 34,40 ****
 local($user, $group) = @_;
 $groupSID = `wbinfo -n "$group"`;
 chop $groupSID;
! $groupGID = `wbinfo -Y $groupSID`;
 chop $groupGID;
 &debug( "User: -$user-\nGroup: -$group-\nSID: -$groupSID-\nGID: -$groupGID-");
 return 'OK' if(`wbinfo -r \Q$user\E` =~ /^$groupGID$/m);
--- 34,40 ----
 local($user, $group) = @_;
 $groupSID = `wbinfo -n "$group"`;
 chop $groupSID;
! $groupGID = `wbinfo -Y "$groupSID"`;
 chop $groupGID;
 &debug( "User: -$user-\nGroup: -$group-\nSID: -$groupSID-\nGID: -$groupGID-");
 return 'OK' if(`wbinfo -r \Q$user\E` =~ /^$groupGID$/m);
</div><div class="naked_ctrl">
<form action="/index.cgi/contrast" method="get" name="gate">
<p><a href="http://altstyle.alfasado.net">AltStyle</a> によって変換されたページ <a href="http://www.squid-cache.org/Versions/v2/2.5/bugs/squid-2.5.STABLE4-wbinfo_group.patch">(-&gt;オリジナル)</a>
/ <label>アドレス: <input type="text" name="naked_post_url" value="http://www.squid-cache.org/Versions/v2/2.5/bugs/squid-2.5.STABLE4-wbinfo_group.patch" size="22" /></label> <label>モード: <select name="naked_post_mode">
<option value="default">デフォルト</option>
<option value="speech">音声ブラウザ</option>
<option value="ruby">ルビ付き</option>
<option value="contrast" selected="selected">配色反転</option>
<option value="larger-text">文字拡大</option>
<option value="mobile">モバイル</option>
</select>
<input type="submit" value="表示" />
</p>
</form>
</div>