]> git.decadent.org.uk Git - maypole.git/blobdiff - lib/CGI/Maypole.pm
Added Maypole::Config, and changed other classes to reflect that.
[maypole.git] / lib / CGI / Maypole.pm
index e112913c0d5b5f55d214892868ad36b191ad4983..67cbf92f1c08e34325e1c767b5ffb845393632ff 100644 (file)
@@ -40,6 +40,7 @@ sub send_output {
     my $r = shift;
     print $r->{cgi}->header(
         -type           => $r->{content_type},
+        -charset        => $r->{document_encoding},
         -content_length => length $r->{output},
     );
     print $r->{output};
@@ -61,8 +62,8 @@ CGI::Maypole - CGI-based front-end to Maypole
      package BeerDB;
      use base 'CGI::Maypole;
      BeerDB->setup("dbi:mysql:beerdb");
-     BeerDB->config->{uri_base} = "http://your.site/cgi-bin/beer.cgi/";
-     BeerDB->config->{display_tables} = [qw[beer brewery pub style]];
+     BeerDB->config->uri_base("http://your.site/cgi-bin/beer.cgi/");
+     BeerDB->config->display_tables([qw[beer brewery pub style]]);
      # Now set up your database:
      # has-a relationships
      # untaint columns