diff options
| author | Juanma Barranquero | 2007-11-09 16:49:24 +0000 |
|---|---|---|
| committer | Juanma Barranquero | 2007-11-09 16:49:24 +0000 |
| commit | 04690896d1569478d8f465eddf384b887dd2b90f (patch) | |
| tree | 2d15769e812f8ec8b58be8c088b8a7497e3ff3a7 | |
| parent | 7bfab4d2c6907dadb0582db12dd1c1be723a216f (diff) | |
| download | emacs-04690896d1569478d8f465eddf384b887dd2b90f.tar.gz emacs-04690896d1569478d8f465eddf384b887dd2b90f.zip | |
*** empty log message ***
| -rw-r--r-- | lisp/international/iso-cvt.el | 28 |
1 files changed, 18 insertions, 10 deletions
diff --git a/lisp/international/iso-cvt.el b/lisp/international/iso-cvt.el index d3c2f623e66..d7149b8a9bc 100644 --- a/lisp/international/iso-cvt.el +++ b/lisp/international/iso-cvt.el | |||
| @@ -84,7 +84,8 @@ | |||
| 84 | ;;;###autoload | 84 | ;;;###autoload |
| 85 | (defun iso-spanish (from to &optional buffer) | 85 | (defun iso-spanish (from to &optional buffer) |
| 86 | "Translate net conventions for Spanish to ISO 8859-1. | 86 | "Translate net conventions for Spanish to ISO 8859-1. |
| 87 | The region between FROM and TO is translated using the table TRANS-TAB. | 87 | The region between FROM and TO is translated using |
| 88 | the table `iso-spanish-trans-tab'. | ||
| 88 | Optional arg BUFFER is ignored (for use in `format-alist')." | 89 | Optional arg BUFFER is ignored (for use in `format-alist')." |
| 89 | (interactive "*r") | 90 | (interactive "*r") |
| 90 | (iso-translate-conventions from to iso-spanish-trans-tab)) | 91 | (iso-translate-conventions from to iso-spanish-trans-tab)) |
| @@ -125,7 +126,8 @@ little.") | |||
| 125 | ;;;###autoload | 126 | ;;;###autoload |
| 126 | (defun iso-german (from to &optional buffer) | 127 | (defun iso-german (from to &optional buffer) |
| 127 | "Translate net conventions for German to ISO 8859-1. | 128 | "Translate net conventions for German to ISO 8859-1. |
| 128 | The region between FROM and TO is translated using the table TRANS-TAB. | 129 | The region between FROM and TO is translated using |
| 130 | the table `iso-german-trans-tab'. | ||
| 129 | Optional arg BUFFER is ignored (for use in `format-alist')." | 131 | Optional arg BUFFER is ignored (for use in `format-alist')." |
| 130 | (interactive "*r") | 132 | (interactive "*r") |
| 131 | (iso-translate-conventions from to iso-german-trans-tab)) | 133 | (iso-translate-conventions from to iso-german-trans-tab)) |
| @@ -197,7 +199,8 @@ Optional arg BUFFER is ignored (for use in `format-alist')." | |||
| 197 | ;;;###autoload | 199 | ;;;###autoload |
| 198 | (defun iso-iso2tex (from to &optional buffer) | 200 | (defun iso-iso2tex (from to &optional buffer) |
| 199 | "Translate ISO 8859-1 characters to TeX sequences. | 201 | "Translate ISO 8859-1 characters to TeX sequences. |
| 200 | The region between FROM and TO is translated using the table TRANS-TAB. | 202 | The region between FROM and TO is translated using |
| 203 | the table `iso-iso2tex-trans-tab'. | ||
| 201 | Optional arg BUFFER is ignored (for use in `format-alist')." | 204 | Optional arg BUFFER is ignored (for use in `format-alist')." |
| 202 | (interactive "*r") | 205 | (interactive "*r") |
| 203 | (iso-translate-conventions from to iso-iso2tex-trans-tab)) | 206 | (iso-translate-conventions from to iso-iso2tex-trans-tab)) |
| @@ -389,7 +392,8 @@ contains commonly used sequences.") | |||
| 389 | ;;;###autoload | 392 | ;;;###autoload |
| 390 | (defun iso-tex2iso (from to &optional buffer) | 393 | (defun iso-tex2iso (from to &optional buffer) |
| 391 | "Translate TeX sequences to ISO 8859-1 characters. | 394 | "Translate TeX sequences to ISO 8859-1 characters. |
| 392 | The region between FROM and TO is translated using the table TRANS-TAB. | 395 | The region between FROM and TO is translated using |
| 396 | the table `iso-tex2iso-trans-tab'. | ||
| 393 | Optional arg BUFFER is ignored (for use in `format-alist')." | 397 | Optional arg BUFFER is ignored (for use in `format-alist')." |
| 394 | (interactive "*r") | 398 | (interactive "*r") |
| 395 | (iso-translate-conventions from to iso-tex2iso-trans-tab)) | 399 | (iso-translate-conventions from to iso-tex2iso-trans-tab)) |
| @@ -647,7 +651,8 @@ contains commonly used sequences.") | |||
| 647 | ;;;###autoload | 651 | ;;;###autoload |
| 648 | (defun iso-gtex2iso (from to &optional buffer) | 652 | (defun iso-gtex2iso (from to &optional buffer) |
| 649 | "Translate German TeX sequences to ISO 8859-1 characters. | 653 | "Translate German TeX sequences to ISO 8859-1 characters. |
| 650 | The region between FROM and TO is translated using the table TRANS-TAB. | 654 | The region between FROM and TO is translated using |
| 655 | the table `iso-gtex2iso-trans-tab'. | ||
| 651 | Optional arg BUFFER is ignored (for use in `format-alist')." | 656 | Optional arg BUFFER is ignored (for use in `format-alist')." |
| 652 | (interactive "*r") | 657 | (interactive "*r") |
| 653 | (iso-translate-conventions from to iso-gtex2iso-trans-tab)) | 658 | (iso-translate-conventions from to iso-gtex2iso-trans-tab)) |
| @@ -655,7 +660,8 @@ Optional arg BUFFER is ignored (for use in `format-alist')." | |||
| 655 | ;;;###autoload | 660 | ;;;###autoload |
| 656 | (defun iso-iso2gtex (from to &optional buffer) | 661 | (defun iso-iso2gtex (from to &optional buffer) |
| 657 | "Translate ISO 8859-1 characters to German TeX sequences. | 662 | "Translate ISO 8859-1 characters to German TeX sequences. |
| 658 | The region between FROM and TO is translated using the table TRANS-TAB. | 663 | The region between FROM and TO is translated using |
| 664 | the table `iso-iso2gtex-trans-tab'. | ||
| 659 | Optional arg BUFFER is ignored (for use in `format-alist')." | 665 | Optional arg BUFFER is ignored (for use in `format-alist')." |
| 660 | (interactive "*r") | 666 | (interactive "*r") |
| 661 | (iso-translate-conventions from to iso-iso2gtex-trans-tab)) | 667 | (iso-translate-conventions from to iso-iso2gtex-trans-tab)) |
| @@ -667,12 +673,14 @@ Optional arg BUFFER is ignored (for use in `format-alist')." | |||
| 667 | ("Ö" "Oe") | 673 | ("Ö" "Oe") |
| 668 | ("ü" "ue") | 674 | ("ü" "ue") |
| 669 | ("Ü" "Ue") | 675 | ("Ü" "Ue") |
| 670 | ("ß" "ss"))) | 676 | ("ß" "ss")) |
| 677 | "Translation table for translating ISO 8859-1 characters to Duden sequences.") | ||
| 671 | 678 | ||
| 672 | ;;;###autoload | 679 | ;;;###autoload |
| 673 | (defun iso-iso2duden (from to &optional buffer) | 680 | (defun iso-iso2duden (from to &optional buffer) |
| 674 | "Translate ISO 8859-1 characters to German TeX sequences. | 681 | "Translate ISO 8859-1 characters to Duden sequences. |
| 675 | The region between FROM and TO is translated using the table TRANS-TAB. | 682 | The region between FROM and TO is translated using |
| 683 | the table `iso-iso2duden-trans-tab'. | ||
| 676 | Optional arg BUFFER is ignored (for use in `format-alist')." | 684 | Optional arg BUFFER is ignored (for use in `format-alist')." |
| 677 | (interactive "*r") | 685 | (interactive "*r") |
| 678 | (iso-translate-conventions from to iso-iso2duden-trans-tab)) | 686 | (iso-translate-conventions from to iso-iso2duden-trans-tab)) |
| @@ -845,7 +853,7 @@ Optional arg BUFFER is ignored (for use in `format-alist')." | |||
| 845 | (translate-to-menu-map (make-sparse-keymap "Translate to...")) | 853 | (translate-to-menu-map (make-sparse-keymap "Translate to...")) |
| 846 | (translate-from-menu-map (make-sparse-keymap "Translate from...")) | 854 | (translate-from-menu-map (make-sparse-keymap "Translate from...")) |
| 847 | (menu menu-bar-file-menu)) | 855 | (menu menu-bar-file-menu)) |
| 848 | 856 | ||
| 849 | (define-key menu [load-as-separator] '("--")) | 857 | (define-key menu [load-as-separator] '("--")) |
| 850 | 858 | ||
| 851 | (define-key menu [load-as] '("Load As..." . iso-cvt-load-as)) | 859 | (define-key menu [load-as] '("Load As..." . iso-cvt-load-as)) |