MOO-cows Mailing List Archive
[Prev][Next][Index][Thread]
byte based quota
-
Date: Tue, 30 Apr 1996 18:51:05 PDT
-
From: Edward Goff <egoff@iquest.com>
-
Content-Type: TEXT/PLAIN; charset=US-ASCII
Has anyone gotten it to work. .since 1.7.8p4 ?? I didn't try on 1.7.9p2
and 1.8.0p2 won't do it. E_PERM in obj #80.. went to 1.8.0p4 hoping to
fix it after several wizards said ain't fixable.. (BTW its a basic core.
no modsat all yet..
BTW here's the TB when we tried it with 1.8.0p4
#80:charge_quota, line 16: Permission denied
... called from #80:bi_create, line 7
... called from #62:_create, line 6
... called from #4:_create (this == #2), line 5
... called from #4:@create (this == #2), line 29
(End of traceback)
and said verb
#80:charge_quota this none this
1: "Charge args[1] for the quota required to own args[2]";
2: if (caller == this || caller_perms().wizard)
3: usage_index = 2;
4: unmeasured_index = 4;
5: who = args[1];
6: what = args[2];
7: object_size = $object_utils:has_property(what, "object_size") ?
what.object_size[1] | -1;
8: if (object_size <= 0)
9: who.size_quota[unmeasured_index] =
who.size_quota[unmeasured_index] +
1;
10: else
11: who.size_quota[usage_index] = who.size_quota[usage_index] +
object_size;
12: endif
13: else
14: return E_PERM;
15: endif
me where's line 16 (or in p2 wheres line 8 on add_quota (think thats the
verb.)))
egoff@vespucci.iquest.com
Home |
Subject Index |
Thread Index