[ruby-list:18502] TMail bug report

前田です。

tmail-0.7.3にいくつかバグを発見しましたのでご報告します。

まず、一番簡単なものから。
port.rbでparse errorになります(^_^;

--- port.rb.orig	Wed Nov 10 12:05:16 1999
+++ port.rb	Tue Nov  9 20:24:07 1999
@@ -223,7 +223,7 @@
   end
 
   def puts( str = nil )
-    @str << str << if str
+    @str << str if str
     @str << @term
   end

それから、Fromなどに

 [e-mail] 

のようなアドレスがあると、

 [e-mail] 

と解釈されてしまいます。(0が抜けてしまう。)

このパッチはちょっと自信がないです。

--- src/tab.scan.rb.orig	Wed Nov 10 12:05:47 1999
+++ src/tab.scan.rb	Wed Nov 10 12:01:35 1999
@@ -77,7 +77,6 @@
 
             if DIGIT === vret then
               sret = :DIGIT
-              vret = vret.to_i
 
             elsif @m_recv = MODE_RECV then
               case vret.downcase
--- src/mailp.y.orig	Wed Nov 10 12:06:20 1999
+++ src/mailp.y	Tue Nov  9 20:05:14 1999
@@ -28,7 +28,7 @@
     #       0   1     2    3     4    5
     #           day  month year
     {
-      t = Time.gm( val[3], val[2], val[1], 0, 0, 0 )
+      t = Time.gm( val[3].to_i, val[2], val[1].to_i, 0, 0, 0 )
       result = (t + val[4] - val[5]).localtime
     }
     ;
@@ -38,9 +38,9 @@
     ;
   
   hour: DIGIT ':' DIGIT
-      { result = (val[0] * 60 * 60) + (val[2] * 60) }
+      { result = (val[0].to_i * 60 * 60) + (val[2].to_i * 60) }
     | DIGIT ':' DIGIT ':' DIGIT
-      { result = (val[0] * 60 * 60) + (val[2] * 60) + val[4] }
+      { result = (val[0].to_i * 60 * 60) + (val[2].to_i * 60) + val[4].to_i }
     ;
   
   zone: ATOM { result = DateH.zone_s2i( val[0] ) * 60 };
@@ -175,7 +175,7 @@
 
   domword: atom
     | DOMLIT
-    | DIGIT { result = result.to_s }
+    | DIGIT
     ;
 
   msgid: '<' spec '>' { result = '<' + val[1].addr + '>' }
@@ -187,7 +187,7 @@
   
   word: atom
     | QUOTED
-    | DIGIT { result = result.to_s }
+    | DIGIT
     ;
 
   keys: phrase
@@ -219,8 +219,8 @@
 
   version: DIGIT '.' DIGIT
       {
-        @field.major = val[0]
-        @field.minor = val[2]
+        @field.major = val[0].to_i
+        @field.minor = val[2].to_i
       } ;
 
   ctype: TOKEN '/' TOKEN params

もう一つは以前も報告しましたが、inspectで落ちるバグです。
とりあえずTMail#inspectを削除して使っています:-(

-- 
前田 修吾