method prettyJSON doesnt exist anymore

git-svn-id: svn://svn.open-ils.org/OpenSRF/trunk@1751 9efc2488-bf62-4759-914b-345cdb29e865

diff --git a/src/perl/lib/OpenSRF/DomainObject/oilsMessage.pm b/src/perl/lib/OpenSRF/DomainObject/oilsMessage.pm
index ad7ed3b..44eafc2 100644 (file)
--- a/src/perl/lib/OpenSRF/DomainObject/oilsMessage.pm
+++ b/src/perl/lib/OpenSRF/DomainObject/oilsMessage.pm
@@ -10,8 +10,6 @@ OpenSRF::Utils::JSON->register_class_hint(hint => 'osrfMessage', name => 'OpenSR
 
 sub toString {
        my $self = shift;
-       my $pretty = shift;
-       return OpenSRF::Utils::JSON->perl2prettyJSON($self) if ($pretty);
        return OpenSRF::Utils::JSON->perl2JSON($self);
 }
 

diff --git a/src/perl/lib/OpenSRF/DomainObject/oilsMethod.pm b/src/perl/lib/OpenSRF/DomainObject/oilsMethod.pm
index f83727b..a5a674f 100644 (file)
--- a/src/perl/lib/OpenSRF/DomainObject/oilsMethod.pm
+++ b/src/perl/lib/OpenSRF/DomainObject/oilsMethod.pm
@@ -5,8 +5,6 @@ OpenSRF::Utils::JSON->register_class_hint(hint => 'osrfMethod', name => 'OpenSRF
 
 sub toString {
        my $self = shift;
-       my $pretty = shift;
-       return OpenSRF::Utils::JSON->perl2prettyJSON($self) if ($pretty);
        return OpenSRF::Utils::JSON->perl2JSON($self);
 }
 

diff --git a/src/perl/lib/OpenSRF/DomainObject/oilsResponse.pm b/src/perl/lib/OpenSRF/DomainObject/oilsResponse.pm
index aeaee77..18e2e3c 100644 (file)
--- a/src/perl/lib/OpenSRF/DomainObject/oilsResponse.pm
+++ b/src/perl/lib/OpenSRF/DomainObject/oilsResponse.pm
@@ -73,8 +73,6 @@ my $log = 'OpenSRF::Utils::Logger';
 
 sub toString {
        my $self = shift;
-       my $pretty = shift;
-       return OpenSRF::Utils::JSON->perl2prettyJSON($self) if ($pretty);
        return OpenSRF::Utils::JSON->perl2JSON($self);
 }
 
@@ -88,7 +86,7 @@ sub new {
        my %args = (    status => $default_status,
                        statusCode => $default_statusCode,
                        @_ );
-       
+
        return bless( \%args => $class );
 }