[Bast-commits] r8809 - DBIx-Class/0.08/trunk/script

[ribasushi at dev.catalyst.perl.org]

Author: ribasushi
Date: 2010-02-23 14:13:06 +0000 (Tue, 23 Feb 2010)
New Revision: 8809

Modified:
   DBIx-Class/0.08/trunk/script/dbicadmin
Log:
Whitespace

Modified: DBIx-Class/0.08/trunk/script/dbicadmin
===================================================================
--- DBIx-Class/0.08/trunk/script/dbicadmin	2010-02-23 14:00:38 UTC (rev 8808)
+++ DBIx-Class/0.08/trunk/script/dbicadmin	2010-02-23 14:13:06 UTC (rev 8809)
@@ -16,7 +16,7 @@
 use DBIx::Class::Admin;
 
 my $short_description = "utility for administrating DBIx::Class schemata";
-my $synopsis_text =qq{ 
+my $synopsis_text =q|
   deploy a schema to a database
   %c --schema=MyApp::Schema \
     --connect='["dbi:SQLite:my.db", "", ""]' \
@@ -26,8 +26,7 @@
   %c --schema=MyApp::Schema --class=Employee \
     --connect='["dbi:SQLite:my.db", "", ""]' \
     --op=update --set='{ "name": "New_Employee" }'
-}
-;
+|;
 
 my ($opts, $usage) = describe_options(
     "%c: %o",