Return a kvp_value instead of a kvp_frame (type-checking is your friend)

git-svn-id: svn+ssh://svn.gnucash.org/repo/gnucash/trunk@7092 57a11ea4-9604-0410-9ed3-97b8803252fd

src/engine/kvp-scm.c

@@ -55,7 +55,8 @@ gnc_scm_to_kvp_value_ptr(SCM val)
     else if(gw_wcp_p(val) &&
 	    gw_wcp_is_of_type_p(gh_eval_str("<gnc:kvp-frame*>"), val))
     {
-        return gw_wcp_get_ptr(val);
+        kvp_frame *frame = gw_wcp_get_ptr(val);
+        return kvp_value_new_frame (frame);
     }
     /* FIXME: add binary handler here when it's figured out */
     /* FIXME: add list handler here */