%#============================================================================ %# ePortal - WEB Based daily organizer %# Author - S.Rusakov %# %# Copyright (c) 2000-2004 Sergey Rusakov. All rights reserved. %# This program is open source software %# %# %#---------------------------------------------------------------------------- <& /message.mc &>
<% pick_lang(rus => "Наименование", eng => "Name") %> URL
<% pick_lang(rus => "В начало", eng => "Home") %> /index.htm
"> ">
"> ">
"> ">
<% pick_lang(rus => "Карта сервера", eng => "Server's map") %> /catalog/index.htm
<% pick_lang(rus => "Регистрация", eng => "Login") %> /login.htm
"Save") %>">
%#=== @metags init ========================================================= <%init> if ($ARGS{savemenu}) { foreach my $arg ( qw/TopMenuItemName1 TopMenuItemURL1 TopMenuItemName2 TopMenuItemURL2 TopMenuItemName3 TopMenuItemURL3/) { if ( $ARGS{$arg} ) { $ePortal->Config($arg, $ARGS{$arg}); } else { $ePortal->Config($arg, undef); } } $session{GoodMessage} = pick_lang(rus => "Настрока сохранена", eng => "Data saved"); }