Index: ossp-pkg/l2/l2_ut_param.c
RCS File: /v/ossp/cvs/ossp-pkg/l2/l2_ut_param.c,v
rcsdiff -q -kk '-r1.2' '-r1.3' -u '/v/ossp/cvs/ossp-pkg/l2/l2_ut_param.c,v' 2>/dev/null
--- l2_ut_param.c	2001/09/05 07:41:18	1.2
+++ l2_ut_param.c	2001/09/05 13:34:58	1.3
@@ -86,7 +86,9 @@
                         *(double *)(pa[i].store) = va_get(ap, double); 
                         break;
                     case L2_TYPE_STRING:
-                        *(char **)(pa[i].store) = strdup(va_get(ap, charptr)); 
+                        *(char **)(pa[i].store) = va_get(ap, charptr);
+                        if (*(char **)(pa[i].store) != NULL)
+                            *(char **)(pa[i].store) = strdup(*(char **)(pa[i].store));
                         break;
                     case L2_TYPE_CHARPTR:
                         *(char **)(pa[i].store) = va_get(ap, charptr);