소스 검색

modules_k/perl: Fix resetting of flags in sv2int_str

According to the functions comments and its usages in the same file, the flags would only be or'red, not reset

This fixes setting an string named avp with an integer value:

OpenSER::AVP::add("string", 12345);
Alex Hermann 13 년 전
부모
커밋
87d10dc1dc
1개의 변경된 파일0개의 추가작업 그리고 1개의 파일을 삭제
  1. 0 1
      modules_k/perl/openserxs.xs

+ 0 - 1
modules_k/perl/openserxs.xs

@@ -412,7 +412,6 @@ inline int sv2int_str(SV *val, int_str *is,
 	
 	if (SvIOK(val)) { /* numerical name */
 		is->n = SvIV(val);
-		*flags = 0;
 		return 1;
 	} else if (SvPOK(val)) {
 		s = SvPV(val, len);