[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