aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorJuanma Barranquero2007-11-09 16:49:24 +0000
committerJuanma Barranquero2007-11-09 16:49:24 +0000
commit04690896d1569478d8f465eddf384b887dd2b90f (patch)
tree2d15769e812f8ec8b58be8c088b8a7497e3ff3a7
parent7bfab4d2c6907dadb0582db12dd1c1be723a216f (diff)
downloademacs-04690896d1569478d8f465eddf384b887dd2b90f.tar.gz
emacs-04690896d1569478d8f465eddf384b887dd2b90f.zip
*** empty log message ***
-rw-r--r--lisp/international/iso-cvt.el28
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.
87The region between FROM and TO is translated using the table TRANS-TAB. 87The region between FROM and TO is translated using
88the table `iso-spanish-trans-tab'.
88Optional arg BUFFER is ignored (for use in `format-alist')." 89Optional 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.
128The region between FROM and TO is translated using the table TRANS-TAB. 129The region between FROM and TO is translated using
130the table `iso-german-trans-tab'.
129Optional arg BUFFER is ignored (for use in `format-alist')." 131Optional 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.
200The region between FROM and TO is translated using the table TRANS-TAB. 202The region between FROM and TO is translated using
203the table `iso-iso2tex-trans-tab'.
201Optional arg BUFFER is ignored (for use in `format-alist')." 204Optional 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.
392The region between FROM and TO is translated using the table TRANS-TAB. 395The region between FROM and TO is translated using
396the table `iso-tex2iso-trans-tab'.
393Optional arg BUFFER is ignored (for use in `format-alist')." 397Optional 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.
650The region between FROM and TO is translated using the table TRANS-TAB. 654The region between FROM and TO is translated using
655the table `iso-gtex2iso-trans-tab'.
651Optional arg BUFFER is ignored (for use in `format-alist')." 656Optional 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.
658The region between FROM and TO is translated using the table TRANS-TAB. 663The region between FROM and TO is translated using
664the table `iso-iso2gtex-trans-tab'.
659Optional arg BUFFER is ignored (for use in `format-alist')." 665Optional 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.
675The region between FROM and TO is translated using the table TRANS-TAB. 682The region between FROM and TO is translated using
683the table `iso-iso2duden-trans-tab'.
676Optional arg BUFFER is ignored (for use in `format-alist')." 684Optional 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))