Changeset 6860


Ignore:
Timestamp:
2004-02-23T15:13:33+13:00 (20 years ago)
Author:
kjdon
Message:

moved teh type_list to before the arguments, so it can actually be used

File:
1 edited

Legend:

Unmodified
Added
Removed

  • trunk/gsdl/perllib/plugins/PagedImgPlug.pm

    r6769 r6860  
    7676}
    7777
     78my $type_list =
     79    [ { 'name' => "paged",
     80        'desc' => "{PagedImgPlug.documenttype.paged}" },
     81      { 'name' => "hierarchy",
     82        'desc' => "{PagedImgPlug.documenttype.hierarchy}" } ];
     83
    7884my $arguments =
    7985    [ { 'name' => "process_exp",
    … …  
    140146    'reqd' => "no" } ];
    141147
    142 my $type_list =
    143     [ { 'name' => "paged",
    144         'desc' => "{PagedImgPlug.documenttype.paged}" },
    145       { 'name' => "hierarchy",
    146         'desc' => "{PagedImgPlug.documenttype.hierarchy}" } ];
    147148
    148149my $options = { 'name'     => "PagedImgPlug",
Note: See TracChangeset for help on using the changeset viewer.