summaryrefslogtreecommitdiff
path: root/scripts/vendor.pl
diff options
context:
space:
mode:
authoreinhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>2007-11-25 22:49:51 +0000
committereinhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46>2007-11-25 22:49:51 +0000
commit75bbfc4e3007318afcd8368e091ca3c13c5a3352 (patch)
treecae2406bbb5fe6df32edc9a17c7b9e4728bc0d70 /scripts/vendor.pl
parent9e80fcdc9cba524a7407f01c92a0e6188247c7df (diff)
Adding employee workflow scripts
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@1907 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'scripts/vendor.pl')
-rw-r--r--scripts/vendor.pl8
1 files changed, 4 insertions, 4 deletions
diff --git a/scripts/vendor.pl b/scripts/vendor.pl
index 924c967a..a8a6aad0 100644
--- a/scripts/vendor.pl
+++ b/scripts/vendor.pl
@@ -189,16 +189,16 @@ sub _render_main_screen{
sub save_contact {
my ($request) = @_;
my $vendor = LedgerSMB::DBObject::Vendor->new({base => $request});
- $vendor ->save_contact();
- $vendor ->get;
+ $vendor->save_contact();
+ $vendor->get;
_render_main_screen($vendor );
}
sub save_bank_account {
my ($request) = @_;
my $vendor = LedgerSMB::DBObject::Vendor->new({base => $request});
- $vendor ->save_bank_account();
- $vendor ->get;
+ $vendor->save_bank_account();
+ $vendor->get;
_render_main_screen($vendor );
}