[Catalyst-commits] r9399 - in trunk/Catalyst-Example-InstantCRUD: .
lib/Catalyst/Example script
zby at dev.catalyst.perl.org
zby at dev.catalyst.perl.org
Fri Feb 27 07:02:48 GMT 2009
Author: zby
Date: 2009-02-27 07:02:47 +0000 (Fri, 27 Feb 2009)
New Revision: 9399
Modified:
trunk/Catalyst-Example-InstantCRUD/Changes
trunk/Catalyst-Example-InstantCRUD/Makefile.PL
trunk/Catalyst-Example-InstantCRUD/lib/Catalyst/Example/InstantCRUD.pm
trunk/Catalyst-Example-InstantCRUD/script/instantcrud.pl
Log:
UTF-8
Modified: trunk/Catalyst-Example-InstantCRUD/Changes
===================================================================
--- trunk/Catalyst-Example-InstantCRUD/Changes 2009-02-26 01:24:06 UTC (rev 9398)
+++ trunk/Catalyst-Example-InstantCRUD/Changes 2009-02-27 07:02:47 UTC (rev 9399)
@@ -1,5 +1,12 @@
Revision history for Catalyst-Example-InstantCRUD
+0.0.29 Thu Feb 26 21:19:55 CET 2009 UTF-8
+
+
+========================================================
+The Old Changes Log
+
+
0.0.1 Thu Dec 8 15:29:28 2005
Initial release.
Modified: trunk/Catalyst-Example-InstantCRUD/Makefile.PL
===================================================================
--- trunk/Catalyst-Example-InstantCRUD/Makefile.PL 2009-02-26 01:24:06 UTC (rev 9398)
+++ trunk/Catalyst-Example-InstantCRUD/Makefile.PL 2009-02-27 07:02:47 UTC (rev 9399)
@@ -15,18 +15,20 @@
'DBIx::Class' => '0.08003',
'DBIx::Class::Schema::Loader' => '0.03',
'DBIx::Class::ResultSet::RecursiveUpdate' => 0,
+ 'DBIx::Class::UTF8Columns' => 0,
# 'DBIx::Class::DigestColumns' => 0,
# 'Template::Plugin::Class' => 0,
'Catalyst::Model::DBIC::Schema' => 0,
'Catalyst::Helper::Model::DBIC::Schema' => 0,
'Catalyst::Plugin::ConfigLoader' => 0,
'Catalyst::Plugin::Static::Simple' => 0,
+ 'Catalyst::Plugin::Unicode' => 0,
# 'Catalyst::Plugin::Authentication' => '0.07',
# 'Catalyst::Plugin::Authentication::Store::DBIC' => '0.07',
# 'Catalyst::Plugin::Authentication::Credential::Password' => 0,
'Catalyst::Plugin::Session::State::Cookie' => 0,
'Catalyst::Plugin::Session::Store::FastMmap' => 0,
- 'Rose::HTMLx::Form::DBIC' => 0.05,
+ 'Rose::HTMLx::Form::DBIC' => 0.08,
'Rose::HTMLx::Form::DBIC::FormGenerator' => 0,
'Path::Class' => 0,
# 'version' => 0,
Modified: trunk/Catalyst-Example-InstantCRUD/lib/Catalyst/Example/InstantCRUD.pm
===================================================================
--- trunk/Catalyst-Example-InstantCRUD/lib/Catalyst/Example/InstantCRUD.pm 2009-02-26 01:24:06 UTC (rev 9398)
+++ trunk/Catalyst-Example-InstantCRUD/lib/Catalyst/Example/InstantCRUD.pm 2009-02-27 07:02:47 UTC (rev 9399)
@@ -1,6 +1,6 @@
package Catalyst::Example::InstantCRUD;
-use version; $VERSION = qv('0.0.28');
+use version; $VERSION = qv('0.0.29');
use warnings;
use strict;
@@ -99,10 +99,15 @@
'List::Util' => 0,
=head1 BUGS AND LIMITATIONS
-
+
This is still experimental and it is a first new release
after a long time and substantial refactoring so treat with caution.
+The '0.04005' vesion of DBIx::Class::Schema::Loader does not
+assigne 'is_nullable' to any column when loading from some SQLite
+versions. In currently in applications generated out of
+SQLite databases all fields are marked as 'required'.
+
The main generator script (instantcrud.pl) is an ugly hack. First
the Catalyst helpers assume where the executable is located so I had
to fool them, second there is no API for creation of the main
Modified: trunk/Catalyst-Example-InstantCRUD/script/instantcrud.pl
===================================================================
--- trunk/Catalyst-Example-InstantCRUD/script/instantcrud.pl 2009-02-26 01:24:06 UTC (rev 9398)
+++ trunk/Catalyst-Example-InstantCRUD/script/instantcrud.pl 2009-02-27 07:02:47 UTC (rev 9399)
@@ -74,7 +74,10 @@
'authz' => \%authz,
} );
-pod2usage(1) unless $helper->mk_app( $appname );
+if( ! $helper->mk_app( $appname ) ){
+ warn "Cannot create application: $appname\n";
+ pod2usage(1) unless $helper->mk_app( $appname );
+}
my $appdir = $appname;
$appdir =~ s/::/-/g;
@@ -222,18 +225,13 @@
=head1 SYNOPSIS
-instantcrud.pl [options] ApplicationName
+instantcrud.pl ApplicationName [options]
Options:
- -help display this help and exits
- -advanced_help display the advanced help screen and exits
- -nonew don't create a .new file where a file to be created exists
- -scripts update helper scripts only
- -short use short types, like C instead of Controller...
- -name application-name
-dsn dsn
-user database user
-password database password
+ -help display this help and exits
-model_name model name (default: DBICSchemamodel)
-schema_name schema name (default: DBSchema)
@@ -243,28 +241,8 @@
created and used.
Examples:
- instantcrud.pl -dsn='dbi:Pg:dbname=CE' -user=zby -password='pass' My::App
+ instantcrud.pl My::App -dsn='dbi:Pg:dbname=CE' -user=zby -password='pass'
-
-=head1 OPTIONS
-
- (For advanced users...)
-
- Authentication options:
- (See Catalyst::Plugin::Authentication::Store::DBIC for more info)
- -auth_user_table user table name
- -auth_user_field user field name
- -auth_password_field password field name
- -auth_password_type password type (clear, crypted, hashed, or salted_hash)
- -auth_password_hash_type password hash type (any hashing method supported by the Digest module may be used)
-
- Authorization options:
- -authz_role_table name of the table that contains the list of roles
- -authz_role_field name of the field in authz_role_table that contains the role name
- -authz_user_role_user_field name of the field in the user_role table that contains the user id
- -authz_role_rel name of the relationship in role Class that refers to the mapping table between users and roles
-
-
=head1 DESCRIPTION
The C<catalyst.pl> script bootstraps a Catalyst application example, creating
@@ -342,22 +320,6 @@
=back
-The application module generated by the C<catalyst.pl> script is functional,
-although it reacts to all requests by outputting a friendly welcome screen.
-
-=head1 NOTE
-
-Neither C<catalyst.pl> nor the generated helper script will overwrite existing
-files. In fact the scripts will generate new versions of any existing files,
-adding the extension C<.new> to the filename. The C<.new> file is not created
-if would be identical to the existing file.
-
-This means you can re-run the scripts for example to see if newer versions of
-Catalyst or its plugins generate different code, or to see how you may have
-changed the generated code (although you do of course have all your code in a
-version control system anyway, don't you ...).
-
-
=head1 SEE ALSO
L<Catalyst::Manual>, L<Catalyst::Manual::Intro>
@@ -375,8 +337,6 @@
=head1 COPYRIGHT
-Copyright 2004-2005 Sebastian Riedel. All rights reserved.
-
This library is free software, you can redistribute it and/or modify it under
the same terms as Perl itself.
@@ -476,4 +436,7 @@
);
INSERT INTO "unicode_examples" VALUES(1,'PL','Polish','Latin Extended A','Literki z ogonkami alfabetycznie: ąćęłńóśżźĄĆĘŁŃÓŚŹŻ (acelnoszzACELNOSZZ)');
+INSERT INTO "unicode_examples" VALUES(2,'DE','German','Latin-1 Supplement','äöüÄÖÜß');
+INSERT INTO "unicode_examples" VALUES(3,'RU','Russian','Cyrillic','Это текст на русском языке');
+INSERT INTO "unicode_examples" VALUES(4,'','Math Symbols','Mathematical Operators','(x ∊ A ∪ B) ≡ (x ∊ A)∨(x ∊ B)');
COMMIT;
More information about the Catalyst-commits
mailing list