* pack.c (pack_pack): propagate taint status from format string to

  result string.

git-svn-id: http://svn.ruby-lang.org/repos/ruby/trunk@20524 b2dd03c8-39d4-4d8f-98ff-823fe69b080e

1 files changed, 1 insertions, 0 deletions

diff --git a/pack.c b/pack.c
index 2ecb2d68d..c4ee6dbb3 100644
--- a/pack.c
+++ b/pack.c
@@ -1017,6 +1017,7 @@ pack_pack(VALUE ary, VALUE fmt)
     if (associates) {
 	rb_str_associate(res, associates);
     }
+    OBJ_INFECT(res, fmt);
     return res;
 }