[Jifty-commit] r2853 - in Jifty-DBI/branches/od: .

[jifty-commit at lists.jifty.org]

Author: jesse
Date: Tue Feb 27 15:35:24 2007
New Revision: 2853

Modified:
   Jifty-DBI/branches/od/   (props changed)
   Jifty-DBI/branches/od/lib/Jifty/DBI/Schema.pm

Log:
 r48579 at 123:  jesse | 2007-02-27 15:31:36 -0500
  * Fix 'literal' support in the Object::Declare branch of Jifty


Modified: Jifty-DBI/branches/od/lib/Jifty/DBI/Schema.pm
==============================================================================
--- Jifty-DBI/branches/od/lib/Jifty/DBI/Schema.pm	(original)
+++ Jifty-DBI/branches/od/lib/Jifty/DBI/Schema.pm	Tue Feb 27 15:35:24 2007
@@ -76,13 +76,18 @@
 use Class::Data::Inheritable;
 use UNIVERSAL::require ();
 
-our @EXPORT = qw( defer lazy column schema by render_as since till );
+our @EXPORT = qw( defer lazy column schema by render_as since till literal);
 
 sub by ($) { @_ }
 sub render_as ($) { render as @_ }
 sub since ($) { since is @_ }
 sub till ($) { till is @_ }
 
+sub literal($) {
+    my $value = shift;
+    return \$value;
+}
+
 our $SCHEMA;
 our $SORT_ORDERS = {};