moseley     02/04/23 21:15:27

  Modified:    .        TODO
               src      index_top.html style.css
               src/search search.tt
               src/start about.html config.cfg
               src/start/tips registry.html
               tmpl/custom/html download_link index_body navbar_local_top
                        page_body search title
  Log:
  PRERELESE_02
  
  Here's the check in of "test9" as discussed on the docs-dev list.
  Major change is a redesign of the titlebar/navigation area.
  
  Revision  Changes    Path
  1.42      +10 -0     modperl-docs/TODO
  
  Index: TODO
  ===================================================================
  RCS file: /home/cvs/modperl-docs/TODO,v
  retrieving revision 1.41
  retrieving revision 1.42
  diff -u -r1.41 -r1.42
  --- TODO      21 Apr 2002 16:30:47 -0000      1.41
  +++ TODO      24 Apr 2002 04:15:27 -0000      1.42
  @@ -23,6 +23,13 @@
   style.css:
   ----------
   
  +- Section headings that are links back to the page's TOC fade to gray on
  +  hover.  
  +
  +- TOC links are blue w/o underline, and links in page have underline.
  +  Need to coordinate links better.
  +
  +
   Templates:
   ----------
   
  @@ -72,6 +79,9 @@
     make sure that this won't create js errors, on pages without
     document.forms[0]
     STATUS: on hold
  +
  +- switch for 10 results per page, and add option to select number
  +  of results per page.
   
   ====================================================================
   *** Updating process tuning ***
  
  
  
  1.5       +29 -20    modperl-docs/src/index_top.html
  
  Index: index_top.html
  ===================================================================
  RCS file: /home/cvs/modperl-docs/src/index_top.html,v
  retrieving revision 1.4
  retrieving revision 1.5
  diff -u -r1.4 -r1.5
  --- index_top.html    16 Apr 2002 05:15:55 -0000      1.4
  +++ index_top.html    24 Apr 2002 04:15:27 -0000      1.5
  @@ -4,39 +4,48 @@
       </head>
       <body bgcolor="white">
   
  +<p>mod_perl brings together the full power of the <a
  +href="http://www.perl.org";>Perl</a> programming language and the <A
  +href="http://www.apache.org/";>Apache</a> HTTP server.  You can use
  +Perl to manage Apache, respond to requests for web
  +pages and much more.</p>
  +
   <blockquote class="quotation">
  -"mod_perl is more than CGI scripting on steroids.  It is a whole new way to 
  -create dynamic content by utilizing the full power of the Apache web server 
  -to create stateful sessions, customized user authentication systems, smart 
  -proxies and much more.  Yet, magically, your old CGI scripts will continue 
  -to work and work very fast indeed.  With mod_perl you give up nothing and 
  - gain so much!"
  +    "mod_perl is more than CGI scripting on steroids.  It is a whole new way 
to 
  +    create dynamic content by utilizing the full power of the Apache web 
server 
  +    to create stateful sessions, customized user authentication systems, 
smart 
  +    proxies and much more.  Yet, magically, your old CGI scripts will 
continue 
  +    to work and work very fast indeed.  With mod_perl you give up nothing 
