diff options
Diffstat (limited to 'scripts')
-rw-r--r-- | scripts/vendor.pl | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/scripts/vendor.pl b/scripts/vendor.pl index 01653916..540fe5f8 100644 --- a/scripts/vendor.pl +++ b/scripts/vendor.pl @@ -186,6 +186,19 @@ sub _render_main_screen{ $template->render($vendor); } +sub search { + my ($request) = @_; + $request->{account_class} = 1; + my $template = LedgerSMB::Template->new( + user => $request->{_user}, + template => 'search', + locale => $request->{_locale}, + path => 'UI/Contact', + format => 'HTML' + ); + $template->render($request); +} + sub save_contact { my ($request) = @_; my $vendor = LedgerSMB::DBObject::Vendor->new({base => $request}); |