Tadashi Okoshi
slash****@users*****
2006年 6月 5日 (月) 18:21:13 JST
Index: affelio/lib/Affelio/Managing/PermissionManager.pm
diff -u affelio/lib/Affelio/Managing/PermissionManager.pm:1.7 affelio/lib/Affelio/Managing/PermissionManager.pm:1.8
--- affelio/lib/Affelio/Managing/PermissionManager.pm:1.7 Tue Mar 7 23:39:10 2006
+++ affelio/lib/Affelio/Managing/PermissionManager.pm Mon Jun 5 18:21:13 2006
@@ -14,7 +14,7 @@
# along with this program; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
#
-# $Id: PermissionManager.pm,v 1.7 2006/03/07 14:39:10 slash5234 Exp $
+# $Id: PermissionManager.pm,v 1.8 2006/06/05 09:21:13 slash5234 Exp $
package Affelio::Managing::PermissionManager;
{
@@ -61,12 +61,11 @@
debug_print("add_permission type[$type] id[$id] size(flag)=$flag_size");
my $af = $self->{af};
- #add more elements upto 63
- for(my $i=$flag_size; $i<=63; $i++){
+ #add more elements upto 255
+ for(my $i=$flag_size; $i<=65; $i++){
push(@flag_array, "-1");
}
$flag_size = @flag_array;
-
debug_print("add_permission (increased) size(flag)=$flag_size");
#Decide $newid
@@ -91,11 +90,11 @@
#generate an SQL query
$query = "insert into $af->{site__dbtbl_prefix}_CORE_permission(pid, type, target_id";
- for(my $j=0; $j<=63; $j++){
+ for(my $j=0; $j<=65; $j++){
$query .= ", attr$j";
}
$query .= ") values (?,?,?";
- for(my $k=0; $k<=63; $k++){
+ for(my $k=0; $k<=65; $k++){
$query .= "," . $flag_array[$k];
}
$query .= ")";
@@ -147,15 +146,15 @@
debug_print("update_permission pid[$pid]");
my $af = $self->{af};
- #add more elements upto 63
+ #add more elements upto 255
my $flag_size = @flag_array;
- for(my $i=$flag_size; $i<=63; $i++){
+ for(my $i=$flag_size; $i<=65; $i++){
push(@flag_array, "-1");
}
#prepare SQL query
my $query = "update $af->{site__dbtbl_prefix}_CORE_permission set ";
- for(my $k=0; $k<=63; $k++){
+ for(my $k=0; $k<=65; $k++){
$query .= " attr$k = '" . $flag_array[$k] . "'," ;
}
chop($query);
Index: affelio/lib/Affelio/Managing/ProfileManager.pm
diff -u affelio/lib/Affelio/Managing/ProfileManager.pm:1.7 affelio/lib/Affelio/Managing/ProfileManager.pm:1.8
--- affelio/lib/Affelio/Managing/ProfileManager.pm:1.7 Tue Mar 7 23:39:10 2006
+++ affelio/lib/Affelio/Managing/ProfileManager.pm Mon Jun 5 18:21:13 2006
@@ -14,7 +14,7 @@
# along with this program; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
-# $Id: ProfileManager.pm,v 1.7 2006/03/07 14:39:10 slash5234 Exp $
+# $Id: ProfileManager.pm,v 1.8 2006/06/05 09:21:13 slash5234 Exp $
package Affelio::Managing::ProfileManager;
{
@@ -81,6 +81,9 @@
return("");
}
+ #######################################################################
+ #save_profile_value
+ #######################################################################
sub save_profile_value{
my $self = shift;
my $af = $self->{af};