| 1 | <?php |
| 2 | |
| 3 | /** |
| 4 | * setup.php |
| 5 | * |
| 6 | * Copyright (c) 1999-2003 The SquirrelMail Project Team |
| 7 | * Licensed under the GNU GPL. For full terms see the file COPYING. |
| 8 | * |
| 9 | * $Id$ |
| 10 | */ |
| 11 | |
| 12 | /* Easy plugin that sends the body of the message to a new browser |
| 13 | window using the specified translator. It can also translate your |
| 14 | outgoing message if you send it to someone in a different country. |
| 15 | |
| 16 | Languages from i18n, incorporated in the auto-language selection: |
| 17 | en - English |
| 18 | no - Norwegian (Bokmål) |
| 19 | no_NO_ny - Norwegian (Nynorsk) |
| 20 | de - Deutsch |
| 21 | ru - Russian KOI8-R |
| 22 | pl - Polish |
| 23 | sv - Swedish |
| 24 | nl - Dutch |
| 25 | pt_BR - Portuguese (Brazil) |
| 26 | fr - French |
| 27 | it - Italian |
| 28 | cs - Czech |
| 29 | es - Spanish |
| 30 | ko - Korean |
| 31 | */ |
| 32 | |
| 33 | |
| 34 | /* Initialize the translation plugin */ |
| 35 | function squirrelmail_plugin_init_translate() { |
| 36 | global $squirrelmail_plugin_hooks; |
| 37 | |
| 38 | $squirrelmail_plugin_hooks['read_body_bottom']['translate'] = 'translate_read_form'; |
| 39 | $squirrelmail_plugin_hooks['optpage_register_block']['translate'] = 'translate_optpage_register_block'; |
| 40 | $squirrelmail_plugin_hooks['loading_prefs']['translate'] = 'translate_pref'; |
| 41 | $squirrelmail_plugin_hooks['compose_button_row']['translate'] = 'translate_button'; |
| 42 | } |
| 43 | |
| 44 | |
| 45 | /* Show the translation for a message you're reading */ |
| 46 | function translate_read_form() { |
| 47 | global $color, $translate_server; |
| 48 | global $message, $translate_dir; |
| 49 | global $translate_show_read; |
| 50 | global $imapConnection, $wrap_at, $passed_id, $mailbox; |
| 51 | |
| 52 | if (!$translate_show_read) { |
| 53 | return; |
| 54 | } |
| 55 | |
| 56 | $translate_dir = 'to'; |
| 57 | |
| 58 | $trans_ar = $message->findDisplayEntity(array(), array('text/plain')); |
| 59 | $body = ''; |
| 60 | if ($trans_ar[0] != '') { |
| 61 | for ($i = 0; $i < count($trans_ar); $i++) { |
| 62 | $body .= formatBody($imapConnection, $message, $color, $wrap_at, $trans_ar[$i], $passed_id, $mailbox); |
| 63 | } |
| 64 | $hookResults = do_hook('message_body', $body); |
| 65 | $body = $hookResults[1]; |
| 66 | } else { |
| 67 | $body = 'Message can\'t be translated'; |
| 68 | } |
| 69 | |
| 70 | $new_body = $body; |
| 71 | $pos = strpos($new_body, |
| 72 | '">'. _("Download this as a file") . '</A></CENTER><BR></SMALL>'); |
| 73 | if (is_int($pos)) { |
| 74 | $new_body = substr($new_body, 0, $pos); |
| 75 | } |
| 76 | |
| 77 | $trans = get_html_translation_table(HTML_ENTITIES); |
| 78 | $trans[' '] = ' '; |
| 79 | $trans = array_flip($trans); |
| 80 | $new_body = strtr($new_body, $trans); |
| 81 | |
| 82 | $new_body = urldecode($new_body); |
| 83 | $new_body = strip_tags($new_body); |
| 84 | |
| 85 | /* I really don't like this next part ... */ |
| 86 | $new_body = str_replace('"', "''", $new_body); |
| 87 | $new_body = strtr($new_body, "\n", ' '); |
| 88 | |
| 89 | $function = 'translate_form_' . $translate_server; |
| 90 | $function($new_body); |
| 91 | } |
| 92 | |
| 93 | function translate_table_end() { |
| 94 | ?></td> |
| 95 | </tr> |
| 96 | </table> |
| 97 | </td> |
| 98 | </tr> |
| 99 | </table> |
| 100 | </form> |
| 101 | <?php |
| 102 | } |
| 103 | |
| 104 | |
| 105 | function translate_button() { |
| 106 | global $translate_show_send; |
| 107 | |
| 108 | if (! $translate_show_send) { |
| 109 | return; |
| 110 | } |
| 111 | } |
| 112 | |
| 113 | |
| 114 | function translate_optpage_register_block() { |
| 115 | global $optpage_blocks; |
| 116 | $optpage_blocks[] = array( |
| 117 | 'name' => _("Translation Options"), |
| 118 | 'url' => '../plugins/translate/options.php', |
| 119 | 'desc' => _("Which translator should be used when you get messages in a different language?"), |
| 120 | 'js' => false |
| 121 | ); |
| 122 | } |
| 123 | |
| 124 | function translate_pref() { |
| 125 | global $username, $data_dir; |
| 126 | global $translate_server, $translate_location; |
| 127 | global $translate_show_send, $translate_show_read; |
| 128 | global $translate_same_window; |
| 129 | |
| 130 | $translate_server = getPref($data_dir, $username, 'translate_server'); |
| 131 | if ($translate_server == '') { |
| 132 | $translate_server = 'babelfish'; |
| 133 | } |
| 134 | |
| 135 | $translate_location = getPref($data_dir, $username, 'translate_location'); |
| 136 | if ($translate_location == '') { |
| 137 | $translate_location = 'center'; |
| 138 | } |
| 139 | |
| 140 | $translate_show_send = getPref($data_dir, $username, 'translate_show_send'); |
| 141 | $translate_show_read = getPref($data_dir, $username, 'translate_show_read'); |
| 142 | $translate_same_window = getPref($data_dir, $username, 'translate_same_window'); |
| 143 | } |
| 144 | |
| 145 | |
| 146 | /** |
| 147 | * This function could be sped up. |
| 148 | * It basically negates the process if a ! is found in the beginning and |
| 149 | * matches a * at the end with 0 or more characters. |
| 150 | */ |
| 151 | function translate_does_it_match_language($test) { |
| 152 | global $squirrelmail_language; |
| 153 | $true = 1; |
| 154 | $false = 0; |
| 155 | $index = 0; |
| 156 | $smindex = 0; |
| 157 | |
| 158 | if (! $test || ! $squirrelmail_language) { |
| 159 | return $false; |
| 160 | } |
| 161 | |
| 162 | if ($test[$index] == '!') { |
| 163 | $index ++; |
| 164 | $true = 0; |
| 165 | $false = 1; |
| 166 | } |
| 167 | |
| 168 | if (($index == 0) && ($test == $squirrelmail_language)) { |
| 169 | return $true; |
| 170 | } |
| 171 | |
| 172 | while (isset($test[$index]) && $test[$index]) { |
| 173 | if ($test[$index] == '*') { |
| 174 | return $true; |
| 175 | } |
| 176 | if ($test[$index] != $squirrelmail_language[$smindex]) { |
| 177 | return $false; |
| 178 | } |
| 179 | $index ++; |
| 180 | $smindex ++; |
| 181 | } |
| 182 | |
| 183 | return $false; |
| 184 | } |
| 185 | |
| 186 | |
| 187 | function translate_lang_opt($from, $to, $value, $text) { |
| 188 | global $translate_dir; |
| 189 | |
| 190 | $ret = ' <option value="' . $value . '"'; |
| 191 | |
| 192 | if (translate_does_it_match_language($to) && ($translate_dir == 'to')) { |
| 193 | $ret .= ' SELECTED'; |
| 194 | } |
| 195 | |
| 196 | if (translate_does_it_match_language($from) && ($translate_dir == 'from')) { |
| 197 | $ret .= ' SELECTED'; |
| 198 | } |
| 199 | |
| 200 | $ret .= '>' . $text . "</option>\n"; |
| 201 | |
| 202 | return( $ret ); |
| 203 | } |
| 204 | |
| 205 | |
| 206 | function translate_new_form($action) { |
| 207 | global $translate_dir, $translate_new_window, $translate_location; |
| 208 | global $color, $translate_same_window; |
| 209 | |
| 210 | echo '<form action="'; |
| 211 | |
| 212 | if ($translate_dir == 'to') { |
| 213 | echo $action; |
| 214 | } else { |
| 215 | echo 'translate.php'; |
| 216 | } |
| 217 | |
| 218 | echo '" method="post"'; |
| 219 | |
| 220 | if (!$translate_same_window) { |
| 221 | echo ' target="_blank"'; |
| 222 | } |
| 223 | |
| 224 | echo ">\n"; |
| 225 | |
| 226 | ?><table align="<?php echo $translate_location ?>" cellpadding=3 cellspacing=0 border=0 bgcolor=<?php echo $color[10] ?>> |
| 227 | <tr> |
| 228 | <td> |
| 229 | <table cellpadding=2 cellspacing=1 border=0 bgcolor="<?php echo $color[5] ?>"> |
| 230 | <tr> |
| 231 | <td><?php |
| 232 | } |
| 233 | |
| 234 | function translate_form_babelfish($message) { |
| 235 | translate_new_form('http://babelfish.altavista.com/babelfish/tr'); |
| 236 | ?> |
| 237 | <input type="hidden" name="doit" value="done"> |
| 238 | <input type="hidden" name="intl" value="1"> |
| 239 | <input type="hidden" name="tt" value="urltext"> |
| 240 | <input type="hidden" name="urltext" value="<?php echo $message; ?>"> |
| 241 | <select name="lp"><?php |
| 242 | echo translate_lang_opt('en', 'zh', 'en_zh', |
| 243 | sprintf( _("%s to %s"), |
| 244 | _("English"), |
| 245 | _("Chinese"))) . |
| 246 | translate_lang_opt('en', 'fr', 'en_fr', |
| 247 | sprintf( _("%s to %s"), |
| 248 | _("English"), |
| 249 | _("French"))) . |
| 250 | translate_lang_opt('', 'de', 'en_de', |
| 251 | sprintf( _("%s to %s"), |
| 252 | _("English"), |
| 253 | _("German"))) . |
| 254 | translate_lang_opt('', 'it', 'en_it', |
| 255 | sprintf( _("%s to %s"), |
| 256 | _("English"), |
| 257 | _("Italian"))) . |
| 258 | translate_lang_opt('en', 'ja', 'en_ja', |
| 259 | sprintf( _("%s to %s"), |
| 260 | _("English"), |
| 261 | _("Japanese"))) . |
| 262 | translate_lang_opt('en', 'ko', 'en_ko', |
| 263 | sprintf( _("%s to %s"), |
| 264 | _("English"), |
| 265 | _("Korean"))) . |
| 266 | translate_lang_opt('', 'pt*', 'en_pt', |
| 267 | sprintf( _("%s to %s"), |
| 268 | _("English"), |
| 269 | _("Portuguese"))) . |
| 270 | translate_lang_opt('', 'es', 'en_es', |
| 271 | sprintf( _("%s to %s"), |
| 272 | _("English"), |
| 273 | _("Spanish"))) . |
| 274 | translate_lang_opt('zh', 'en', 'zh_en', |
| 275 | sprintf( _("%s to %s"), |
| 276 | _("Chinese"), |
| 277 | _("English"))) . |
| 278 | translate_lang_opt('fr', 'en', 'fr_en', |
| 279 | sprintf( _("%s to %s"), |
| 280 | _("French"), |
| 281 | _("English"))) . |
| 282 | translate_lang_opt('de', '', 'de_en', |
| 283 | sprintf( _("%s to %s"), |
| 284 | _("German"), |
| 285 | _("English"))) . |
| 286 | translate_lang_opt('it', '', 'it_en', |
| 287 | sprintf( _("%s to %s"), |
| 288 | _("Italian"), |
| 289 | _("English"))) . |
| 290 | translate_lang_opt('ja', 'en', 'ja_en', |
| 291 | sprintf( _("%s to %s"), |
| 292 | _("Japanese"), |
| 293 | _("English"))) . |
| 294 | translate_lang_opt('ko', 'en', 'ko_en', |
| 295 | sprintf( _("%s to %s"), |
| 296 | _("Korean"), |
| 297 | _("English"))) . |
| 298 | translate_lang_opt('pt*', '', 'pt_en', |
| 299 | sprintf( _("%s to %s"), |
| 300 | _("Portuguese"), |
| 301 | _("English"))) . |
| 302 | translate_lang_opt('es', '', 'es_en', |
| 303 | sprintf( _("%s to %s"), |
| 304 | _("Spanish"), |
| 305 | _("English"))) . |
| 306 | translate_lang_opt('', '', 'de_fr', |
| 307 | sprintf( _("%s to %s"), |
| 308 | _("German"), |
| 309 | _("French"))) . |
| 310 | translate_lang_opt('', '', 'fr_de', |
| 311 | sprintf( _("%s to %s"), |
| 312 | _("French"), |
| 313 | _("German"))) . |
| 314 | translate_lang_opt('ru', '', 'ru_en', |
| 315 | sprintf( _("%s to %s"), |
| 316 | _("Russian"), |
| 317 | _("English"))); |
| 318 | echo '</select>'. |
| 319 | 'Babelfish: <input type="Submit" value="' . _("Translate") . '">'; |
| 320 | |
| 321 | translate_table_end(); |
| 322 | } |
| 323 | |
| 324 | function translate_form_go($message) { |
| 325 | translate_new_form('http://translator.go.com/cb/trans_entry'); |
| 326 | ?> |
| 327 | <input type=hidden name=input_type value=text> |
| 328 | <select name=lp><?php |
| 329 | echo translate_lang_opt('en', 'es', 'en_sp', |
| 330 | sprintf( _("%s to %s"), |
| 331 | _("English"), |
| 332 | _("Spanish"))) . |
| 333 | translate_lang_opt('', 'fr', 'en_fr', |
| 334 | sprintf( _("%s to %s"), |
| 335 | _("English"), |
| 336 | _("French"))) . |
| 337 | translate_lang_opt('', 'de', 'en_ge', |
| 338 | sprintf( _("%s to %s"), |
| 339 | _("English"), |
| 340 | _("German"))) . |
| 341 | translate_lang_opt('', 'it', 'en_it', |
| 342 | sprintf( _("%s to %s"), |
| 343 | _("English"), |
| 344 | _("Italian"))) . |
| 345 | translate_lang_opt('', 'pt', 'en_pt', |
| 346 | sprintf( _("%s to %s"), |
| 347 | _("English"), |
| 348 | _("Portuguese"))) . |
| 349 | translate_lang_opt('es', 'en', 'sp_en', |
| 350 | sprintf( _("%s to %s"), |
| 351 | _("Spanish"), |
| 352 | _("English"))) . |
| 353 | translate_lang_opt('fr', '', 'fr_en', |
| 354 | sprintf( _("%s to %s"), |
| 355 | _("French"), |
| 356 | _("English"))) . |
| 357 | translate_lang_opt('de', '', 'ge_en', |
| 358 | sprintf( _("%s to %s"), |
| 359 | _("German"), |
| 360 | _("English"))) . |
| 361 | translate_lang_opt('it', '', 'it_en', |
| 362 | sprintf( _("%s to %s"), |
| 363 | _("Italian"), |
| 364 | _("English"))) . |
| 365 | translate_lang_opt('pt', '', 'pt_en', |
| 366 | sprintf( _("%s to %s"), |
| 367 | _("Portuguese"), |
| 368 | _("English"))); |
| 369 | echo '</select>'. |
| 370 | "<input type=\"hidden\" name=\"text\" value=\"$message\">". |
| 371 | 'Go.com: <input type="Submit" value="' . _("Translate") . '">'; |
| 372 | |
| 373 | translate_table_end(); |
| 374 | } |
| 375 | |
| 376 | function translate_form_intertran($message) { |
| 377 | translate_new_form('http://www.tranexp.com:2000/InterTran'); |
| 378 | echo '<INPUT TYPE="hidden" NAME="topframe" VALUE="yes">'. |
| 379 | '<INPUT TYPE="hidden" NAME="type" VALUE="text">'. |
| 380 | "<input type=\"hidden\" name=\"text\" value=\"$message\">"; |
| 381 | |
| 382 | $left = '<SELECT name="from">' . |
| 383 | translate_lang_opt('pt_BR', '', 'pob', _("Brazilian Portuguese")). |
| 384 | translate_lang_opt('', '', 'bul', _("Bulgarian") . ' (CP 1251)'). |
| 385 | translate_lang_opt('', '', 'cro', _("Croatian") . ' (CP 1250)'). |
| 386 | translate_lang_opt('cs', '', 'che', _("Czech") . ' (CP 1250)'). |
| 387 | translate_lang_opt('', '', 'dan', _("Danish")). |
| 388 | translate_lang_opt('nl', '', 'dut', _("Dutch")). |
| 389 | translate_lang_opt('en', '!en', 'eng', _("English")). |
| 390 | translate_lang_opt('', '', 'spe', _("European Spanish")). |
| 391 | translate_lang_opt('', '', 'fin', _("Finnish")). |
| 392 | translate_lang_opt('fr', '', 'fre', _("French")). |
| 393 | translate_lang_opt('de', '', 'ger', _("German")). |
| 394 | translate_lang_opt('', '', 'grk', _("Greek")). |
| 395 | translate_lang_opt('', '', 'hun', _("Hungarian") . ' (CP 1250)'). |
| 396 | translate_lang_opt('', '', 'ice', _("Icelandic")). |
| 397 | translate_lang_opt('it', '', 'ita', _("Italian")). |
| 398 | translate_lang_opt('', '', 'jpn', _("Japanese") . ' (Shift JIS)'). |
| 399 | translate_lang_opt('', '', 'spl', _("Latin American Spanish")). |
| 400 | translate_lang_opt('no*', '', 'nor', _("Norwegian")). |
| 401 | translate_lang_opt('pl', '', 'pol', _("Polish") . ' (ISO 8859-2)'). |
| 402 | translate_lang_opt('', '', 'poe', _("Portuguese")). |
| 403 | translate_lang_opt('', '', 'rom', _("Romanian") . ' (CP 1250)'). |
| 404 | translate_lang_opt('ru', '', 'rus', _("Russian") . ' (CP 1251)'). |
| 405 | translate_lang_opt('', '', 'sel', _("Serbian") . ' (CP 1250)'). |
| 406 | translate_lang_opt('', '', 'slo', _("Slovenian") . ' (CP 1250)'). |
| 407 | translate_lang_opt('es', '', 'spa', _("Spanish")). |
| 408 | translate_lang_opt('sv', '', 'swe', _("Swedish")). |
| 409 | translate_lang_opt('', '', 'tur', _("Turkish") . ' (CP 1254)'). |
| 410 | translate_lang_opt('', '', 'wel', _("Welsh")). |
| 411 | '</SELECT>'; |
| 412 | |
| 413 | $right = '<SELECT name="to">'. |
| 414 | translate_lang_opt('', 'pt_BR', 'pob', _("Brazilian Portuguese")). |
| 415 | translate_lang_opt('', '', 'bul', _("Bulgarian") . ' (CP 1251)'). |
| 416 | translate_lang_opt('', '', 'cro', _("Croatian") . ' (CP 1250)'). |
| 417 | translate_lang_opt('', 'cs', 'che', _("Czech") . ' (CP 1250)'). |
| 418 | translate_lang_opt('', '', 'dan', _("Danish")). |
| 419 | translate_lang_opt('', 'nl', 'dut', _("Dutch")). |
| 420 | translate_lang_opt('!en', 'en', 'eng', _("English")). |
| 421 | translate_lang_opt('', '', 'spe', _("European Spanish")). |
| 422 | translate_lang_opt('', '', 'fin', _("Finnish")). |
| 423 | translate_lang_opt('', 'fr', 'fre', _("French")). |
| 424 | translate_lang_opt('', 'de', 'ger', _("German")). |
| 425 | translate_lang_opt('', '', 'grk', _("Greek")). |
| 426 | translate_lang_opt('', '', 'hun', _("Hungarian") . ' (CP 1250)'). |
| 427 | translate_lang_opt('', '', 'ice', _("Icelandic")). |
| 428 | translate_lang_opt('', 'it', 'ita', _("Italian")). |
| 429 | translate_lang_opt('', '', 'jpn', _("Japanese") . ' (Shift JIS)'). |
| 430 | translate_lang_opt('', '', 'spl', _("Latin American Spanish")). |
| 431 | translate_lang_opt('', 'no*', 'nor', _("Norwegian")). |
| 432 | translate_lang_opt('', 'pl', 'pol', _("Polish") . ' (ISO 8859-2)'). |
| 433 | translate_lang_opt('', '', 'poe', _("Portuguese")). |
| 434 | translate_lang_opt('', '', 'rom', _("Romanian") . ' (CP 1250)'). |
| 435 | translate_lang_opt('', 'ru', 'rus', _("Russian") . ' (CP 1251)'). |
| 436 | translate_lang_opt('', '', 'sel', _("Serbian") . ' (CP 1250)'). |
| 437 | translate_lang_opt('', '', 'slo', _("Slovenian") . ' (CP 1250)'). |
| 438 | translate_lang_opt('', 'es', 'spa', _("Spanish")). |
| 439 | translate_lang_opt('', 'sv', 'swe', _("Swedish")). |
| 440 | translate_lang_opt('', '', 'tur', _("Turkish") . ' (CP 1254)'). |
| 441 | translate_lang_opt('', '', 'wel', _("Welsh")). |
| 442 | '</SELECT>'; |
| 443 | printf( _("%s to %s"), $left, $right ); |
| 444 | echo 'InterTran: <input type=submit value="' . _("Translate") . '">'; |
| 445 | |
| 446 | translate_table_end(); |
| 447 | } |
| 448 | |
| 449 | function translate_form_gpltrans($message) { |
| 450 | translate_new_form('http://www.translator.cx/cgi-bin/gplTrans'); |
| 451 | echo '<select name="language">'. |
| 452 | translate_lang_opt('nl', 'nl', 'dutch_dict', _("Dutch")). |
| 453 | translate_lang_opt('fr', 'fr', 'french_dict', _("French")). |
| 454 | translate_lang_opt('de', 'de', 'german_dict', _("German")). |
| 455 | translate_lang_opt('', '', 'indonesian_dict', _("Indonesian")). |
| 456 | translate_lang_opt('it', 'it', 'italian_dict', _("Italian")). |
| 457 | translate_lang_opt('', '', 'latin_dict', _("Latin")). |
| 458 | translate_lang_opt('pt', 'pt', 'portuguese_dict', _("Portuguese")). |
| 459 | translate_lang_opt('es', 'es', 'spanish_dict', _("Spanish")). |
| 460 | '</select>'; |
| 461 | echo '<select name="toenglish">'; |
| 462 | echo '<option value="yes" >'. _("to English") . '</option>'; |
| 463 | echo '<option value="no" selected>' . _("from English") . '</option></select>'; |
| 464 | echo "<input type=hidden name=text value=\"$message\">". |
| 465 | 'GPLTrans: <input type="submit" value="' . _("Translate") . '">'; |
| 466 | |
| 467 | translate_table_end(); |
| 468 | } |
| 469 | |
| 470 | function translate_form_dictionary($message) { |
| 471 | translate_new_form('http://dictionary.reference.com/translate/text.html'); |
| 472 | list($usec, $sec) = explode(" ",microtime()); |
| 473 | $time = $sec . (float)$usec*100000000; |
| 474 | echo "<input type=hidden name=text value=\"$message\">". |
| 475 | "<input type=hidden name=r value=\"$time\">". |
| 476 | '<SELECT NAME="lp">'. |
| 477 | translate_lang_opt('en', 'fr', 'en_fr', |
| 478 | sprintf( _("%s to %s"), |
| 479 | _("English"), |
| 480 | _("French"))) . |
| 481 | translate_lang_opt('', 'ge', 'en_ge', |
| 482 | sprintf( _("%s to %s"), |
| 483 | _("English"), |
| 484 | _("German"))) . |
| 485 | translate_lang_opt('', 'it', 'en_it', |
| 486 | sprintf( _("%s to %s"), |
| 487 | _("English"), |
| 488 | _("Italian"))) . |
| 489 | translate_lang_opt('', 'pt*', 'en_pt', |
| 490 | sprintf( _("%s to %s"), |
| 491 | _("English"), |
| 492 | _("Portuguese"))) . |
| 493 | translate_lang_opt('', 'es', 'en_es', |
| 494 | sprintf( _("%s to %s"), |
| 495 | _("English"), |
| 496 | _("Spanish"))) . |
| 497 | translate_lang_opt('fr', '', 'fr_en', |
| 498 | sprintf( _("%s to %s"), |
| 499 | _("French"), |
| 500 | _("English"))) . |
| 501 | translate_lang_opt('', '', 'fr_ge', |
| 502 | sprintf( _("%s to %s"), |
| 503 | _("French"), |
| 504 | _("German"))) . |
| 505 | translate_lang_opt('', '', 'ge_fr', |
| 506 | sprintf( _("%s to %s"), |
| 507 | _("German"), |
| 508 | _("French"))) . |
| 509 | translate_lang_opt('de', '', 'ge_en', |
| 510 | sprintf( _("%s to %s"), |
| 511 | _("German"), |
| 512 | _("English"))) . |
| 513 | translate_lang_opt('it', '', 'it_en', |
| 514 | sprintf( _("%s to %s"), |
| 515 | _("Italian"), |
| 516 | _("English"))) . |
| 517 | translate_lang_opt('pt*', '', 'pt_en', |
| 518 | sprintf( _("%s to %s"), |
| 519 | _("Portuguese"), |
| 520 | _("English"))) . |
| 521 | translate_lang_opt('es', '', 'es_en', |
| 522 | sprintf( _("%s to %s"), |
| 523 | _("Spanish"), |
| 524 | _("English"))) . |
| 525 | '</SELECT>'. |
| 526 | 'Dictionary.com: <INPUT TYPE="submit" VALUE="'._("Translate").'">'; |
| 527 | |
| 528 | translate_table_end(); |
| 529 | } |
| 530 | ?> |