Changeset 302


Ignore:
Timestamp:
07/31/09 15:55:38 (15 years ago)
Author:
nanardon
Message:
  • map all fields for (rev)aliases
Location:
LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql
Files:
2 edited

Legend:

Unmodified
Added
Removed

  • LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql/Aliases.pm

    r300 r302  
    4343sub has_extended_attributes { 0 } 
    4444 
    45 sub _initial_fields { 
    46     my ($self, $for) = @_; 
    47     { 
    48         name          => 'name', 
    49         forward       => 'forward', 
    50     } 
    51 } 
    52  
    53 sub _inline_fields { 
    54     my ($self, $for) = @_; 
    55  
    56     my %fields = ( 
    57         %{ $self->_initial_fields($for) }, 
    58     ); 
    59     \%fields; 
    60 } 
    61  
    62451; 
    6346 

  • LATMOS-Accounts/lib/LATMOS/Accounts/Bases/Sql/Revaliases.pm

    r300 r302  
    4343sub has_extended_attributes { 0 } 
    4444 
    45 sub _initial_fields { 
    46     my ($self, $for) = @_; 
    47     { 
    48         name          => 'name', 
    49         as            => 'as', 
    50     } 
    51 } 
    52  
    53 sub _inline_fields { 
    54     my ($self, $for) = @_; 
    55  
    56     my %fields = ( 
    57         %{ $self->_initial_fields($for) }, 
    58     ); 
    59     \%fields; 
    60 } 
    61  
    62451; 
    6346 
Note: See TracChangeset for help on using the changeset viewer.