fix the rel target
[freeside.git] / rt / lib / RT / ACE.pm
index 9073b02..1501a12 100755 (executable)
@@ -1,14 +1,8 @@
-# BEGIN BPS TAGGED BLOCK {{{
+# BEGIN LICENSE BLOCK
 # 
 # 
-# COPYRIGHT:
-#  
-# This software is Copyright (c) 1996-2005 Best Practical Solutions, LLC 
-#                                          <jesse@bestpractical.com>
+# Copyright (c) 1996-2003 Jesse Vincent <jesse@bestpractical.com>
 # 
 # 
-# (Except where explicitly superseded by other copyright notices)
-# 
-# 
-# LICENSE:
+# (Except where explictly superceded by other copyright notices)
 # 
 # This work is made available to you under the terms of Version 2 of
 # the GNU General Public License. A copy of that license should have
 # 
 # This work is made available to you under the terms of Version 2 of
 # the GNU General Public License. A copy of that license should have
 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 # General Public License for more details.
 # 
 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
 # General Public License for more details.
 # 
-# You should have received a copy of the GNU General Public License
-# along with this program; if not, write to the Free Software
-# Foundation, Inc., 675 Mass Ave, Cambridge, MA 02139, USA.
-# 
-# 
-# CONTRIBUTION SUBMISSION POLICY:
-# 
-# (The following paragraph is not intended to limit the rights granted
-# to you to modify and distribute this software under the terms of
-# the GNU General Public License and is only of importance to you if
-# you choose to contribute your changes and enhancements to the
-# community by submitting them to Best Practical Solutions, LLC.)
+# Unless otherwise specified, all modifications, corrections or
+# extensions to this work which alter its source code become the
+# property of Best Practical Solutions, LLC when submitted for
+# inclusion in the work.
 # 
 # 
-# By intentionally submitting any modifications, corrections or
-# derivatives to this work, or any other work intended for use with
-# Request Tracker, to Best Practical Solutions, LLC, you confirm that
-# you are the copyright holder for those contributions and you grant
-# Best Practical Solutions,  LLC a nonexclusive, worldwide, irrevocable,
-# royalty-free, perpetual, license to use, copy, create derivative
-# works based on those contributions, and sublicense and distribute
-# those contributions and any derivatives thereof.
 # 
 # 
-# END BPS TAGGED BLOCK }}}
+# END LICENSE BLOCK
 # Autogenerated by DBIx::SearchBuilder factory (by <jesse@bestpractical.com>)
 # WARNING: THIS FILE IS AUTOGENERATED. ALL CHANGES TO THIS FILE WILL BE LOST.  
 # 
 # Autogenerated by DBIx::SearchBuilder factory (by <jesse@bestpractical.com>)
 # WARNING: THIS FILE IS AUTOGENERATED. ALL CHANGES TO THIS FILE WILL BE LOST.  
 # 
