* error.c (syserr_initialize): taint message if mesg is given

and it is tainted.

git-svn-id: svn+ssh://ci.ruby-lang.org/ruby/trunk@29455 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

ChangeLog

@@ -1,3 +1,8 @@
+Tue Oct 12 19:07:55 2010  NARUSE, Yui  <naruse@ruby-lang.org>
+
+	* error.c (syserr_initialize): taint message if mesg is given
+	  and it is tainted.
+
 Tue Oct 12 18:25:43 2010  NARUSE, Yui  <naruse@ruby-lang.org>
 
 	* io.c (rb_io_ungetc): always see Bignum. On 32bit valid value

error.c

@@ -1059,6 +1059,7 @@ syserr_initialize(int argc, VALUE *argv, VALUE self)
 	    if (le != me && rb_enc_asciicompat(me))
 		le = me;
 	}/* else assume err is non ASCII string. */
+	if (OBJ_TAINTED(str)) OBJ_TAINT(mesg);
 	rb_enc_associate(mesg, le);
     }
     else {