From 16ed48d38c50eff5d7c3f37e4ffbf58aee573891 Mon Sep 17 00:00:00 2001
From: John Darrington <john@darrington.wattle.id.au>
Date: Mon, 27 Jul 2009 19:41:25 +0200
Subject: [PATCH] Fix bug in casemapping long strings.

Thanks to Ben Pfaff for pointing out the error.
---
 src/data/case-map.c | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/data/case-map.c b/src/data/case-map.c
index 411b9f0d..49297d13 100644
--- a/src/data/case-map.c
+++ b/src/data/case-map.c
@@ -100,7 +100,7 @@ case_map_execute (const struct case_map *map, struct ccase *src)
         {
           int src_idx = map->map[dst_idx];
           if (src_idx != -1)
-            *case_data_rw_idx (dst, dst_idx) = *case_data_idx (src, src_idx);
+	    value_copy (case_data_rw_idx (dst, dst_idx), case_data_idx (src, src_idx), caseproto_get_width (map->proto, dst_idx));
         }
       case_unref (src);
       return dst;
-- 
2.30.2