Alle Vorkommen von "Readonly" entfernt

diff --git a/SL/DB/Object.pm b/SL/DB/Object.pm
index 0a69826..1d17038 100644 (file)
--- 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 98b7ca1..eba1b6a 100644 (file)
--- 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 c395f1d..4fcf97e 100644 (file)
--- 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 9aed126..0ba13a8 100644 (file)
--- 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 2f7437d..0711419 100644 (file)
--- 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 89b8f15..7cd257e 100644 (file)
--- 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 90c9a20..7a850b0 100644 (file)
--- 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