summaryrefslogtreecommitdiff
path: root/bin
diff options
context:
space:
mode:
Diffstat (limited to 'bin')
-rwxr-xr-xbin/mozilla/admin.pl75
1 files changed, 0 insertions, 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&amp;path=$form->{path}&amp;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);