[Jifty-commit] r2623 - in Jifty-DBI/trunk: lib/Jifty lib/Jifty/DBI

jifty-commit at lists.jifty.org jifty-commit at lists.jifty.org
Fri Jan 26 22:35:34 EST 2007


Author: audreyt
Date: Fri Jan 26 22:35:33 2007
New Revision: 2623

Modified:
   Jifty-DBI/trunk/lib/Jifty/DBI.pm
   Jifty-DBI/trunk/lib/Jifty/DBI/Column.pm
   Jifty-DBI/trunk/lib/Jifty/DBI/Schema.pm
   Jifty-DBI/trunk/t/01records.t

Log:
* Add support for "till '1.2.3'"; the old "until '1.2.3'" syntax never
  worked anyway.
* Deprecated $column->until; write $column->till instead.

Modified: Jifty-DBI/trunk/lib/Jifty/DBI.pm
==============================================================================
--- Jifty-DBI/trunk/lib/Jifty/DBI.pm	(original)
+++ Jifty-DBI/trunk/lib/Jifty/DBI.pm	Fri Jan 26 22:35:33 2007
@@ -2,7 +2,7 @@
 use warnings;
 use strict;
 
-$Jifty::DBI::VERSION = '0.32';
+$Jifty::DBI::VERSION = '0.33';
 
 =head1 NAME
 

Modified: Jifty-DBI/trunk/lib/Jifty/DBI/Column.pm
==============================================================================
--- Jifty-DBI/trunk/lib/Jifty/DBI/Column.pm	(original)
+++ Jifty-DBI/trunk/lib/Jifty/DBI/Column.pm	Fri Jan 26 22:35:33 2007
@@ -20,7 +20,7 @@
     refers_to by
     alias_for_column
     aliased_as
-    since until
+    since till
 
     label hints render_as
     valid_values
@@ -82,4 +82,10 @@
     $self->max_length(@_);
 }
 
+sub until {
+    Carp::carp('$column->until is deprecated; use $column->till instead');
+    my $self = shift;
+    $self->till(@_);
+}
+
 1;

Modified: Jifty-DBI/trunk/lib/Jifty/DBI/Schema.pm
==============================================================================
--- Jifty-DBI/trunk/lib/Jifty/DBI/Schema.pm	(original)
+++ Jifty-DBI/trunk/lib/Jifty/DBI/Schema.pm	Fri Jan 26 22:35:33 2007
@@ -43,7 +43,7 @@
 use Carp qw/croak carp/;
 use Exporter::Lite;
 our @EXPORT
-    = qw(column type default literal validator autocompleted immutable unreadable max_length length distinct mandatory not_null sort_order valid_values label hints render_as render since input_filters output_filters filters virtual is as by are on schema indexed valid order);
+    = qw(column type default literal validator autocompleted immutable unreadable max_length length distinct mandatory not_null sort_order valid_values label hints render_as render since till input_filters output_filters filters virtual is as by are on schema indexed valid order);
 
 our $SCHEMA;
 our $SORT_ORDERS = {};
@@ -477,6 +477,17 @@
     _list( since => @_ );
 }
 
+=head2 till
+
+What application version this column was last supported.  Correct usage
+is C<till '0.2.5'>.
+
+=cut
+
+sub till {
+    _list( till => @_ );
+}
+
 =head2 valid_values
 
 A list of valid values for this column. Jifty will use this to

Modified: Jifty-DBI/trunk/t/01records.t
==============================================================================
--- Jifty-DBI/trunk/t/01records.t	(original)
+++ Jifty-DBI/trunk/t/01records.t	Fri Jan 26 22:35:33 2007
@@ -279,6 +279,7 @@
 use Jifty::DBI::Record schema {
 
 column name =>
+  till 999,
   type is 'varchar(14)';
 
 column phone =>


More information about the Jifty-commit mailing list