projects
/
freeside.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
3d7d6c6
)
update paymentech live server, RT#5650
author
ivan
<ivan>
Thu, 5 Nov 2009 01:47:02 +0000
(
01:47
+0000)
committer
ivan
<ivan>
Thu, 5 Nov 2009 01:47:02 +0000
(
01:47
+0000)
FS/bin/freeside-paymentech-download
patch
|
blob
|
history
FS/bin/freeside-paymentech-upload
patch
|
blob
|
history
diff --git
a/FS/bin/freeside-paymentech-download
b/FS/bin/freeside-paymentech-download
index
12b5c79
..
955df49
100755
(executable)
--- a/
FS/bin/freeside-paymentech-download
+++ b/
FS/bin/freeside-paymentech-download
@@
-42,7
+42,8
@@
my @batchconf = $conf->config('batchconfig-paymentech');
my $username = $batchconf[3] or die "no Paymentech batch username configured\n";
my $password = $batchconf[4] or die "no Paymentech batch password configured\n";
my $username = $batchconf[3] or die "no Paymentech batch username configured\n";
my $password = $batchconf[4] or die "no Paymentech batch password configured\n";
-my $host = ($opt_t ? 'orbitalbatchvar.paymentech.net' : 'orbitalbatch.paymentech.net');
+my $host = ($opt_t ? 'orbitalbatchvar.paymentech.net'
+ : 'orbital1.paymentech.net');
print STDERR "Connecting to $username\@$host...\n" if $opt_v;
my $sftp = Net::SFTP::Foreign->new( host => $host,
print STDERR "Connecting to $username\@$host...\n" if $opt_v;
my $sftp = Net::SFTP::Foreign->new( host => $host,
diff --git
a/FS/bin/freeside-paymentech-upload
b/FS/bin/freeside-paymentech-upload
index
fc06ab8
..
b57b010
100755
(executable)
--- a/
FS/bin/freeside-paymentech-upload
+++ b/
FS/bin/freeside-paymentech-upload
@@
-70,8
+70,8
@@
foreach my $pay_batch (@batches) {
push @filenames, $filename;
}
push @filenames, $filename;
}
-my $host = ($opt_t ? 'orbitalbatchvar.paymentech.net'
:
-
'orbitalbatch
.paymentech.net');
+my $host = ($opt_t ? 'orbitalbatchvar.paymentech.net'
+
: 'orbital1
.paymentech.net');
print STDERR "Connecting to $username\@$host...\n" if $opt_v;
my $sftp = Net::SFTP::Foreign->new( host => $host,
print STDERR "Connecting to $username\@$host...\n" if $opt_v;
my $sftp = Net::SFTP::Foreign->new( host => $host,