projects
/
freeside.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
46b6aae
)
better error handling
author
ivan
<ivan>
Tue, 16 Jul 2002 03:56:16 +0000
(
03:56
+0000)
committer
ivan
<ivan>
Tue, 16 Jul 2002 03:56:16 +0000
(
03:56
+0000)
FS/FS/part_export/infostreet.pm
patch
|
blob
|
history
diff --git
a/FS/FS/part_export/infostreet.pm
b/FS/FS/part_export/infostreet.pm
index
fbf58bd
..
0f478d2
100644
(file)
--- a/
FS/FS/part_export/infostreet.pm
+++ b/
FS/FS/part_export/infostreet.pm
@@
-164,6
+164,7
@@
sub infostreet_command { #subroutine, not method
}
eval "use Frontier::Client;";
+ die $@ if $@;
eval 'sub Frontier::RPC2::String::repr {
my $self = shift
@@
-171,6
+172,7
@@
sub infostreet_command { #subroutine, not method
$value =~ s/([&<>\"])/$Frontier::RPC2::char_entities{$1}/ge;
$value;
}';
+ die $@ if $@;
my $conn = Frontier::Client->new( url => $url );
my $key_result = $conn->call( 'authenticate', $username, $password, $groupID);