Built initial skeleton for contact

git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@896 4979c152-3d1c-0410-bac9-87ea11338e46

2 files changed, 31 insertions, 2 deletions

diff --git a/LedgerSMB/Contact.pm b/LedgerSMB/Contact.pm
new file mode 100644
index 00000000..d28cbc64
--- /dev/null
+++ b/LedgerSMB/Contact.pm
@@ -0,0 +1,29 @@
+=head1 NAME
+
+LedgerSMB::Contact - LedgerSMB class for managing Contacts
+
+=head1 SYOPSIS
+
+This module creates object instances based on LedgerSMB's in-database ORM.  
+
+=head1 METHODS
+
+The following method is static:
+=item new ($LedgerSMB object);
+
+The following methods are passed through to stored procedures via Autoload.
+=item save
+=item get
+=item search
+
+The above list may grow over time, and may depend on other installed modules.
+
+=head1 Copyright (C) 2007, The LedgerSMB core team.
+This file is licensed under the Gnu General Public License version 2, or at your
+option any later version.  A copy of the license should have been included with
+your software.
+
+=back
+
+=cut
+
diff --git a/bin/admin.pl b/bin/admin.pl
index dd839176..25ca3288 100755
--- a/bin/admin.pl
+++ b/bin/admin.pl
@@ -1051,8 +1051,8 @@ sub dbselect_source {
 	<input name="callback" type="hidden" value="$form->{script}?action=list_users&amp;path=$form->{path}" />
 	<input type="hidden" name="path" value="$form->{path}" />
 	<br />
-	<button type="submit" class="submit" name="action" value="create_dataset">|.$locale->text('Create Dataset').qq|</button>
-	<button type="submit" class="submit" name="action" value="delete_dataset">|.$locale->text('Delete Dataset').qq|</button>
+	<button type="submit" class="submit" name="action" value="create_dataset">|.$locale->text('Create Company').qq|</button>
+	<button type="submit" class="submit" name="action" value="delete_dataset">|.$locale->text('Delete Company').qq|</button>
 	</form>
 	<p>|.$locale->text('This is a preliminary check for existing sources. Nothing will be created or deleted at this stage!')
 	.qq|</p>