1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
|
$r = shift ;
%messages =
(
'de' =>
{
'add_item'=> 'Eintrag hinzufgen',
'items_of'=> 'Bearbeiten der Eintrge von',
'addsel1' => 'Klicken Sie auf die Kategorie zu der Sie etwas hinzufgen mchten:',
'addsel2' => 'oder fgen Sie eine neue Kategorie hinzu. Bitte geben Sie die Beschreibung in so vielen Sprachen wie Ihnen mglich ein.',
'addsel3' => 'Falls Sie die bersetzung nicht wissen, lassen Sie das entsprechende Eingabefeld leer.',
'addsel4' => 'Kategorie hinzufgen',
'addsel_upd' => 'Klicken Sie auf die Kategorie in der Sie etwas ndern mchten:',
'addsel_login1' => 'Wenn Sie etwas an Ihren bisherigen Eingaben ndern mchten, mssen Sie sich zuerst',
'addsel_login2' => 'anmelden',
'addsel_login3' => '.',
'add1' => 'Hinzufgen eines neuen Eintrages zu',
'edit1' => 'Bearbeiten eines Eintrages von',
'del1' => 'Lschen eines Eintrages',
'add2a' => 'Bitte geben Sie die Beschreibung in so vielen Sprachen wie Ihnen mglich ein.',
'add2b' => 'Falls Sie die bersetzung nicht wissen, lassen Sie das entsprechende Eingabefeld leer.',
'add3' => 'Hinzufgen zu',
'update3' => 'bernehmen',
'delete3' => 'Lschen',
'heading' => 'berschrift',
'url' => 'URL',
'description' => 'Beschreibung',
'state' => 'Status',
'show2' => 'Folgender Eintrag wurde erfolgreich der Datenbank hinzugefgt/gendert',
'del2' => 'Der Eintrag wurde erfolgreich aus der Datenbank entfernt',
'Search' => 'Suchen',
'under_construction' => 'Hinweis: Dieser Teil der Website befindet sich noch im Aufbau.',
'more_news' => 'Weitere News...',
'add_news' => 'News hinzufgen...',
'display' => 'anzeigen',
'hide' => 'nicht anzeigen',
'logged_in_as' => 'Angemeldet als',
'already_logged_in_as' => 'Sie sind bereits angemeldet als',
'logoff' => 'Hier knnen Sie sich wieder abmelden',
'need_login' => 'Sie mssen sich erst anmelden um diesen Bereich zu nutzen.',
'login_head' => q{Hier knnen Sie sich auf der Embperl-Site anmelden. Dies erlaubt Ihnen
Informationen bezglich Embperl (Neugigkeiten, Sites die Embperl benutzen,
Verffentlichungen, Beispiele etc.) hinzuzufgen, zu ndern und zu lschen.},
'loginnew' => 'Sie erhalten Ihr Kennwort per E-Mail zugeschickt, bitte tragen Sie es unten ein um die Anmeldung zu vollenden und klicken dann auf "Anmelden".',
'login1' => 'Wenn Sie sich schon einmal angemeldet haben, geben Sie bitte Ihre E-Mail Adresse und Ihr Kennwort ein und klicken dann auf "Anmelden".',
'login2' => q{Wenn Sie sich das erste Mal anmelden, geben Sie lediglich Ihre E-Mail Adresse an
und klicken auf "Neuen Benutzer-Account einrichten".
Sie bekommen dann ein neues Kennwort zugeschickt.},
'login3' => q{Haben Sie Ihr Kennwort vergessen, geben Sie Ihre E-Mail Adresse ein und klicken dann
auf "Neues Kennwort". Sie bekommen
dann ein neues Kennwort zugesandt.},
'cookie_note' => 'HINWEIS: Zur Anmeldung ist es erforderlich das Ihr Browser Cookies akzeptiert',
'user_email' => 'E-Mail Adresse',
'user_password' => 'Kennwort',
'user_name' => 'Name',
'login' => 'Anmelden',
'logout' => 'Abmelden',
'newuser' => 'Neuen Benutzer-Account einrichten',
'newpassword' => 'Neues Kennwort',
'error' => 'Fehler',
'warning' => 'Warnung',
'error_reason' => 'Grund',
# Mail Handling
'mail_greeting' => 'Hallo!',
'mail_account_request' => 'Sie oder jemand anderes haben ein Benutzer-Konto auf der Embperl Website angefordert.',
'mail_note1' => 'Ihr Kontoname ist Ihre E-Mail-Adresse, d.h. sie sollten auf der Embperl-Webseite',
'mail_note2' => 'als Login-Name angeben.',
'mail_your_pw_is' => 'Ihr Kennwort ist auf',
'mail_note_quotes' => 'gesetzt (ohne die Hochkommata)',
'mail_note_login' => 'Sie knnen sich jetzt unter folgender Adresse anmelden:',
'mail_sig' => 'Gre von der Embperl Webseite',
'mail_pw' => 'Sie oder jemand anders hat ein neues Kennwort fr Ihr Benutzerkonto auf der Embperl Webseite beantragt.',
'mail_subj_newuser' => 'Ihr Benutzerkonto auf der Embperl Website',
'mail_subj_newpw' => 'Ihr neues Kennwort auf der Embperl Website',
# Errors
'err_notfound' => 'Das angeforderte Dokument konnte nicht gefunden werden.',
'err_email_needed' => "Sie mssen eine E-Mail Adresse eingeben.",
'err_access_denied' => 'Zugriff verweigert. Entweder die E-Mail Adresse oder das Kennwort sind falsch.',
'err_user_exists' => 'Benutzer existiert bereits. Vielleicht mchten Sie ein neues Kennwort an diese Adresse senden?',
'err_user_not_exists' => "Benutzer existiert nicht. Vielleicht haben Sie sich vertippt oder sich unter einer anderen E-Mail Adresse registriert?",
'err_user_mail' => 'Mail kann nicht an den Benutzer gesendet werden.',
'err_pw_mail' => 'Kennwort kann nicht per Mail an den Benutzer versendet werden.',
'err_db' => 'Datenbankfehler',
'err_update_db' => 'Datenbankfehler beim Update',
'err_update_lang_db' => 'Datenbankehler wrend Update der Sprachversionen',
'err_cannot_update_no_id' => 'Update fehlgeschlagen: Zugriff verweigert',
'err_cannot_update_maybe_wrong_user' => 'Update fehlgeschlagen: Berechtigung fehlt',
'err_cannot_delete_no_id' => 'Lschen fehlgeschlagen: Berechtigung fehlt',
'err_cannot_delete_maybe_wrong_user_or_no_such_item' => 'Lschen fehlgeschlagen: Berechtigung fehlt',
'err_cannot_delete_db_error' => 'Lschen fehlgeschlagen: Datenbankfehler',
'err_item_not_found_or_access_denied' => 'Eintrag nicht gefunden oder Zugriff verweigert',
'err_item_admin_mail' => 'Fehler beim Mailversand',
# Warnings
'warn_url_removed_white_space' => 'Leerzeichen wurden aus URL entfernt',
'warn_url_added_http' => '"http://" zu URL hinzugefgt',
# Success
'suc_login' => 'Anmeldung erfolgreich',
'suc_logout' => 'Abmeldung erfolgreich',
'suc_password_sent' => 'Das Kennwort wurde erfolgreich versendet',
'suc_item_deleted' => 'Eintrag erfolgreich gelscht',
'suc_item_updated' => 'Eintrag erfolgreich gendert',
'suc_item_created' => 'Eintrag erfolgreich erstellt',
},
'en' =>
{
'add_item'=> 'Add new entry',
'items_of'=> 'Edit items from',
'addsel1' => 'Click on the category for wich you want to add a new item:',
'addsel2' => 'or add new category. Please enter the description in as much languages as possible.',
'addsel3' => 'If you don\'t know the translation leave the corresponding input field empty.',
'addsel4' => 'Add category',
'addsel_upd' => 'Click on the category for wich you want to edit a item:',
'addsel_login1' => 'If you like to change your previous entries, you need to',
'addsel_login2' => 'login',
'addsel_login3' => 'first.',
'add1' => 'Add a new item to',
'edit1' => 'Edit item of',
'del1' => 'Delete item',
'add2a' => 'Please enter the description in as much languages as possible.',
'add2b' => 'If you don\'t know the translation leave the corresponding input field empty.',
'add3' => 'Add to',
'update3' => 'Apply',
'delete3' => 'Delete',
'heading' => 'Heading',
'url' => 'URL',
'description' => 'Description',
'state' => 'State',
'show2' => 'The following entry has been sucessfully added/modified to the database',
'del2' => 'The entry has been sucessfully removed from the database',
'Search' => 'Search',
'under_construction' => 'NOTE: This part of the site is still under contruction.',
'more_news' => 'more news...',
'add_news' => 'add news...',
'display' => 'display',
'hide' => 'hide',
'logged_in_as' => 'logged in as',
'already_logged_in_as' => 'You are already logged in as',
'logoff' => 'Here you can logoff from the site',
'need_login' => q{You must be logged in to access this area.},
'login_head' => q{Here you can logon to the Embperl-Site.
This allows you to enter information about Embperl like news,
sites using Embperl, publications, examples etc.
You may also edit and delete the information you have enterd before},
'loginnew' => 'You will receive your new password via e-mail. Please enter it in the form below and click on "Login".',
'login1' => q{If you have already a user account, please enter your email address and
password and click on 'Login'. },
'login2' => q{If you have not already a user account, just enter your email and click
on 'Create new account'.
A new account will be created and the password will be imediately mailed
to address you entered.},
'login3' => q{In case you have forgotten your password, click on 'New password',
a new password will be mailed
to your email address.},
'cookie_note' => 'NOTE: For login it\'s necessary that your browser accepts cookies',
'user_email' => 'E-Mail address',
'user_password' => 'Password',
'user_name' => 'Name',
'login' => 'Login',
'logout' => 'Logout',
'newuser' => 'Create new account',
'newpassword' => 'New password',
'error' => 'Error',
'warning' => 'Warning',
'error_reason' => 'Reason',
# Mail Handling
'mail_greeting' => 'Hi!',
'mail_account_request' => 'You or someone else requested a user account for the Embperl website.',
'mail_note1' => 'Your account name is your e-mail address, that means you should enter',
'mail_note2' => 'as login name on the Embperl website.',
'mail_your_pw_is' => 'Your password is set to',
'mail_note_quotes' => '(without the single quotes)',
'mail_note_login' => 'You can now log in at the following address:',
'mail_sig' => 'Regards, Your Embperl Website',
'mail_pw' => 'You or possible someone else requested a new password for your account on the Embperl Website',
'mail_subj_newuser' => 'Your Embperl Website Account',
'mail_subj_newpw' => 'Your new Embperl Website password',
# Errors
'err_notfound' => 'The document you requested wasn\'t found.',
'err_email_needed' => "You haven't entered an email address. This is mandatory for the requested action.",
'err_access_denied' => 'Access Denied. Either user name (e-mail address) or password were wrong.',
'err_user_exists' => 'User already exists. Perhaps you want a new password sent to this address?',
'err_user_not_exists' => "User doesn't exists. Maybe there's a typo in the address or you registered with a different address?",
'err_user_mail' => 'Could not sent mail to user.',
'err_pw_mail' => 'Could not sent mail with password to user.',
'err_db' => 'Database error',
'err_update_db' => 'Database error while updating',
'err_update_lang_db' => 'Database error while updating languages',
'err_cannot_update_no_id' => 'Update failed: Permission denied',
'err_cannot_update_maybe_wrong_user' => 'Update failed: Permission denied',
'err_cannot_delete_no_id' => 'Deletion failed: Permission denied',
'err_cannot_delete_maybe_wrong_user_or_no_such_item' => 'Deletion failed: Permission denied',
'err_cannot_delete_db_error' => 'Deletion failed: Database error',
'err_item_not_found_or_access_denied' => 'Item not found or access denied',
'err_item_admin_mail' => 'Error sending mail',
# Warnings
'warn_url_removed_white_space' => 'Removed whitespaces from URL.',
'warn_url_added_http' => 'Added "http://" to the incomplete URL.',
# Success
'suc_login' => 'Successfully logged in',
'suc_logout' => 'Successfully logged out',
'suc_password_sent' => 'Successfully sent password to given e-mail address',
'suc_item_deleted' => 'Item successfully deleted',
'suc_item_updated' => 'Item successfully updated',
'suc_item_created' => 'Item successfully created',
},
) ;
$lang = $r -> param -> language ;
push @{$r -> messages}, $messages{$lang} ;
push @{$r -> default_messages}, $messages{'en'} if ($lang ne 'en') ;
|
