From 7637da3c79552ce54e8b71b880af799ddfd64eca Mon Sep 17 00:00:00 2001 From: Sebastian Riedel Date: Thu, 28 Oct 2004 13:16:08 +0000 Subject: [PATCH] 2.04 release stuff git-svn-id: http://svn.maypole.perl.org/Maypole/trunk@277 48953598-375a-da11-a14b-00016c27c3ee --- lib/Apache/MVC.pm | 9 +++++---- lib/CGI/Maypole.pm | 2 +- lib/Maypole.pm | 2 +- 3 files changed, 7 insertions(+), 6 deletions(-) diff --git a/lib/Apache/MVC.pm b/lib/Apache/MVC.pm index 203e394..13d8a14 100644 --- a/lib/Apache/MVC.pm +++ b/lib/Apache/MVC.pm @@ -1,6 +1,6 @@ package Apache::MVC; -our $VERSION = '2.03'; +our $VERSION = '2.04'; use strict; use warnings; @@ -43,9 +43,10 @@ sub parse_args { sub send_output { my $r = shift; $r->{ar}->content_type( - $r->{content_type} =~ m/^text/ ? - $r->{content_type} . "; charset=" . $r->{document_encoding} : - $r->{content_type} ); + $r->{content_type} =~ m/^text/ + ? $r->{content_type} . "; charset=" . $r->{document_encoding} + : $r->{content_type} + ); $r->{ar}->headers_out->set( "Content-Length" => length $r->{output} ); APACHE2 || $r->{ar}->send_http_header; $r->{ar}->print( $r->{output} ); diff --git a/lib/CGI/Maypole.pm b/lib/CGI/Maypole.pm index 1cc60ba..7da043c 100644 --- a/lib/CGI/Maypole.pm +++ b/lib/CGI/Maypole.pm @@ -4,7 +4,7 @@ use base 'Maypole'; use strict; use warnings; -our $VERSION = '2.03'; +our $VERSION = '2.04'; sub run { my $self = shift; diff --git a/lib/Maypole.pm b/lib/Maypole.pm index a0e50cb..6e41ee7 100644 --- a/lib/Maypole.pm +++ b/lib/Maypole.pm @@ -6,7 +6,7 @@ use warnings; use Maypole::Config; use Maypole::Constants; -our $VERSION = '2.03'; +our $VERSION = '2.04'; __PACKAGE__->mk_classdata($_) for qw( config init_done view_object ); __PACKAGE__->mk_accessors( -- 2.39.5