For information about current developments and future releases, see:
http://maypole.perl.org/?TheRoadmap
For information about current developments and future releases, see:
http://maypole.perl.org/?TheRoadmap
-2.10_pre4 Wed 13 Jul 2005
+2.10_pre5 Thu 14 Jul 2005
Multiple Template Paths added ( http://rt.cpan.org/NoAuth/Bug.html?id=13447 )
Small fix to templates/factory/frontpage ( http://rt.cpan.org/NoAuth/Bug.html?id=11236 )
MasonX support in Maypole::Application ( https://rt.cpan.org/NoAuth/Bug.html?id=12383 )
Multiple Template Paths added ( http://rt.cpan.org/NoAuth/Bug.html?id=13447 )
Small fix to templates/factory/frontpage ( http://rt.cpan.org/NoAuth/Bug.html?id=11236 )
MasonX support in Maypole::Application ( https://rt.cpan.org/NoAuth/Bug.html?id=12383 )
Fix to plugin to allow Maypole::Plugin::Config::YAML to work
Fix to Maypole::Model::CDBI order sub from list
Improvement to primary display column using CDBI
Fix to plugin to allow Maypole::Plugin::Config::YAML to work
Fix to Maypole::Model::CDBI order sub from list
Improvement to primary display column using CDBI
+ Improved efficiency of finding stringified columns using new classmetadata field
Additional Requirements : Digest::MD5
Additional Requirements : Digest::MD5
use Maypole::Constants;
use Maypole::Headers;
use Maypole::Constants;
use Maypole::Headers;
-our $VERSION = '2.10_pre4';
+our $VERSION = '2.10_pre5';
__PACKAGE__->mk_classdata($_) for qw( config init_done view_object );
__PACKAGE__->mk_accessors(
__PACKAGE__->mk_classdata($_) for qw( config init_done view_object );
__PACKAGE__->mk_accessors(
my $class = shift;
return (
$class->columns("Stringify"),
my $class = shift;
return (
$class->columns("Stringify"),
- ( grep { /^(name|title)/i } $class->columns ),
+ ( grep { /^(name|title)$/i } $class->columns ),
+ ( grep { /(name|title)/i } $class->columns ),
( grep { !/id$/i } $class->primary_columns ),
)[0];
}
( grep { !/id$/i } $class->primary_columns ),
)[0];
}
-Maypole::Constants - Maypole predefined constants
+Maypole::Session - Session related functionality for maypole
This class provides session related methods for Maypole such as unique id's for requests.
This class provides session related methods for Maypole such as unique id's for requests.
+Currently it provides only the generate_unique_id() function, by checking the id's generated by this function and included in submitted forms, it is possible to see if a form has been submitted before.. implementing these checks is left to the developer of that application.
+
+Further functionality is to be added here in later versions to provide easy access to sessions, either through plugins or builtin methods.
+
+=head1 FUNCTIONS
=head2 generate_unique_id()
=head2 generate_unique_id()
use strict;
use Digest::MD5;
use strict;
use Digest::MD5;
sub generate_unique_id {
my $length = shift || 32;
sub generate_unique_id {
my $length = shift || 32;
###################################################################################################
###################################################################################################
###################################################################################################
###################################################################################################
+=head1 TODO
+
+Currently implementing uniqueness tests of form submissions is left to the Maypole user, we plan to provide an optional default behaviour to automate this if required.
$classmeta->{moniker} ||= $class->moniker;
$classmeta->{plural} ||= $class->plural_moniker;
$classmeta->{cgi} ||= { $class->to_cgi };
$classmeta->{moniker} ||= $class->moniker;
$classmeta->{plural} ||= $class->plural_moniker;
$classmeta->{cgi} ||= { $class->to_cgi };
+ $classmeta->{stringify_column} ||= $class->stringify_column;
# User-friendliness facility for custom template writers.
if ( @{ $r->objects || [] } > 1 ) {
# User-friendliness facility for custom template writers.
if ( @{ $r->objects || [] } > 1 ) {
"<td>";
IF col == "url" AND item.url;
'<a href="'; item.url; '"> '; item.url; '</a>';
"<td>";
IF col == "url" AND item.url;
'<a href="'; item.url; '"> '; item.url; '</a>';
- ELSIF col == item.stringify_column;
+ ELSIF col == classmetadata.stringifycolumn;
maybe_link_view(item);
ELSE;
accessor = item.accessor_name(col);
maybe_link_view(item);
ELSE;
accessor = item.accessor_name(col);
#%]
[% MACRO view_item(item) BLOCK; %]
#%]
[% MACRO view_item(item) BLOCK; %]
- [% SET string = item.stringify_column %]
+ [% SET string = classmetadata.stringifycolumn %]
<div id="title"> [% item.$string %]</div>
[% INCLUDE navbar %]
<table class="view">
<div id="title"> [% item.$string %]</div>
[% INCLUDE navbar %]
<table class="view">