diff options
| author | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-09-09 17:32:24 +0000 |
|---|---|---|
| committer | einhverfr <einhverfr@4979c152-3d1c-0410-bac9-87ea11338e46> | 2007-09-09 17:32:24 +0000 |
| commit | 999850bf0c4b8f375fa0db19c326c86ec27e16ed (patch) | |
| tree | 158a16d629b4738f0eafd6121f12f3a0116e3bdd /scripts | |
| parent | 9c185a9fa176f472cd9a708a9e1b14866cd71872 (diff) | |
Fixing frameset title
git-svn-id: https://ledger-smb.svn.sourceforge.net/svnroot/ledger-smb/trunk@1548 4979c152-3d1c-0410-bac9-87ea11338e46
Diffstat (limited to 'scripts')
| -rw-r--r-- | scripts/menu.pl | 4 |
1 files changed, 4 insertions, 0 deletions
diff --git a/scripts/menu.pl b/scripts/menu.pl index 4e81b331..dec08671 100644 --- a/scripts/menu.pl +++ b/scripts/menu.pl @@ -64,6 +64,10 @@ creates the root document (currently a frameset). sub root_doc { my ($request) = @_; my $template; + + $request->{title} = "LedgerSMB $request->{VERSION} -- ". + "$request->{login} -- $request->{_user}->{dbname}"; + if (!$request->{menubar}){ $request->{main} = "splash.html" if $request->{main} eq 'company_logo'; $request->{main} = "am.pl?action=recurring_transactions" |