*** TWiki.pm.old	Sun Feb  2 01:55:21 2003
--- TWiki.pm	Wed Mar  5 17:21:32 2003
***************
*** 1129,1135 ****
  # =========================
  sub makeTopicSummary
  {
!     my( $theText, $theTopic, $theWeb ) = @_;
      # called by search, mailnotify & changes after calling readFileHead
  
      my $htext = $theText;
--- 1129,1135 ----
  # =========================
  sub makeTopicSummary
  {
!     my( $theText, $theTopic, $theWeb, $doReverse ) = @_;
      # called by search, mailnotify & changes after calling readFileHead
  
      my $htext = $theText;
***************
*** 1149,1155 ****
  
      # limit to 162 chars 
      # FIXME I18N: Avoid splitting within multi-byte character sets
!     $htext =~ s/(.{162})($mixedAlphaNumRegex)(.*?)$/$1$2 \.\.\./g;
  
      # Encode special chars into XML &#nnn; entities for use in RSS feeds
      # - no encoding for HTML pages, to avoid breaking international 
--- 1149,1159 ----
  
      # limit to 162 chars 
      # FIXME I18N: Avoid splitting within multi-byte character sets
!     if ( $doReverse ) {
! 	$htext =~ s/(.*?)($mixedAlphaNumRegex)(.{162})$/\.\.\. $2$3/g;
!     } else {
! 	$htext =~ s/(.{162})($mixedAlphaNumRegex)(.*?)$/$1$2 \.\.\./g;
!     }
  
      # Encode special chars into XML &#nnn; entities for use in RSS feeds
      # - no encoding for HTML pages, to avoid breaking international