view release on metacpan or  search on metacpan

Changes  view on Meta::CPAN

 -- Roger Pettett <rmp@psyphi.net>  Thu, 9 Jun 2011 12:00:00 +0100

libclearpress-perl (334) stable; urgency=low

  * sessions saved after processing request, not during

 -- Roger Pettett <rmp@psyphi.net>  Thu, 9 Jun 2011 12:00:00 +0100

libclearpress-perl (327) stable; urgency=low

  * Basic authentication mechanisms - LDAP/AD, passwd/getpwuid

 -- Roger Pettett <rmp@psyphi.net>  Thu, 9 Jun 2011 12:00:00 +0100

libclearpress-perl (325) stable; urgency=low

  * Added support for HTTP_X_FORWARDED_HOST and ...PORT for sitting
    behind a reverse-proxy

 -- Roger Pettett <rmp@psyphi.net>  Thu, 9 Jun 2011 12:00:00 +0100

lib/ClearPress/util.pm  view on Meta::CPAN

  for my $subthing (@{$thing->subthings()}) {   # cascade object saves (without commits)
    $subthing->save();
  }

  $util->transactions(1);                       # re-enable transactions
  $thing->save();                               # save parent object (with commit)

=head2 username - Get/set accessor for requestor's username

  $oUtil->username((getpwuid $<)[0]);
  $oUtil->username($sw->username());

  my $sUsername = $oUtil->username();

=head2 cgi - Placeholder for a CGI object (or at least something with the same param() interface)

  $oUtil->cgi($oCGI);
  my $oCGI = $oUtil->cgi();

=head2 session - Placeholder for a session hashref