@@ -298,7 +298,7 @@ QueryApi <- R6::R6Class(
298298 response = local_var_resp ,
299299 status_code = local_var_resp $ status_code )
300300 } else if (local_var_resp $ status_code > = 500 && local_var_resp $ status_code < = 599 ) {
301- if (is.null(local_var_resp $ response ) || local_var_error_msg == " " ) {
301+ if (is.null(local_var_resp $ response ) || all( local_var_resp $ response == " " ) ) {
302302 local_var_resp $ response <- " API server error"
303303 }
304304 return (local_var_resp )
@@ -413,7 +413,7 @@ QueryApi <- R6::R6Class(
413413 response = local_var_resp ,
414414 status_code = local_var_resp $ status_code )
415415 } else if (local_var_resp $ status_code > = 500 && local_var_resp $ status_code < = 599 ) {
416- if (is.null(local_var_resp $ response ) || local_var_error_msg == " " ) {
416+ if (is.null(local_var_resp $ response ) || all( local_var_resp $ response == " " ) ) {
417417 local_var_resp $ response <- " API server error"
418418 }
419419 return (local_var_resp )
@@ -528,7 +528,7 @@ QueryApi <- R6::R6Class(
528528 response = local_var_resp ,
529529 status_code = local_var_resp $ status_code )
530530 } else if (local_var_resp $ status_code > = 500 && local_var_resp $ status_code < = 599 ) {
531- if (is.null(local_var_resp $ response ) || local_var_error_msg == " " ) {
531+ if (is.null(local_var_resp $ response ) || all( local_var_resp $ response == " " ) ) {
532532 local_var_resp $ response <- " API server error"
533533 }
534534 return (local_var_resp )
@@ -627,7 +627,7 @@ QueryApi <- R6::R6Class(
627627 response = local_var_resp ,
628628 status_code = local_var_resp $ status_code )
629629 } else if (local_var_resp $ status_code > = 500 && local_var_resp $ status_code < = 599 ) {
630- if (is.null(local_var_resp $ response ) || local_var_error_msg == " " ) {
630+ if (is.null(local_var_resp $ response ) || all( local_var_resp $ response == " " ) ) {
631631 local_var_resp $ response <- " API server error"
632632 }
633633 return (local_var_resp )
@@ -726,7 +726,7 @@ QueryApi <- R6::R6Class(
726726 response = local_var_resp ,
727727 status_code = local_var_resp $ status_code )
728728 } else if (local_var_resp $ status_code > = 500 && local_var_resp $ status_code < = 599 ) {
729- if (is.null(local_var_resp $ response ) || local_var_error_msg == " " ) {
729+ if (is.null(local_var_resp $ response ) || all( local_var_resp $ response == " " ) ) {
730730 local_var_resp $ response <- " API server error"
731731 }
732732 return (local_var_resp )
@@ -826,7 +826,7 @@ QueryApi <- R6::R6Class(
826826 response = local_var_resp ,
827827 status_code = local_var_resp $ status_code )
828828 } else if (local_var_resp $ status_code > = 500 && local_var_resp $ status_code < = 599 ) {
829- if (is.null(local_var_resp $ response ) || local_var_error_msg == " " ) {
829+ if (is.null(local_var_resp $ response ) || all( local_var_resp $ response == " " ) ) {
830830 local_var_resp $ response <- " API server error"
831831 }
832832 return (local_var_resp )
@@ -926,7 +926,7 @@ QueryApi <- R6::R6Class(
926926 response = local_var_resp ,
927927 status_code = local_var_resp $ status_code )
928928 } else if (local_var_resp $ status_code > = 500 && local_var_resp $ status_code < = 599 ) {
929- if (is.null(local_var_resp $ response ) || local_var_error_msg == " " ) {
929+ if (is.null(local_var_resp $ response ) || all( local_var_resp $ response == " " ) ) {
930930 local_var_resp $ response <- " API server error"
931931 }
932932 return (local_var_resp )
@@ -1025,7 +1025,7 @@ QueryApi <- R6::R6Class(
10251025 response = local_var_resp ,
10261026 status_code = local_var_resp $ status_code )
10271027 } else if (local_var_resp $ status_code > = 500 && local_var_resp $ status_code < = 599 ) {
1028- if (is.null(local_var_resp $ response ) || local_var_error_msg == " " ) {
1028+ if (is.null(local_var_resp $ response ) || all( local_var_resp $ response == " " ) ) {
10291029 local_var_resp $ response <- " API server error"
10301030 }
10311031 return (local_var_resp )
@@ -1124,7 +1124,7 @@ QueryApi <- R6::R6Class(
11241124 response = local_var_resp ,
11251125 status_code = local_var_resp $ status_code )
11261126 } else if (local_var_resp $ status_code > = 500 && local_var_resp $ status_code < = 599 ) {
1127- if (is.null(local_var_resp $ response ) || local_var_error_msg == " " ) {
1127+ if (is.null(local_var_resp $ response ) || all( local_var_resp $ response == " " ) ) {
11281128 local_var_resp $ response <- " API server error"
11291129 }
11301130 return (local_var_resp )
@@ -1223,7 +1223,7 @@ QueryApi <- R6::R6Class(
12231223 response = local_var_resp ,
12241224 status_code = local_var_resp $ status_code )
12251225 } else if (local_var_resp $ status_code > = 500 && local_var_resp $ status_code < = 599 ) {
1226- if (is.null(local_var_resp $ response ) || local_var_error_msg == " " ) {
1226+ if (is.null(local_var_resp $ response ) || all( local_var_resp $ response == " " ) ) {
12271227 local_var_resp $ response <- " API server error"
12281228 }
12291229 return (local_var_resp )
@@ -1331,7 +1331,7 @@ QueryApi <- R6::R6Class(
13311331 response = local_var_resp ,
13321332 status_code = local_var_resp $ status_code )
13331333 } else if (local_var_resp $ status_code > = 500 && local_var_resp $ status_code < = 599 ) {
1334- if (is.null(local_var_resp $ response ) || local_var_error_msg == " " ) {
1334+ if (is.null(local_var_resp $ response ) || all( local_var_resp $ response == " " ) ) {
13351335 local_var_resp $ response <- " API server error"
13361336 }
13371337 return (local_var_resp )
0 commit comments