From c93f01424e48798f0dcc9f8ca86df6631ff584b8 Mon Sep 17 00:00:00 2001 From: David Baird Date: Sat, 20 Aug 2005 13:45:35 +0000 Subject: [PATCH] add() alis to push() in Mp::Headers - bug 14142 git-svn-id: http://svn.maypole.perl.org/Maypole/trunk@376 48953598-375a-da11-a14b-00016c27c3ee --- Changes | 1 + lib/Maypole/Headers.pm | 6 ++++++ 2 files changed, 7 insertions(+) diff --git a/Changes b/Changes index 9872249..dbf4c9b 100644 --- a/Changes +++ b/Changes @@ -11,6 +11,7 @@ For information about current developments and future releases, see: Apache2 fix in Apache::MVC (bug 13888) Maypole::Session::generate_unique_id() now returns the id (bug 14124) Implement -Init flag in Mp::Application (wishlist 14123) + add() alias to push() in Mp::Headers (wishlist 14142) 2.10 Tue 19 Jul 2005 Multiple Template Paths added ( http://rt.cpan.org/NoAuth/Bug.html?id=13447 ) diff --git a/lib/Maypole/Headers.pm b/lib/Maypole/Headers.pm index 33edc1b..320cb05 100644 --- a/lib/Maypole/Headers.pm +++ b/lib/Maypole/Headers.pm @@ -14,6 +14,8 @@ sub set { shift->header(@_); } +*add = \&push; # useful for Apache::Session::Wrapper support + sub push { shift->push_header(@_); } @@ -84,6 +86,10 @@ Add a value to the field named C<$header>. Previous values are maintained. An alias to Cpush_header> +=item add + +Alias to C - useful for C support, in CGI mode. + =item init($header =C $value) Set the value for the field named C<$header>, but only if that header is -- 2.39.5