Revision ce83fab9
Von Sven Schöling vor fast 13 Jahren hinzugefügt
| SL/Form.pm | ||
|---|---|---|
|
push @header, "<meta http-equiv='refresh' content='$refresh_time;$refresh_url'>";
|
||
|
}
|
||
|
|
||
|
push @header, map { qq|<link rel="stylesheet" href="$_" type="text/css" title="Lx-Office stylesheet">| } $self->use_stylesheet;
|
||
|
push @header, map { qq|<link rel="stylesheet" href="$_" type="text/css" title="Stylesheet">| } $self->use_stylesheet;
|
||
|
|
||
|
push @header, "<style type='text/css'>\@page { size:landscape; }</style>" if $self->{landscape};
|
||
|
push @header, "<link rel='shortcut icon' href='$self->{favicon}' type='image/x-icon'>" if -f $self->{favicon};
|
||
| ... | ... | |
|
$::lxdebug->enter_sub;
|
||
|
my $self = shift;
|
||
|
|
||
|
$self->{titlebar} = "Lx-Office " . $::locale->text('Version') . " $self->{version}";
|
||
|
$self->{titlebar} = "kivitendo " . $::locale->text('Version') . " $self->{version}";
|
||
|
$self->{titlebar} .= "- $::myconfig{name}" if $::myconfig{name};
|
||
|
$self->{titlebar} .= "- $::myconfig{dbname}" if $::myconfig{name};
|
||
|
|
||
| bin/mozilla/admin.pl | ||
|---|---|---|
|
my $form = $main::form;
|
||
|
my $locale = $main::locale;
|
||
|
|
||
|
$form->{title} = qq|Lx-Office ERP $form->{version} | . $locale->text('Administration');
|
||
|
$form->{title} = qq|kivitendo $form->{version} | . $locale->text('Administration');
|
||
|
|
||
|
$form->header();
|
||
|
print $form->parse_html_template('admin/adminlogin');
|
||
| ... | ... | |
|
$_->{login_url} = $::locale->is_utf8 ? Encode::encode('utf-8-strict', $_->{login}) : $_->{login_url};
|
||
|
}
|
||
|
|
||
|
$form->{title} = "Lx-Office ERP " . $locale->text('Administration');
|
||
|
$form->{title} = "kivitendo " . $locale->text('Administration');
|
||
|
$form->{LOCKED} = -e _nologin_file_name();
|
||
|
$form->{MEMBERS} = [ @members{sort { lc $a cmp lc $b } keys %members} ];
|
||
|
|
||
| ... | ... | |
|
}
|
||
|
|
||
|
sub add_user {
|
||
|
$::form->{title} = "Lx-Office ERP " . $::locale->text('Administration') . " / " . $::locale->text('Add User');
|
||
|
$::form->{title} = "kivitendo " . $::locale->text('Administration') . " / " . $::locale->text('Add User');
|
||
|
|
||
|
# Note: Menu Style 'v3' is not compatible to all browsers!
|
||
|
# "menustyle" => "old" sets the HTML Menu to default.
|
||
| ... | ... | |
|
}
|
||
|
|
||
|
sub edit_user {
|
||
|
$::form->{title} = "Lx-Office ERP " . $::locale->text('Administration') . " / " . $::locale->text('Edit User');
|
||
|
$::form->{title} = "kivitendo " . $::locale->text('Administration') . " / " . $::locale->text('Edit User');
|
||
|
$::form->{edit} = 1;
|
||
|
|
||
|
# get user
|
||
| ... | ... | |
|
$form->{dbdefault} = 'template1';
|
||
|
$form->{dbhost} = $::auth->{DB_config}->{host} || 'localhost';
|
||
|
|
||
|
$form->{title} = "Lx-Office ERP / " . $locale->text('Database Administration');
|
||
|
$form->{title} = "kivitendo / " . $locale->text('Database Administration');
|
||
|
|
||
|
# Intentionnaly disabled unless fixed to work with the authentication DB.
|
||
|
$form->{ALLOW_DBBACKUP} = 0; # "$pg_dump_exe" ne "DISABLED";
|
||
| ... | ... | |
|
my $form = $main::form;
|
||
|
my $locale = $main::locale;
|
||
|
|
||
|
$form->{title} = "Lx-Office ERP " . $locale->text('Database Administration') . " / " . $locale->text('Update Dataset');
|
||
|
$form->{title} = "kivitendo " . $locale->text('Database Administration') . " / " . $locale->text('Update Dataset');
|
||
|
|
||
|
my @need_updates = User->dbneedsupdate($form);
|
||
|
$form->{NEED_UPDATES} = \@need_updates;
|
||
| ... | ... | |
|
}
|
||
|
}
|
||
|
|
||
|
$form->{title} = "Lx-Office ERP " . $locale->text('Database Administration') . " / " . $locale->text('Create Dataset');
|
||
|
$form->{title} = "kivitendo " . $locale->text('Database Administration') . " / " . $locale->text('Create Dataset');
|
||
|
|
||
|
$form->header();
|
||
|
print $form->parse_html_template("admin/create_dataset");
|
||
| ... | ... | |
|
|
||
|
User->dbcreate(\%$form);
|
||
|
|
||
|
$form->{title} = "Lx-Office ERP " . $locale->text('Database Administration') . " / " . $locale->text('Create Dataset');
|
||
|
$form->{title} = "kivitendo " . $locale->text('Database Administration') . " / " . $locale->text('Create Dataset');
|
||
|
|
||
|
$form->header();
|
||
|
print $form->parse_html_template("admin/dbcreate");
|
||
| ... | ... | |
|
my @dbsources = User->dbsources_unused($form);
|
||
|
$form->error($locale->text('Nothing to delete!')) unless @dbsources;
|
||
|
|
||
|
$form->{title} = "Lx-Office ERP " . $locale->text('Database Administration') . " / " . $locale->text('Delete Dataset');
|
||
|
$form->{title} = "kivitendo " . $locale->text('Database Administration') . " / " . $locale->text('Delete Dataset');
|
||
|
$form->{DBSOURCES} = [ map { { "name", $_ } } sort @dbsources ];
|
||
|
|
||
|
$form->header();
|
||
| ... | ... | |
|
|
||
|
User->dbdelete(\%$form);
|
||
|
|
||
|
$form->{title} = "Lx-Office ERP " . $locale->text('Database Administration') . " / " . $locale->text('Delete Dataset');
|
||
|
$form->{title} = "kivitendo " . $locale->text('Database Administration') . " / " . $locale->text('Delete Dataset');
|
||
|
$form->header();
|
||
|
print $form->parse_html_template("admin/dbdelete");
|
||
|
}
|
||
| ... | ... | |
|
my $form = $main::form;
|
||
|
my $locale = $main::locale;
|
||
|
|
||
|
$form->{title} = "Lx-Office ERP " . $locale->text('Database Administration') . " / " . $locale->text('Backup Dataset');
|
||
|
$form->{title} = "kivitendo " . $locale->text('Database Administration') . " / " . $locale->text('Backup Dataset');
|
||
|
|
||
|
if ($::lx_office_conf{applications}->{pg_dump} eq "DISABLED") {
|
||
|
$form->error($locale->text('Database backups and restorations are disabled in the configuration.'));
|
||
| ... | ... | |
|
|
||
|
my $username = getpwuid $UID || "unknown-user";
|
||
|
my $hostname = hostname() || "unknown-host";
|
||
|
$form->{from} = "Lx-Office Admin <${username}\@${hostname}>";
|
||
|
$form->{from} = "kivitendo Admin <${username}\@${hostname}>";
|
||
|
|
||
|
$form->header();
|
||
|
print $form->parse_html_template("admin/backup_dataset");
|
||
| ... | ... | |
|
my $form = $main::form;
|
||
|
my $locale = $main::locale;
|
||
|
|
||
|
$form->{title} = "Lx-Office ERP " . $locale->text('Database Administration') . " / " . $locale->text('Backup Dataset');
|
||
|
$form->{title} = "kivitendo " . $locale->text('Database Administration') . " / " . $locale->text('Backup Dataset');
|
||
|
|
||
|
my $pg_dump_exe = $::lx_office_conf{applications}->{pg_dump} || "pg_dump";
|
||
|
|
||
| ... | ... | |
|
unlink "${tmpdir}/.pgpass", $tmp;
|
||
|
rmdir $tmpdir;
|
||
|
|
||
|
$form->{title} = "Lx-Office ERP " . $locale->text('Database Administration') . " / " . $locale->text('Backup Dataset');
|
||
|
$form->{title} = "kivitendo " . $locale->text('Database Administration') . " / " . $locale->text('Backup Dataset');
|
||
|
|
||
|
$form->header();
|
||
|
print $form->parse_html_template("admin/backup_dataset_email_done");
|
||
| ... | ... | |
|
my $form = $main::form;
|
||
|
my $locale = $main::locale;
|
||
|
|
||
|
$form->{title} = "Lx-Office ERP " . $locale->text('Database Administration') . " / " . $locale->text('Restore Dataset');
|
||
|
$form->{title} = "kivitendo " . $locale->text('Database Administration') . " / " . $locale->text('Restore Dataset');
|
||
|
|
||
|
if ($::lx_office_conf{applications}->{pg_restore} eq "DISABLED") {
|
||
|
$form->error($locale->text('Database backups and restorations are disabled in the configuration.'));
|
||
| ... | ... | |
|
my $form = $main::form;
|
||
|
my $locale = $main::locale;
|
||
|
|
||
|
$form->{title} = "Lx-Office ERP " . $locale->text('Database Administration') . " / " . $locale->text('Restore Dataset');
|
||
|
$form->{title} = "kivitendo " . $locale->text('Database Administration') . " / " . $locale->text('Restore Dataset');
|
||
|
|
||
|
my $pg_restore_exe = $::lx_office_conf{applications}->{pg_restore} || "pg_restore";
|
||
|
|
||
| bin/mozilla/login.pl | ||
|---|---|---|
|
$form->{todo_list} = create_todo_list('login_screen' => 1) if (!$form->{no_todo_list});
|
||
|
|
||
|
$form->{stylesheet} = $myconfig{stylesheet};
|
||
|
$form->{title} = $::locale->text('Lx-Office');
|
||
|
$form->{title} = $::locale->text('kivitendo');
|
||
|
$form->{interface} = $::dispatcher->interface_type;
|
||
|
|
||
|
# create the logo screen
|
||
| bin/mozilla/menu.pl | ||
|---|---|---|
|
my $framesize = _calc_framesize() - 2;
|
||
|
my $menu = Menu->new("menu.ini");
|
||
|
$mainlevel = $::form->{level};
|
||
|
$::form->{title} = $::locale->text('Lx-Office');
|
||
|
$::form->{title} = $::locale->text('kivitendo');
|
||
|
$::form->header;
|
||
|
|
||
|
print qq|
|
||
Auch abrufbar als: Unified diff
kivitendo rebranding: title strings