cvs commit: modperl-docs/src/stories story.tmpl

2002-03-01 Thread stas 
stas02/03/01 09:22:16

  Modified:src/stories story.tmpl
  Log:
  template fix:, need the new line before =cut
  
  Revision  ChangesPath
  1.5   +1 -1  modperl-docs/src/stories/story.tmpl
  
  Index: story.tmpl
  ===
  RCS file: /home/cvs/modperl-docs/src/stories/story.tmpl,v
  retrieving revision 1.4
  retrieving revision 1.5
  diff -u -r1.4 -r1.5
  --- story.tmpl5 Feb 2002 03:47:06 -   1.4
  +++ story.tmpl1 Mar 2002 17:22:16 -   1.5
  @@ -28,7 +28,7 @@
   =back
   [% END -%]
   
  -[% story.body -%]
  +[% story.body %]
   
   =cut
   
  
  
  

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

cvs commit: modperl-docs/src/stories story.tmpl

2002-02-05 Thread stas 
stas02/02/04 19:35:52

  Modified:src/stories story.tmpl
  Log:
  - change the story template to have a single 'the story' section, plus
  change the headers lists not to be in bold
  
  Revision  ChangesPath
  1.3   +4 -4  modperl-docs/src/stories/story.tmpl
  
  Index: story.tmpl
  ===
  RCS file: /home/cvs/modperl-docs/src/stories/story.tmpl,v
  retrieving revision 1.2
  retrieving revision 1.3
  diff -u -r1.2 -r1.3
  --- story.tmpl5 Feb 2002 03:31:34 -   1.2
  +++ story.tmpl5 Feb 2002 03:35:51 -   1.3
  @@ -11,22 +11,22 @@
   
   [% story.title %]
   
  -=head1 Info
  +=head1 The Story
   
   [% IF story.headers -%]
   =over
   [% FOREACH key = story.headers.keys.sort -%]
   [% IF story.headers.$key -%]
   
  -=item * [% key %]: [% story.headers.$key -%]
  +=item * 
  +
  +[% key %]: [% story.headers.$key -%]
   
   [% END -%]
   [% END -%]
   
   =back
   [% END -%]
  -
  -=head1 The Story
   
   [% story.body -%]
   
  
  
  

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

cvs commit: modperl-docs/src/stories story.tmpl make.pl

2002-02-05 Thread stas 
stas02/02/04 19:47:06

  Modified:src/stories story.tmpl make.pl
  Log:
  - change the story template to present the story nicer
  
  Revision  ChangesPath
  1.4   +1 -1  modperl-docs/src/stories/story.tmpl
  
  Index: story.tmpl
  ===
  RCS file: /home/cvs/modperl-docs/src/stories/story.tmpl,v
  retrieving revision 1.3
  retrieving revision 1.4
  diff -u -r1.3 -r1.4
  --- story.tmpl5 Feb 2002 03:35:51 -   1.3
  +++ story.tmpl5 Feb 2002 03:47:06 -   1.4
  @@ -11,7 +11,7 @@
   
   [% story.title %]
   
  -=head1 The Story
  +=head1 [%- story.author -%] exclaimed:
   
   [% IF story.headers -%]
   =over
  
  
  
  1.3   +5 -2  modperl-docs/src/stories/make.pl
  
  Index: make.pl
  ===
  RCS file: /home/cvs/modperl-docs/src/stories/make.pl,v
  retrieving revision 1.2
  retrieving revision 1.3
  diff -u -r1.2 -r1.3
  --- make.pl   26 Jan 2002 04:24:27 -  1.2
  +++ make.pl   5 Feb 2002 03:47:06 -   1.3
  @@ -52,9 +52,11 @@
   my $title = delete $headers{Subject};
   die error: no Subject: in $file unless $title;
   
  +my $author = delete $headers{From};
  +die error: no From: in $file unless $author;
  +
   # antispam
  -$headers{Author} = delete $headers{From};
  -$headers{Author} =~ s/\@/ (at) /;
  +$author =~ s/\@/ (at) /;
   
   #print Dumper \%headers;
   #print headers:\n$headers\n;
  @@ -62,6 +64,7 @@
   
   my %data = (
   title   = $title,
  +author  = $author,
   headers = \%headers,
  );
   
  
  
  

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