and 
  +    gain so much!"
   </blockquote>
  +
   <p class="quotation">
   -- Lincoln Stein, author of the popular
   <a href="http://stein.cshl.org/WWW/software/CGI/";>CGI</a> module and
   of <a href="http://www.modperl.com/";>Writing Apache Modules in Perl and C</a>
   </p>
       
  +<p><br></p>
       
  -<p>mod_perl brings together the full power of the <a
  -href="http://www.perl.org";>Perl</a> programming language and the <A
  -href="http://www.apache.org/";>Apache</a> HTTP server.  You can use
  -Perl to <b>manage Apache</b>, <b>respond to requests for web
  -pages</b> and much more.</p>
   
  -<p>mod_perl gives you a persistent Perl interpreter embedded in your web
  +<p>
  +mod_perl gives you a persistent Perl interpreter embedded in your web
   server.  This lets you avoid the overhead of starting an external
   interpreter and avoids the penalty of Perl start-up time, giving you
  -<b>super-fast dynamic content</b>.</p>
  +super-fast dynamic content.
  +</p>
  +
  +<p>
  +As you'd expect from the Perl community, there are hundreds of
  +modules written for mod_perl, everything from persistent
  +database connections, to templating sytems, to complete
  +XML content delivery systems.  Web sites like
  +<A href="http://www.slashdot.org/";>Slashdot</a> and
  +<A href="http://www.wired.com/";>Wired Magazine</a> use mod_perl.
  +</p>
  +
  +<h2>The mod_perl Web Site</h2>
   
  -<p>As you'd expect from the Perl community, there are <b>hundreds of
  -modules</b> written with mod_perl, for everything from <b>persistent
  -database connections</b>, to <b>templating sytems</b>, to complete
  -<b>XML content delivery systems</b>.  Web sites like <b><A
  -href="http://www.slashdot.org/";>Slashdot</a></b> and <b><A
  -href="http://www.wired.com/";>Wired Magazine</a></b> use mod_perl.
  -<b>Shouldn't you?</b></p>
   
   
       </body>
  
  
  
  1.59      +22 -3     modperl-docs/src/style.css
  
  Index: style.css
  ===================================================================
  RCS file: /home/cvs/modperl-docs/src/style.css,v
  retrieving revision 1.58
  retrieving revision 1.59
  diff -u -r1.58 -r1.59
  --- style.css 21 Apr 2002 16:34:24 -0000      1.58
  +++ style.css 24 Apr 2002 04:15:27 -0000      1.59
  @@ -38,6 +38,17 @@
       text-decoration: none;
   }
   
  +a.pdfsrc-links {
  +    font-size: 0.9em;
  +    color: #525d76;
  +    text-decoration: none;
  +}
  +
  +a.pdfsrc-links a:hover {
  +    text-decoration: underline;
  +}
  +
  +
   
   /* light blue bg-color for menu-titles */
   td.menu-title-bg { background-color: #828da6; }
  @@ -189,15 +200,17 @@
   }
   
   div.headline {
  -    background-color: #525d76;
  +    background-color: #ffffff;
       font-family: verdana, arial, helvetica, sans-serif;
       font-weight: bold;
  -    color: #ffffff;
  +    color: #000000;
       font-size: 1.2em;
       padding: 3px;
       margin-right: 0px;
   }
   
  +
  +
   /* Search Results */
   div.searchform { font-size: 1.0em; }
   
  @@ -212,7 +225,13 @@
   td.searchtitle {
       font-size: 12px;
   }
  -    
  +
  +li.search-list {
  +    list-style: none;
  +}
  +
  +
  +
   
   
   td.searchheader {
  
  
  
  1.13      +5 -13     modperl-docs/src/search/search.tt
  
  Index: search.tt
  ===================================================================
  RCS file: /home/cvs/modperl-docs/src/search/search.tt,v
  retrieving revision 1.12
  retrieving revision 1.13
  diff -u -r1.12 -r1.13
  --- search.tt 19 Apr 2002 19:53:33 -0000      1.12
  +++ search.tt 24 Apr 2002 04:15:27 -0000      1.13
  @@ -22,7 +22,7 @@
           nav_bar_res;
           PROCESS results_list;
           nav_bar_res IF search.navigation('hits') > 
search.config('page_size');
  -        '<p><a name="search_form"></a>';
  +        '<p><a name="search_form"></a><br><br></p>';
           PROCESS search_form;
       END;
   %]
  @@ -48,8 +48,8 @@
                   <a href="http://swish-e.org";><img 
