Update of /cvsroot/mhonarc/mhonarc/MHonArc/lib
In directory subversions:/tmp/cvs-serv31974

Modified Files:
        iso2022jp.pl 
Log Message:
* Bug Fix #1878: Slight mod to prevent an extra \n being added at the
  end of data.


Index: iso2022jp.pl
===================================================================
RCS file: /cvsroot/mhonarc/mhonarc/MHonArc/lib/iso2022jp.pl,v
retrieving revision 1.8
retrieving revision 1.9
diff -C2 -r1.8 -r1.9
*** iso2022jp.pl        30 Jul 2002 18:20:46 -0000      1.8
--- iso2022jp.pl        4 Dec 2002 20:00:39 -0000       1.9
***************
*** 63,66 ****
--- 63,68 ----
  
      $ret = "";
+     my $cnt = scalar(@lines);
+     my $i = 0;
      foreach (@lines) {
        # a trick to process preceding ASCII text
***************
*** 115,119 ****
        $ret =~ s/^\033\(B//;
  
!       $ret .= "\n";
      }
  
--- 117,122 ----
        $ret =~ s/^\033\(B//;
  
!       # add back eol
!       $ret .= "\n"  unless (++$i >= $cnt);
      }
  

---------------------------------------------------------------------
To sign-off this list, send email to [EMAIL PROTECTED] with the
message text UNSUBSCRIBE MHONARC-DEV

Reply via email to