"Fossies" - the Fresh Open Source Software Archive

Member "metadot/metadot/Metadot/Implementations/Group/AbstractGroupImplementation.pm" (1 Jul 2003, 956 Bytes) of package /linux/www/old/Metadot6.4.5.4.tar.gz:


As a special service "Fossies" has tried to format the requested source page into HTML format using (guessed) Perl source code syntax highlighting (style: standard) with prefixed line numbers and code folding option. Alternatively you can here view or download the uninterpreted source code file. For more information about "AbstractGroupImplementation.pm" see the Fossies "Dox" file reference documentation.

    1 package Metadot::Implementations::Group::AbstractGroupImplementation;
    2 
    3 use strict;
    4 
    5 sub validate_or_refresh_cache {
    6     my $self = shift;
    7     my $impl = shift;
    8     die "Abstract method";
    9 }
   10 
   11 sub _show_view_groups_page {
   12     my $self = shift;
   13     my $impl = shift;
   14     die "Abstract method";
   15 }
   16 
   17 sub restore {
   18     my $self = shift;
   19     my $impl = shift;
   20    die "Abstract method";
   21 }
   22 
   23 # adds custom fields, both for adding and editing new groups
   24 sub show_custom_form_fields {
   25     my $self = shift;
   26     my $implementor = shift;
   27 
   28 # this is an abstract method. Here is a standard template for an input field:
   29 #    <tr>
   30 #        <td valign="top">Field Name</td>
   31 #        <td><textarea name="group_description" rows="3" cols="20" wrap></textarea></td>
   32 #    </tr>
   33     return '';
   34 }
   35 
   36 sub input_custom_form_fields {
   37     my $self = shift;
   38     my $impl = shift;
   39     my %properties = @_;
   40 
   41     # Abstract method: subclasses would modify %properties
   42 
   43     return %properties;
   44 }
   45 
   46 1;