[Maypole] Access to the Apache::Request object

From: Simon Wistow (simon at thegestalt.org)
Date: Mon Sep 06 2004 - 11:19:56 BST

I currently have a Maypole app that does something like this ...

  sub view :Exported {
      my ($self, $r, $att) = @_;

      eval {
          my $a = Apache->request;
          $a->headers_out->set("Content-Disposition" => "inline;
             filename=".$att->filename) if $a;
      };

      $r->{content_type} = $att->content_type;
      $r->{output} = $att->payload;
  }

which seems, well, clunky. Am I missing something from the Maypole docs?

cheers,
Simon 

-- 
i try not to let pedantry get in the way of a glib remark

_______________________________________________
maypole mailing list
maypole at lists.netthink.co.uk
http://lists.netthink.co.uk/listinfo/maypole

This archive was generated by hypermail 2.1.3 : Thu Feb 24 2005 - 22:25:56 GMT