From d7c7dffe84c6e2723ce81c5c0d3c89edb33ad87a Mon Sep 17 00:00:00 2001
From: linuxpoet <linuxpoet@4979c152-3d1c-0410-bac9-87ea11338e46>
Date: Wed, 13 Sep 2006 05:09:14 +0000
Subject: removed dataset update from admin.pl
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@78 4979c152-3d1c-0410-bac9-87ea11338e46
---
bin/mozilla/admin.pl | 75 ----------------------------------------------------
1 file changed, 75 deletions(-)
diff --git a/bin/mozilla/admin.pl b/bin/mozilla/admin.pl
index c71b1377..e8d9a60b 100755
--- a/bin/mozilla/admin.pl
+++ b/bin/mozilla/admin.pl
@@ -1153,81 +1153,6 @@ sub continue {
}
-sub update_dataset {
-
- %needsupdate = User->dbneedsupdate(\%$form);
-
- $form->{title} = "LedgerSMB ".$locale->text('Accounting')." "
- .$locale->text('Database Administration')." / "
- .$locale->text('Update Dataset');
- $form->{login} = "root login";
- $form->header;
-
- print qq|
- <body class="admin">
- <center>
- <h2>$form->{title}</h2>
- |;
-
- foreach $key (sort keys %needsupdate) {
-
- if ($needsupdate{$key} ne $form->{dbversion}) {
- $upd .= qq|<input name="db$key" class="checkbox" type="checkbox" value="1" checked /> $key\n|;
- $form->{dbupdate} .= "db$key ";
- }
- }
-
- chop $form->{dbupdate};
-
- if ($form->{dbupdate}) {
-
- print qq|
- <form method="post" action="$form->{script}" />
- <input type="hidden" name="dbdriver" value="$form->{dbdriver}" />
- <input type="hidden" name="dbhost" value="$form->{dbhost}" />
- <input type="hidden" name="dbport" value="$form->{dbport}" />
- <input type="hidden" name="dbuser" value="$form->{dbuser}" />
- <input type="hidden" name="dbpasswd" value="$form->{dbpasswd}" />
- <input type="hidden" name="dbdefault" value="$form->{dbdefault}" />
- <input name="dbupdate" type="hidden" value="$form->{dbupdate}" />
- <input name="callback" type="hidden" value="$form->{script}?action=list_users&path=$form->{path}&sessionid=$form->{sessionid}" />
- <input type="hidden" name="path" value="$form->{path}" />
- <input type="hidden" name="sessionid" value="$form->{sessionid}" />
- <input type="hidden" name="nextsub" value="dbupdate" />
-
- <table width="100%">
- <tr class="listheading">
- <th>|.$locale->text('The following Datasets need to be updated').qq|</th>
- </tr>
- <tr>
- <td>
- $upd
- </td>
- </tr>
- <tr>
- <td>
- <hr size="3" noshade />
- <br />
- <input type="submit" class="submit" name="action" value="|.$locale->text('Continue').qq|" />
- </td>
- </tr>
- </table>
- </form>
- |;
-
- } else {
-
- print $locale->text('DBA')." : $form->{dbuser} : " .$locale->text('All Datasets up to date!');
- }
-
- print qq|
- </body>
- </html>
- |;
-
-}
-
-
sub dbupdate {
User->dbupdate(\%$form);
--
cgit v1.2.3