[Jifty-commit] r5685 - Jifty-DBI/branches/tisql/lib/Jifty/DBI

Jifty commits jifty-commit at lists.jifty.org
Tue Aug 12 02:45:11 EDT 2008


Author: ruz
Date: Tue Aug 12 02:45:11 2008
New Revision: 5685

Modified:
   Jifty-DBI/branches/tisql/lib/Jifty/DBI/Tisql.pm

Log:
* add add_reference method that allows you define a join
  type (refers_to column) at run-time
* rename parse_query to query

Modified: Jifty-DBI/branches/tisql/lib/Jifty/DBI/Tisql.pm
==============================================================================
--- Jifty-DBI/branches/tisql/lib/Jifty/DBI/Tisql.pm	(original)
+++ Jifty-DBI/branches/tisql/lib/Jifty/DBI/Tisql.pm	Tue Aug 12 02:45:11 2008
@@ -33,7 +33,28 @@
     '<=' => '>',
 );
 
-sub parse_query {
+sub add_reference {
+    my $self = shift;
+    my %args = (
+        model     => undef,
+        name      => undef,
+        refers_to => undef,
+        tisql     => '',
+        @_
+    );
+    $args{'model'} ||= ref($self->{'collection'}->new_item);
+    my $column = Jifty::DBI::Column->new({
+        name      => $args{'name'},
+        refers_to => $args{'refers_to'},
+        by        => $args{'by'},
+        tisql     => $args{'tisql'},
+        virtual   => 1,
+    });
+    $self->{'additional_columns'}{ $args{'model'} }{ $args{'name'} } = $column;
+    return $self;
+}
+
+sub query {
     my $self = shift;
     my $string = shift;
 


More information about the Jifty-commit mailing list