projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
force all infostreet arguments to be string type, fixes: "0 as first character
[freeside.git]
/
FS
/
FS
/
part_export
/
infostreet.pm
diff --git
a/FS/FS/part_export/infostreet.pm
b/FS/FS/part_export/infostreet.pm
index
e86e82a
..
2ce5563
100644
(file)
--- a/
FS/FS/part_export/infostreet.pm
+++ b/
FS/FS/part_export/infostreet.pm
@@
-63,7
+63,8
@@
sub infostreet_command { #subroutine, not method
die $key_result{error} unless $key_result{success};
my $key = $key_result{data};
die $key_result{error} unless $key_result{success};
my $key = $key_result{data};
- my $result = $conn->call($method, $key, @args);
+ #my $result = $conn->call($method, $key, @args);
+ my $result = $conn->call($method, $key, map { $conn->string($_) } @args);
my %result = _infostreet_parse($result);
die $result{error} unless $result{success};
my %result = _infostreet_parse($result);
die $result{error} unless $result{success};