From: Moritz Bunkus <m.bunkus@linet-services.de>
Date: Mon, 24 Jan 2011 15:15:02 +0000 (+0100)
Subject: Alle Vorkommen von "Readonly" entfernt
X-Git-Tag: release-2.6.2~30
X-Git-Url: http://wagnertech.de/git?a=commitdiff_plain;h=dc04e2cb4bd0d16a34e590ae442775230b3ed28c;p=kivitendo-erp.git

Alle Vorkommen von "Readonly" entfernt
---

diff --git a/SL/DB/Object.pm b/SL/DB/Object.pm
index 0a698268c..1d1703846 100644
--- a/SL/DB/Object.pm
+++ b/SL/DB/Object.pm
@@ -2,7 +2,6 @@ package SL::DB::Object;
 
 use strict;
 
-use Readonly;
 use Rose::DB::Object;
 use List::MoreUtils qw(any);
 
@@ -41,7 +40,7 @@ sub _get_manager_class {
   return $class->meta->convention_manager->auto_manager_class_name($class);
 }
 
-Readonly my %text_column_types => (text => 1, char => 1, varchar => 1);
+my %text_column_types = (text => 1, char => 1, varchar => 1);
 
 sub assign_attributes {
   my $self       = shift;
diff --git a/SL/DB/Shipto.pm b/SL/DB/Shipto.pm
index 98b7ca139..eba1b6a6b 100644
--- a/SL/DB/Shipto.pm
+++ b/SL/DB/Shipto.pm
@@ -1,12 +1,11 @@
 package SL::DB::Shipto;
 
 use strict;
-use Readonly;
 
 use SL::DB::MetaSetup::Shipto;
 
-Readonly our @SHIPTO_VARIABLES => qw(shiptoname shiptostreet shiptozipcode shiptocity shiptocountry shiptocontact
-                                     shiptophone shiptofax shiptoemail shiptodepartment_1 shiptodepartment_2);
+our @SHIPTO_VARIABLES = qw(shiptoname shiptostreet shiptozipcode shiptocity shiptocountry shiptocontact
+                           shiptophone shiptofax shiptoemail shiptodepartment_1 shiptodepartment_2);
 
 __PACKAGE__->meta->make_manager_class;
 
diff --git a/SL/InstallationCheck.pm b/SL/InstallationCheck.pm
index c395f1de5..4fcf97e49 100644
--- a/SL/InstallationCheck.pm
+++ b/SL/InstallationCheck.pm
@@ -20,7 +20,6 @@ BEGIN {
   { name => "FCGI",                                url => "http://search.cpan.org/~mstrout/" },
   { name => "List::MoreUtils", version => '0.21',  url => "http://search.cpan.org/~vparseval/" },
   { name => "PDF::API2",       version => '2.000', url => "http://search.cpan.org/~areibens/" },
-  { name => "Readonly",                            url => "http://search.cpan.org/~roode/" },
   { name => "Rose::Object",                        url => "http://search.cpan.org/~jsiracusa/" },
   { name => "Rose::DB",                            url => "http://search.cpan.org/~jsiracusa/" },
   { name => "Rose::DB::Object",                    url => "http://search.cpan.org/~jsiracusa/" },
diff --git a/SL/TransNumber.pm b/SL/TransNumber.pm
index 9aed12655..0ba13a8ab 100644
--- a/SL/TransNumber.pm
+++ b/SL/TransNumber.pm
@@ -6,7 +6,6 @@ use parent qw(Rose::Object);
 
 use Carp;
 use List::MoreUtils qw(any none);
-use Readonly;
 use SL::DBUtils;
 
 use Rose::Object::MakeMethods::Generic
@@ -14,7 +13,7 @@ use Rose::Object::MakeMethods::Generic
  scalar => [ qw(type id number save dbh dbh_provided business_id) ],
 );
 
-Readonly my @SUPPORTED_TYPES => qw(invoice credit_note customer vendor sales_delivery_order purchase_delivery_order sales_order purchase_order sales_quotation request_quotation);
+my @SUPPORTED_TYPES = qw(invoice credit_note customer vendor sales_delivery_order purchase_delivery_order sales_order purchase_order sales_quotation request_quotation);
 
 sub new {
   my $class = shift;
diff --git a/doc/INSTALL.texi b/doc/INSTALL.texi
index 2f7437dd5..07114199b 100644
--- a/doc/INSTALL.texi
+++ b/doc/INSTALL.texi
@@ -80,8 +80,6 @@ List::MoreUtils
 @item
 PDF::API2
 @item
-Readonly (benötigt) und Readonly::XS (optional)
-@item
 Rose::Object
 @item
 Rose::DB
diff --git a/doc/INSTALL.txt b/doc/INSTALL.txt
index 89b8f15e0..7cd257eb5 100644
--- a/doc/INSTALL.txt
+++ b/doc/INSTALL.txt
@@ -72,8 +72,6 @@ Bestandteil einer Standard-Perl-Installation sind:
 
    * PDF::API2
 
-   * Readonly (benötigt) und Readonly::XS (optional)
-
    * Rose::Object
 
    * Rose::DB
@@ -114,9 +112,7 @@ Distributionen unterschiedlich heißen.
 libdatetime-perl libdbi-perl libdbd-pg-perl libpg-perl
 libemail-address-perl libio-stringy-perl liblist-moreutils-perl
 libpdf-api2-perl libtemplate-perl libtext-csv-xs-perl
-libtext-iconv-perl liburi-perl libxml-writer-perl libyaml-perl
-librose-object-perl librose-db-perl librose-db-object-perl
-libreadonly-xs-perl'
+libtext-iconv-perl liburi-perl libxml-writer-perl libyaml-perl'
 
    Für Fedora Core benötigen Sie diese Pakete:
 
diff --git a/doc/INSTALL/Ben_00c3_00b6tigte-Software-und-Pakete.html b/doc/INSTALL/Ben_00c3_00b6tigte-Software-und-Pakete.html
index 90c9a2021..7a850b070 100644
--- a/doc/INSTALL/Ben_00c3_00b6tigte-Software-und-Pakete.html
+++ b/doc/INSTALL/Ben_00c3_00b6tigte-Software-und-Pakete.html
@@ -48,7 +48,6 @@ Up:&nbsp;<a rel="up" accesskey="u" href="index.html#Top">Top</a>
 <li>Email::Address
 <li>List::MoreUtils
 <li>PDF::API2
-<li>Readonly (benötigt) und Readonly::XS (optional)
 <li>Rose::Object
 <li>Rose::DB
 <li>Rose::DB::Object