src="http://swish-e.org/Images/swish-e.gif"; 
                      border="0" alt="Swish-e home page"></a>
               </td>
  -            <td valign="middle">
  -                <font size="+3">[% search.config('title') || "Search page" 
%]</font>
  +            <td class="search-heading" valign="middle">
  +                [% search.config('title') || "Search page" %]
               </td>
           </tr>
       </table>
  @@ -60,16 +60,8 @@
   [% BLOCK show_message %]
   
       [% IF search.errstr %]
  -        <font size="+2" color="red">
  -        [% IF search.errstr == 'no results' %]
  -            No Results
  -        [% ELSE %]
  -            [% search.errstr | html %]
  -        [% END %]
  -        </font>
  -
           [% IF search.errstr == 'no results' && CGI.param('sbm') %]
  -            <br>(Try searching the whole site or use a different keyword)
  +            Try searching the whole site (by un-checking below) or try 
another query.
           [% END %]
       [% END %]
   
  @@ -79,7 +71,7 @@
       <ul>
       [%- FOREACH sec = subs -%]
   
  -    <li>[% CGI.checkbox('sbm', 0, sec.value, sec.label); %]
  +    <li class="search-list">[% CGI.checkbox('sbm', 0, sec.value, sec.label); 
%]
           [%- IF sec.subs -%][%- PROCESS sub_items subs=sec.subs -%][%- END 
-%]</li>
   
       [%- END -%]
  
  
  
  1.2       +0 -144    modperl-docs/src/start/about.html
  
        <<Binary file>>
  
  
  1.2       +15 -6     modperl-docs/src/start/config.cfg
  
  Index: config.cfg
  ===================================================================
  RCS file: /home/cvs/modperl-docs/src/start/config.cfg,v
  retrieving revision 1.1
  retrieving revision 1.2
  diff -u -r1.1 -r1.2
  --- config.cfg        21 Apr 2002 07:42:35 -0000      1.1
  +++ config.cfg        24 Apr 2002 04:15:27 -0000      1.2
  @@ -3,17 +3,26 @@
   
       id => 'start',
   
  -    title => "What is mod_perl",
  +    title => "What is mod_perl?",
   
       abstract => <<EOB,
   EOB
       
  -     chapters => [
  -         qw(
  -            about.html
  -            tips/registry.html
  -           )
  +
  +     hidden => [
  +         chapters => [
  +             qw(
  +                tips/registry.html
  +                tips/handler.html
  +                tips/logging.html
  +                tips/config.html
  +               )
  +         ], 
        ],
  +
  +     body => {
  +         top => 'index_top.html',
  +     },
   
        # non-pod/html files or dirs to be copied unmodified
        copy_glob => [
  
  
  
  1.2       +9 -5      modperl-docs/src/start/tips/registry.html
  
  Index: registry.html
  ===================================================================
  RCS file: /home/cvs/modperl-docs/src/start/tips/registry.html,v
  retrieving revision 1.1
  retrieving revision 1.2
  diff -u -r1.1 -r1.2
  --- registry.html     21 Apr 2002 07:42:35 -0000      1.1
  +++ registry.html     24 Apr 2002 04:15:27 -0000      1.2
  @@ -17,11 +17,11 @@
       #!/usr/local/bin/perl -w
       use strict;
       use CGI;
  -    my $q = CGI->new;
  -    print $q->header,
  -          $q->start_html,
  -          $q->h1('Hello World!'),
  -          $q->end_html;
  +    my $q = CGI-&gt;new;
  +    print $q-&gt;header,
  +          $q-&gt;start_html,
  +          $q-&gt;h1('Hello World!'),
  +          $q-&gt;end_html;
   </pre>
   
   This script can now be run as-is under Apache::Registry by using the
  @@ -40,6 +40,10 @@
   Apache::PerlRun module to help with those "less clean" programs.
   <p>
   For more information on running CGI scripts under mod_perl please see <a 
href="../../docs/1.0/faqs/index.html">mod_perl FAQs</a>.
  +
  +<p>
  +<a class="more" href="../index.html#registry">&#171&nbsp;back</a>
  +</p>
   
   
   </body>
  
  
  
  1.9       +28 -16    modperl-docs/tmpl/custom/html/download_link
  
  Index: download_link
  ===================================================================
  RCS file: /home/cvs/modperl-docs/tmpl/custom/html/download_link,v
  retrieving revision 1.8
  retrieving revision 1.9
  diff -u -r1.8 -r1.9
  --- download_link     19 Apr 2002 19:53:34 -0000      1.8
  +++ download_link     24 Apr 2002 04:15:27 -0000      1.9
  @@ -1,25 +1,37 @@
  -[%- # link to the pdf, source and other variants of the doc 
  -    # src block
  -    flag = 0;
  -    IF doc.src_doc.link && doc.meta.link != 'search/searchresults.html';
  -        INCLUDE src_doc;
  -    ELSE;
  -        flag = flag + 1;
  +[% IF doc.meta.link == 'search/searchresults.html' %]
  +    <br>
  +    [% RETURN %]
  +[% END %]
  +
  +[%- # link to the pdf, source and other variants of the doc
  +
  +    links = [];
  +
  +
  +    IF doc.pdf_doc.link;
  +        pdf = PROCESS pdf_doc;
  +        links.push( pdf );
       END;
  -    # pdf block
  -    IF doc.pdf_doc.link && doc.meta.link != 'search/searchresults.html';
  -        INCLUDE pdf_doc;
  -    ELSE;
  -        flag = flag + 1;
  +
  +
  +    IF doc.src_doc.link;
  +        src = PROCESS src_doc;
  +        links.push( src );
       END;
   
  -    IF flag == 2;
  +
  +    IF links.join;
  +        links.join(' | ');
  +    ELSE;
           "<br>";
  -    END;    
  +    END;
  +    
   -%]
  +
   [%- BLOCK src_doc -%]
  -<a href="[%- doc.src_doc.link -%]"><img src="[%- doc.dir.abs_doc_root 
-%]/images/nav/page_src.gif" width="48" height="20" border="0" alt="Source 
version of the document ([%- doc.src_doc.size -%])"></a>
  +<a class="pdfsrc-links" href="[%- doc.src_doc.link -%]">src</a>
   [%- END -%]
  +
   [%- BLOCK pdf_doc -%]
  -<a href="[%- doc.pdf_doc.link -%]"><img src="[%- doc.dir.abs_doc_root 
-%]/images/nav/page_pdf.gif" width="48" height="20" border="0" alt="PDF version 
of the document ([%- doc.pdf_doc.size -%])"></a>
  +<a class="pdfsrc-links" href="[%- doc.pdf_doc.link -%]">pdf</a>
   [%- END -%]
  
  
  
  1.16      +2 -2      modperl-docs/tmpl/custom/html/index_body
  
  Index: index_body
  ===================================================================
  RCS file: /home/cvs/modperl-docs/tmpl/custom/html/index_body,v
  retrieving revision 1.15
  retrieving revision 1.16
  diff -u -r1.15 -r1.16
  --- index_body        19 Apr 2002 04:13:26 -0000      1.15
  +++ index_body        24 Apr 2002 04:15:27 -0000      1.16
  @@ -1,9 +1,9 @@
   [%-
  -    INCLUDE title;
  -
       INCLUDE navbar_local_top
           nav=doc.nav.up
           rel_doc_root=doc.dir.rel_doc_root;
  +
  +    INCLUDE title;
   -%]
   
   
  
  
  
  1.16      +2 -5      modperl-docs/tmpl/custom/html/navbar_local_top
  
  Index: navbar_local_top
  ===================================================================
  RCS file: /home/cvs/modperl-docs/tmpl/custom/html/navbar_local_top,v
  retrieving revision 1.15
  retrieving revision 1.16
  diff -u -r1.15 -r1.16
  --- navbar_local_top  19 Apr 2002 19:53:34 -0000      1.15
  +++ navbar_local_top  24 Apr 2002 04:15:27 -0000      1.16
  @@ -6,16 +6,13 @@
   
       <!-- download and local navigation begin -->
       <table width="100%" border="0" cellspacing="0" cellpadding="0">
  -        <tr>
  -            <td colspan="2" height="6"><br class="smallbr"></td>
  -        </tr>
           <tr valign="middle">
               [% IF 0 %]<td align="left" valign="top" nowrap>[%- INCLUDE 
search_field -%]</td>[% END %]
  -            <td align="left" valign="top" nowrap>[%- INCLUDE download_link 
-%]</td>
  +            [% IF 0 %]<td align="left" valign="top" nowrap>[%- INCLUDE 
download_link -%]</td>[% END %]
               <td align="right" valign="top" nowrap>[%- INCLUDE prev_next_link 
-%]</td>
           </tr>
           <tr>
  -            <td colspan="2" height="6"><br class="smallbr"></td>
  +            <td colspan="1" height="6"><br class="smallbr"></td>
           </tr>
       </table>
       <!-- download and local navigation end -->
  
  
  
  1.23      +1 -1      modperl-docs/tmpl/custom/html/page_body
  
  Index: page_body
  ===================================================================
  RCS file: /home/cvs/modperl-docs/tmpl/custom/html/page_body,v
  retrieving revision 1.22
  retrieving revision 1.23
  diff -u -r1.22 -r1.23
  --- page_body 19 Apr 2002 19:53:34 -0000      1.22
  +++ page_body 24 Apr 2002 04:15:27 -0000      1.23
  @@ -1,12 +1,12 @@
   
   
   [%-
  -    INCLUDE title;
   
       INCLUDE navbar_local_top
           nav=doc.nav
           rel_doc_root=doc.dir.rel_doc_root;
   
  +    INCLUDE title;
   
   -%]
   
  
  
  
  1.21      +8 -4      modperl-docs/tmpl/custom/html/search
  
  Index: search
  ===================================================================
  RCS file: /home/cvs/modperl-docs/tmpl/custom/html/search,v
  retrieving revision 1.20
  retrieving revision 1.21
  diff -u -r1.20 -r1.21
  --- search    20 Apr 2002 05:34:52 -0000      1.20
  +++ search    24 Apr 2002 04:15:27 -0000      1.21
  @@ -61,17 +61,21 @@
   
   
   [% BLOCK search_widget %]
  -    <table border="0" cellspacing="0" cellpadding="2">
  +    <table border="0" cellspacing="0" cellpadding="1">
   
           <tr>
  -            <td colspan="2" align="center" nowrap="nowrap">[% search_input 
%]<br>
  -            <input type="submit" name="submit" value="search">
  +            <td align="center" nowrap="nowrap">[% search_input %]
           </tr>
   
  -        <tr valign="top">
  +        <tr>
               <td align="center">[% search_options %]</td>
           </tr>
   
  +        <tr>
  +            <td align="center">
  +                <input type="submit" name="submit" value="search">
  +            </td>
  +        </tr>
       </table>
   [% END %]
   
  
  
  
  1.9       +14 -4     modperl-docs/tmpl/custom/html/title
  
  Index: title
  ===================================================================
  RCS file: /home/cvs/modperl-docs/tmpl/custom/html/title,v
  retrieving revision 1.8
  retrieving revision 1.9
  diff -u -r1.8 -r1.9
  --- title     3 Apr 2002 05:18:27 -0000       1.8
  +++ title     24 Apr 2002 04:15:27 -0000      1.9
  @@ -3,10 +3,20 @@
       <!-- title begin -->
       <table border="0" width="100%" cellspacing="0" cellpadding="0">
           <tr>
  -            <td class="blue-bg">
  -                <div class="headline">[%- doc.meta.title -%]</div>
  -            </td>
  +            <td colspan="2"><br></td>
           </tr>
  +        <tr>
  +            <td colspan="2" ><div class="headline">[%- doc.meta.title 
-%]</div></td>
  +        </tr>
  +        <tr>
  +            <td class="menu-border" width="80%" height="6"><br 
class="smallbr"></td>
  +            <td class="menu-border" width="20%" align="right"><img src="[%- 
doc.dir.abs_doc_root -%]/images/titlegrad.gif" alt=""></td>
  +        </tr>
  +
  +        <tr>
  +            <td colspan="2" align="right">[%- INCLUDE download_link -%]</td>
  +        </tr>
  +
       </table>
       <!-- title end -->
  -[%- END -%]
  \ No newline at end of file
  +[%- END -%]
  
  
  

---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to