@@ -83,7 +61,7 @@ sub _Init {
 
 
 
 
 
 
-=head2 Create PARAMHASH
+=item Create PARAMHASH
 
 Create takes a hash of values and creates a row in the database:
 
 
 Create takes a hash of values and creates a row in the database:
 
@@ -126,7 +104,7 @@ sub Create {
 
 
 
 
 
 
-=head2 id
+=item id
 
 Returns the current value of id. 
 (In the database, id is stored as int(11).)
 
 Returns the current value of id. 
 (In the database, id is stored as int(11).)
@@ -135,14 +113,14 @@ Returns the current value of id.
 =cut
 
 
 =cut
 
 
-=head2 PrincipalType
+=item PrincipalType
 
 Returns the current value of PrincipalType. 
 (In the database, PrincipalType is stored as varchar(25).)
 
 
 
 
 Returns the current value of PrincipalType. 
 (In the database, PrincipalType is stored as varchar(25).)
 
 
 
-=head2 SetPrincipalType VALUE
+=item SetPrincipalType VALUE
 
 
 Set PrincipalType to VALUE. 
 
 
 Set PrincipalType to VALUE. 
@@ -153,14 +131,14 @@ Returns (1, 'Status message') on success and (0, 'Error Message') on failure.
 =cut
 
 
 =cut
 
 
-=head2 PrincipalId
+=item PrincipalId
 
 Returns the current value of PrincipalId. 
 (In the database, PrincipalId is stored as int(11).)
 
 
 
 
 Returns the current value of PrincipalId. 
 (In the database, PrincipalId is stored as int(11).)
 
 
 
-=head2 SetPrincipalId VALUE
+=item SetPrincipalId VALUE
 
 
 Set PrincipalId to VALUE. 
 
 
 Set PrincipalId to VALUE. 
@@ -171,14 +149,14 @@ Returns (1, 'Status message') on success and (0, 'Error Message') on failure.
 =cut
 
 
 =cut
 
 
-=head2 RightName
+=item RightName
 
 Returns the current value of RightName. 
 (In the database, RightName is stored as varchar(25).)
 
 
 
 
 Returns the current value of RightName. 
 (In the database, RightName is stored as varchar(25).)
 
 
 
-=head2 SetRightName VALUE
+=item SetRightName VALUE
 
 
 Set RightName to VALUE. 
 
 
 Set RightName to VALUE. 
@@ -189,14 +167,14 @@ Returns (1, 'Status message') on success and (0, 'Error Message') on failure.
 =cut
 
 
 =cut
 
 
-=head2 ObjectType
+=item ObjectType
 
 Returns the current value of ObjectType. 
 (In the database, ObjectType is stored as varchar(25).)
 
 
 
 
 Returns the current value of ObjectType. 
 (In the database, ObjectType is stored as varchar(25).)
 
 
 
-=head2 SetObjectType VALUE
+=item SetObjectType VALUE
 
 
 Set ObjectType to VALUE. 
 
 
 Set ObjectType to VALUE. 
@@ -207,14 +185,14 @@ Returns (1, 'Status message') on success and (0, 'Error Message') on failure.
 =cut
 
 
 =cut
 
 
-=head2 ObjectId
+=item ObjectId
 
 Returns the current value of ObjectId. 
 (In the database, ObjectId is stored as int(11).)
 
 
 
 
 Returns the current value of ObjectId. 
 (In the database, ObjectId is stored as int(11).)
 
 
 
-=head2 SetObjectId VALUE
+=item SetObjectId VALUE
 
 
 Set ObjectId to VALUE. 
 
 
 Set ObjectId to VALUE. 
@@ -225,14 +203,14 @@ Returns (1, 'Status message') on success and (0, 'Error Message') on failure.
 =cut
 
 
 =cut
 
 
-=head2 DelegatedBy
+=item DelegatedBy
 
 Returns the current value of DelegatedBy. 
 (In the database, DelegatedBy is stored as int(11).)
 
 
 
 
 Returns the current value of DelegatedBy. 
 (In the database, DelegatedBy is stored as int(11).)
 
 
 
-=head2 SetDelegatedBy VALUE
+=item SetDelegatedBy VALUE
 
 
 Set DelegatedBy to VALUE. 
 
 
 Set DelegatedBy to VALUE. 
@@ -243,14 +221,14 @@ Returns (1, 'Status message') on success and (0, 'Error Message') on failure.
 =cut
 
 
 =cut
 
 
-=head2 DelegatedFrom
+=item DelegatedFrom
 
 Returns the current value of DelegatedFrom. 
 (In the database, DelegatedFrom is stored as int(11).)
 
 
 
 
 Returns the current value of DelegatedFrom. 
 (In the database, DelegatedFrom is stored as int(11).)
 
 
 
-=head2 SetDelegatedFrom VALUE
+=item SetDelegatedFrom VALUE
 
 
 Set DelegatedFrom to VALUE. 
 
 
 Set DelegatedFrom to VALUE. 
@@ -262,25 +240,25 @@ Returns (1, 'Status message') on success and (0, 'Error Message') on failure.
 
 
 
 
 
 
-sub _CoreAccessible {
+sub _ClassAccessible {
     {
      
         id =>
     {
      
         id =>
-               {read => 1, sql_type => 4, length => 11,  is_blob => 0,  is_numeric => 1,  type => 'int(11)', default => ''},
+               {read => 1, type => 'int(11)', default => ''},
         PrincipalType => 
         PrincipalType => 
-               {read => 1, write => 1, sql_type => 12, length => 25,  is_blob => 0,  is_numeric => 0,  type => 'varchar(25)', default => ''},
+               {read => 1, write => 1, type => 'varchar(25)', default => ''},
         PrincipalId => 
         PrincipalId => 
-               {read => 1, write => 1, sql_type => 4, length => 11,  is_blob => 0,  is_numeric => 1,  type => 'int(11)', default => '0'},
+               {read => 1, write => 1, type => 'int(11)', default => '0'},
         RightName => 
         RightName => 
-               {read => 1, write => 1, sql_type => 12, length => 25,  is_blob => 0,  is_numeric => 0,  type => 'varchar(25)', default => ''},
+               {read => 1, write => 1, type => 'varchar(25)', default => ''},
         ObjectType => 
         ObjectType => 
-               {read => 1, write => 1, sql_type => 12, length => 25,  is_blob => 0,  is_numeric => 0,  type => 'varchar(25)', default => ''},
+               {read => 1, write => 1, type => 'varchar(25)', default => ''},
         ObjectId => 
         ObjectId => 
-               {read => 1, write => 1, sql_type => 4, length => 11,  is_blob => 0,  is_numeric => 1,  type => 'int(11)', default => '0'},
+               {read => 1, write => 1, type => 'int(11)', default => '0'},
         DelegatedBy => 
         DelegatedBy => 
-               {read => 1, write => 1, sql_type => 4, length => 11,  is_blob => 0,  is_numeric => 1,  type => 'int(11)', default => '0'},
+               {read => 1, write => 1, type => 'int(11)', default => '0'},
         DelegatedFrom => 
         DelegatedFrom => 
-               {read => 1, write => 1, sql_type => 4, length => 11,  is_blob => 0,  is_numeric => 1,  type => 'int(11)', default => '0'},
+               {read => 1, write => 1, type => 'int(11)', default => '0'},
 
  }
 };
 
  }
 };
@@ -312,7 +290,7 @@ _Vendor is for 3rd-party vendor add-ons, while _Local is for site-local customiz
 
 These overlay files can contain new subs or subs to replace existing subs in this module.
 
 
 These overlay files can contain new subs or subs to replace existing subs in this module.
 
-Each of these files should begin with the line 
+If you'll be working with perl 5.6.0 or greater, each of these files should begin with the line 
 
    no warnings qw(redefine);
 
 
    no warnings qw(redefine);