FWS-V2

 view release on metacpan or  search on metacpan

lib/FWS/V2/Database.pm  view on Meta::CPAN

    #
    if ( !$paramHash{templateGUID} ) {
        ( $title, $template, $css, $js, $paramHash{templateGUID} ) = @{$self->runSQL( SQL => "select " . $returnFields . "  from templates where guid='" . $self->safeSQL( $defaultGUID ) . "'" )};
    }

    #
    # wtf, still didn't get one yet????  lets build out a basic one so the page will render
    #
    if ( !$paramHash{templateGUID} ) {
        $title      = "FWS template";
        $template   = "<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Strict//EN\" \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd\">\n".
            "<html xmlns=\"http://www.w3.org/1999/xhtml\" xml:lang=\"en\">\n" .
            "<head>\n" .
            "#FWSHead#" .
            "</head>\n" .
            "<body>\n" .
            "#FWSMenu#" .
            "<div id=\"loc_wrapper\">" .
            "<div id=\"loc\">" .
            "<div id=\"loc_1_wrapper\">" .
            "<div id=\"loc_1\">" .

lib/FWS/V2/Display.pm  view on Meta::CPAN

        #
        # build the cookies for display
        #
        $cookie .= 'Set-Cookie: ' . $self->{sessionCookieName} . '=' . $self->formValue( 'session' ) . ';' . $cookieDomain . ' Path=/;' . ' Expires=' . $self->formatDate( format => 'cookie', monthMod => 1 ) . "\n";
        $cookie .= 'Set-Cookie: fbsr_' . $self->siteValue( 'facebookAppId' ) . '=deleted; Path=/;' . " Expires=Thu, 01-Jan-1970 00:00:01 GMT\n";

        #
        # simple page rendering
        #
        if ( $paramHash{head} ) {
            $paramHash{content} = "<!DOCTYPE html PUBLIC \"-//W3C//DTD XHTML 1.0 Strict//EN\" \"http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd\">\n<html xmlns=\"http://www.w3.org/1999/xhtml\" xml:lang=\"en\">\n<head>\n" . $paramHash{head} . "</hea...
        }

        #
        # always return a 200
        #
        my $theHeader   = "Status: 200 OK\n";

        #
        # if the contentType doesn't have HTML in it, lets not pass the cookies
        #



( run in 0.508 second using v1.01-cache-2.11-cpan-49f99fa48dc )