perl-docs-cvs mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From s...@apache.org
Subject cvs commit: modperl-docs/src/search search.tt
Date Fri, 22 Mar 2002 07:28:13 GMT
stas        02/03/21 23:28:13

  Modified:    src/search search.tt
  Log:
  - some search template improvements, mostly reformatting the template to
  get rid of the [% %] noise
  
  Revision  Changes    Path
  1.5       +14 -13    modperl-docs/src/search/search.tt
  
  Index: search.tt
  ===================================================================
  RCS file: /home/cvs/modperl-docs/src/search/search.tt,v
  retrieving revision 1.4
  retrieving revision 1.5
  diff -u -r1.4 -r1.5
  --- search.tt	3 Mar 2002 11:27:22 -0000	1.4
  +++ search.tt	22 Mar 2002 07:28:13 -0000	1.5
  @@ -2,22 +2,23 @@
      # It expects the search hash ref to be set.
   -%]
   [% WRAPPER searchresults.html %]
  +[%
  +    PROCESS swish_header;
   
  -    [% PROCESS swish_header %]
  +    title = PROCESS title;
   
  -    [% title = PROCESS title %]
  -
  -    [% IF ! search.results %]
  -        [% PROCESS show_message %]
  -        [% PROCESS search_form %]
  -
  -    [% ELSE %]
  -        [% PROCESS search_form %]
  -        [% PROCESS nav_bar %]
  -        [% PROCESS results_list %]
  -        [% IF search.navigation('hits') > search.config('page_size'); PROCESS nav_bar;
END %]
  -    [% END %]
  +    IF ! search.results;
  +        PROCESS show_message;
  +        PROCESS search_form;
   
  +    ELSE;
  +        nav_bar_res = PROCESS nav_bar;
  +        PROCESS search_form;
  +        nav_bar_res;
  +        PROCESS results_list;
  +        nav_bar_res IF search.navigation('hits') > search.config('page_size');
  +    END;
  +%]
   [% END %]
   
   
  
  
  

---------------------------------------------------------------------
To unsubscribe, e-mail: docs-cvs-unsubscribe@perl.apache.org
For additional commands, e-mail: docs-cvs-help@perl.apache.org


Mime
View raw message