[freeside-commits] freeside/rt/lib/RT Attachment.pm,1.2,1.3
Ivan,,,
ivan at wavetail.420.am
Sun Feb 19 14:41:15 PST 2012
Update of /home/cvs/cvsroot/freeside/rt/lib/RT
In directory wavetail.420.am:/tmp/cvs-serv16295/lib/RT
Modified Files:
Attachment.pm
Log Message:
fix ancient vendor branch CVS bs
Index: Attachment.pm
===================================================================
RCS file: /home/cvs/cvsroot/freeside/rt/lib/RT/Attachment.pm,v
retrieving revision 1.2
retrieving revision 1.3
diff -u -w -d -r1.2 -r1.3
--- Attachment.pm 15 Jul 2003 13:30:34 -0000 1.2
+++ Attachment.pm 19 Feb 2012 22:41:13 -0000 1.3
@@ -1,8 +1,14 @@
-# BEGIN LICENSE BLOCK
+# BEGIN BPS TAGGED BLOCK {{{
#
-# Copyright (c) 1996-2003 Jesse Vincent <jesse at bestpractical.com>
+# COPYRIGHT:
#
-# (Except where explictly superceded by other copyright notices)
+# This software is Copyright (c) 1996-2011 Best Practical Solutions, LLC
+# <sales at bestpractical.com>
+#
+# (Except where explicitly superseded by other copyright notices)
+#
+#
+# LICENSE:
#
# 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
@@ -14,13 +20,32 @@
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU
# General Public License for more details.
#
-# 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.
+# 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., 51 Franklin Street, Fifth Floor, Boston, MA
+# 02110-1301 or visit their web page on the internet at
+# http://www.gnu.org/licenses/old-licenses/gpl-2.0.html.
#
#
-# END LICENSE BLOCK
+# 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.)
+#
+# 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 }}}
+
# Autogenerated by DBIx::SearchBuilder factory (by <jesse at bestpractical.com>)
# WARNING: THIS FILE IS AUTOGENERATED. ALL CHANGES TO THIS FILE WILL BE LOST.
#
@@ -61,7 +86,7 @@
-=item Create PARAMHASH
+=head2 Create PARAMHASH
Create takes a hash of values and creates a row in the database:
@@ -110,7 +135,7 @@
-=item id
+=head2 id
Returns the current value of id.
(In the database, id is stored as int(11).)
@@ -119,14 +144,14 @@
=cut
-=item TransactionId
+=head2 TransactionId
Returns the current value of TransactionId.
(In the database, TransactionId is stored as int(11).)
-=item SetTransactionId VALUE
+=head2 SetTransactionId VALUE
Set TransactionId to VALUE.
@@ -137,14 +162,14 @@
=cut
-=item Parent
+=head2 Parent
Returns the current value of Parent.
(In the database, Parent is stored as int(11).)
-=item SetParent VALUE
+=head2 SetParent VALUE
Set Parent to VALUE.
@@ -155,14 +180,14 @@
=cut
-=item MessageId
+=head2 MessageId
Returns the current value of MessageId.
(In the database, MessageId is stored as varchar(160).)
-=item SetMessageId VALUE
+=head2 SetMessageId VALUE
Set MessageId to VALUE.
@@ -173,14 +198,14 @@
=cut
-=item Subject
+=head2 Subject
Returns the current value of Subject.
(In the database, Subject is stored as varchar(255).)
-=item SetSubject VALUE
+=head2 SetSubject VALUE
Set Subject to VALUE.
@@ -191,14 +216,14 @@
=cut
-=item Filename
+=head2 Filename
Returns the current value of Filename.
(In the database, Filename is stored as varchar(255).)
-=item SetFilename VALUE
+=head2 SetFilename VALUE
Set Filename to VALUE.
@@ -209,14 +234,14 @@
=cut
-=item ContentType
+=head2 ContentType
Returns the current value of ContentType.
(In the database, ContentType is stored as varchar(80).)
-=item SetContentType VALUE
+=head2 SetContentType VALUE
Set ContentType to VALUE.
@@ -227,14 +252,14 @@
=cut
-=item ContentEncoding
+=head2 ContentEncoding
Returns the current value of ContentEncoding.
(In the database, ContentEncoding is stored as varchar(80).)
-=item SetContentEncoding VALUE
+=head2 SetContentEncoding VALUE
Set ContentEncoding to VALUE.
@@ -245,14 +270,14 @@
=cut
-=item Content
+=head2 Content
Returns the current value of Content.
(In the database, Content is stored as longtext.)
-=item SetContent VALUE
+=head2 SetContent VALUE
Set Content to VALUE.
@@ -263,14 +288,14 @@
=cut
-=item Headers
+=head2 Headers
Returns the current value of Headers.
(In the database, Headers is stored as longtext.)
-=item SetHeaders VALUE
+=head2 SetHeaders VALUE
Set Headers to VALUE.
@@ -281,7 +306,7 @@
=cut
-=item Creator
+=head2 Creator
Returns the current value of Creator.
(In the database, Creator is stored as int(11).)
@@ -290,7 +315,7 @@
=cut
-=item Created
+=head2 Created
Returns the current value of Created.
(In the database, Created is stored as datetime.)
@@ -300,55 +325,38 @@
-sub _ClassAccessible {
+sub _CoreAccessible {
{
id =>
- {read => 1, type => 'int(11)', default => ''},
+ {read => 1, sql_type => 4, length => 11, is_blob => 0, is_numeric => 1, type => 'int(11)', default => ''},
TransactionId =>
- {read => 1, write => 1, type => 'int(11)', default => '0'},
+ {read => 1, write => 1, sql_type => 4, length => 11, is_blob => 0, is_numeric => 1, type => 'int(11)', default => '0'},
Parent =>
- {read => 1, write => 1, type => 'int(11)', default => '0'},
+ {read => 1, write => 1, sql_type => 4, length => 11, is_blob => 0, is_numeric => 1, type => 'int(11)', default => '0'},
MessageId =>
- {read => 1, write => 1, type => 'varchar(160)', default => ''},
+ {read => 1, write => 1, sql_type => 12, length => 160, is_blob => 0, is_numeric => 0, type => 'varchar(160)', default => ''},
Subject =>
- {read => 1, write => 1, type => 'varchar(255)', default => ''},
+ {read => 1, write => 1, sql_type => 12, length => 255, is_blob => 0, is_numeric => 0, type => 'varchar(255)', default => ''},
Filename =>
- {read => 1, write => 1, type => 'varchar(255)', default => ''},
+ {read => 1, write => 1, sql_type => 12, length => 255, is_blob => 0, is_numeric => 0, type => 'varchar(255)', default => ''},
ContentType =>
- {read => 1, write => 1, type => 'varchar(80)', default => ''},
+ {read => 1, write => 1, sql_type => 12, length => 80, is_blob => 0, is_numeric => 0, type => 'varchar(80)', default => ''},
ContentEncoding =>
- {read => 1, write => 1, type => 'varchar(80)', default => ''},
+ {read => 1, write => 1, sql_type => 12, length => 80, is_blob => 0, is_numeric => 0, type => 'varchar(80)', default => ''},
Content =>
- {read => 1, write => 1, type => 'longtext', default => ''},
+ {read => 1, write => 1, sql_type => -4, length => 0, is_blob => 1, is_numeric => 0, type => 'longtext', default => ''},
Headers =>
- {read => 1, write => 1, type => 'longtext', default => ''},
+ {read => 1, write => 1, sql_type => -4, length => 0, is_blob => 1, is_numeric => 0, type => 'longtext', default => ''},
Creator =>
- {read => 1, auto => 1, type => 'int(11)', default => '0'},
+ {read => 1, auto => 1, sql_type => 4, length => 11, is_blob => 0, is_numeric => 1, type => 'int(11)', default => '0'},
Created =>
- {read => 1, auto => 1, type => 'datetime', default => ''},
+ {read => 1, auto => 1, sql_type => 11, length => 0, is_blob => 0, is_numeric => 0, type => 'datetime', default => ''},
}
};
-
- eval "require RT::Attachment_Overlay";
- if ($@ && $@ !~ qr{^Can't locate RT/Attachment_Overlay.pm}) {
- die $@;
- };
-
- eval "require RT::Attachment_Vendor";
- if ($@ && $@ !~ qr{^Can't locate RT/Attachment_Vendor.pm}) {
- die $@;
- };
-
- eval "require RT::Attachment_Local";
- if ($@ && $@ !~ qr{^Can't locate RT/Attachment_Local.pm}) {
- die $@;
- };
-
-
-
+RT::Base->_ImportOverlays();
=head1 SEE ALSO
@@ -358,7 +366,7 @@
These overlay files can contain new subs or subs to replace existing subs in this module.
-If you'll be working with perl 5.6.0 or greater, each of these files should begin with the line
+Each of these files should begin with the line
no warnings qw(redefine);
More information about the freeside-commits
mailing list