diff options
47 files changed, 1084 insertions, 1073 deletions
diff --git a/admin/make-tarball.txt b/admin/make-tarball.txt index 3825ac4927..144c34da15 100644 --- a/admin/make-tarball.txt +++ b/admin/make-tarball.txt @@ -1,5 +1,5 @@ -Instructions to create pretest or release tarballs. --- originally written by Gerd Moellmann, amended by Francesco Potort� +Instructions to create pretest or release tarballs. -*- coding: utf-8 -*- +-- originally written by Gerd Moellmann, amended by Francesco Potortì with the initial help of Eli Zaretskii diff --git a/admin/notes/unicode b/admin/notes/unicode index 21704c78a0..a9e4117e2d 100644 --- a/admin/notes/unicode +++ b/admin/notes/unicode @@ -1,4 +1,4 @@ - -*-mode: text; coding: latin-1;-*- + -*-mode: text; coding: utf-8;-*- Copyright (C) 2002-2013 Free Software Foundation, Inc. See the end of the file for license conditions. @@ -12,9 +12,9 @@ regard to completeness. * SINGLE_BYTE_CHAR_P returns true for Latin-1 characters, which has undesirable effects. E.g.: - (multibyte-string-p (let ((s "x")) (aset s 0 ?�) s)) => nil - (multibyte-string-p (concat [?�])) => nil - (text-char-description ?�) => "M-#" + (multibyte-string-p (let ((s "x")) (aset s 0 ?£) s)) => nil + (multibyte-string-p (concat [?£])) => nil + (text-char-description ?£) => "M-#" These examples are all fixed by the change of 2002-10-14, but there still exist questionable SINGLE_BYTE_CHAR_P in the @@ -77,7 +77,7 @@ regard to completeness. spelling and calendar, but that's not a Unicode issue.) * Handle Unicode combining characters usefully, e.g. diacritics, and - handle more scripts specifically (� la Devanagari). There are + handle more scripts specifically (à la Devanagari). There are issues with canonicalization. * We need tabular input methods, e.g. for maths symbols. (Not diff --git a/etc/images/mail/README b/etc/images/mail/README index 962206e6ae..279e9cc572 100644 --- a/etc/images/mail/README +++ b/etc/images/mail/README @@ -1,4 +1,4 @@ -COPYRIGHT AND LICENSE INFORMATION FOR IMAGE FILES +COPYRIGHT AND LICENSE INFORMATION FOR IMAGE FILES -*- coding: utf-8 -*- The following icons are from GNOME 2.x. They are not part of Emacs, but are distributed and used by Emacs. They are licensed under the @@ -25,7 +25,7 @@ save.xpm combines stock_mail, io/stock_save and send.xpm stock_mail-send spam.xpm stock_spam -(preview and save were contributed by Adam Sj�gren <[email protected]>) +(preview and save were contributed by Adam Sjøgren <[email protected]>) repack is a slightly modified version of package-x-generic. reply-from is a slightly modified version of reply. diff --git a/etc/images/smilies/grayscale/README b/etc/images/smilies/grayscale/README index 43f91b7af3..031b096ee2 100644 --- a/etc/images/smilies/grayscale/README +++ b/etc/images/smilies/grayscale/README @@ -1,6 +1,7 @@ +-*- coding: utf-8 -*- Files: blink.xpm braindamaged.xpm cry.xpm dead.xpm evil.xpm forced.xpm frown.xpm grin.xpm indifferent.xpm reverse-smile.xpm sad.xpm - smile.xpm wry.xpm -Author: Adam Sj�gren + smile.xpm wry.xpm +Author: Adam Sjøgren Copyright (C) 2007-2013 Free Software Foundation, Inc. License: GNU General Public License version 3 or later (see COPYING) diff --git a/etc/images/smilies/medium/README b/etc/images/smilies/medium/README index 43f91b7af3..031b096ee2 100644 --- a/etc/images/smilies/medium/README +++ b/etc/images/smilies/medium/README @@ -1,6 +1,7 @@ +-*- coding: utf-8 -*- Files: blink.xpm braindamaged.xpm cry.xpm dead.xpm evil.xpm forced.xpm frown.xpm grin.xpm indifferent.xpm reverse-smile.xpm sad.xpm - smile.xpm wry.xpm -Author: Adam Sj�gren + smile.xpm wry.xpm +Author: Adam Sjøgren Copyright (C) 2007-2013 Free Software Foundation, Inc. License: GNU General Public License version 3 or later (see COPYING) diff --git a/leim/quail/croatian.el b/leim/quail/croatian.el index 2b5755f355..412f68fe70 100644 --- a/leim/quail/croatian.el +++ b/leim/quail/croatian.el @@ -1,8 +1,8 @@ -;;; quail/croatian.el -- Quail package for inputting Croatian -*-coding: iso-8859-2;-*- +;;; quail/croatian.el -- Quail package for inputting Croatian -*-coding: utf-8;-*- ;; Copyright (C) 2003-2013 Free Software Foundation, Inc. -;; Author: Hrvoje Nik�i� <[email protected]> +;; Author: Hrvoje Nikšić <[email protected]> ;; Keywords: i18n ;; This file is part of GNU Emacs. @@ -44,16 +44,16 @@ ("_" ??) ("=" ?+) ("+" ?*) - ("[" ?�) - ("{" ?�) - ("]" ?�) - ("}" ?�) - (";" ?�) - (":" ?�) - ("'" ?�) - ("\"" ?�) - ("\\" ?�) - ("|" ?�) + ("[" ?š) + ("{" ?Š) + ("]" ?đ) + ("}" ?Đ) + (";" ?č) + (":" ?Č) + ("'" ?ć) + ("\"" ?Ć) + ("\\" ?ž) + ("|" ?Ž) ("<" ?\;) (">" ?:) ("/" ?-) @@ -79,16 +79,16 @@ ("_" ??) ("=" ?+) ("+" ?*) - ("[" ?�) - ("{" ?�) - ("]" ?�) - ("}" ?�) - (";" ?�) - (":" ?�) - ("'" ?�) - ("\"" ?�) - ("\\" ?�) - ("|" ?�) + ("[" ?š) + ("{" ?Š) + ("]" ?đ) + ("}" ?Đ) + (";" ?č) + (":" ?Č) + ("'" ?ć) + ("\"" ?Ć) + ("\\" ?ž) + ("|" ?Ž) ("<" ?\;) (">" ?:) ("/" ?-) @@ -98,102 +98,102 @@ "croatian-prefix" "Croatian" "HR" nil "Croatian input method, postfix. -\"c -> � -'c -> � -\"s -> � -\"z -> � -/d -> �" +\"c -> č +'c -> ć +\"s -> š +\"z -> ž +/d -> đ" nil t nil nil nil nil nil nil nil nil t) (quail-define-rules - ("\"c" ?�) - ("\"C" ?�) - ("'c" ?�) - ("'C" ?�) - ("\"s" ?�) - ("\"S" ?�) - ("\"z" ?�) - ("\"Z" ?�) - ("/d" ?�) - ("/D" ?�)) + ("\"c" ?č) + ("\"C" ?Č) + ("'c" ?ć) + ("'C" ?Ć) + ("\"s" ?š) + ("\"S" ?Š) + ("\"z" ?ž) + ("\"Z" ?Ž) + ("/d" ?đ) + ("/D" ?Đ)) (quail-define-package "croatian-postfix" "Croatian" "HR" nil "Croatian input method, postfix. -c\" -> � -c' -> � -s\" -> � -z\" -> � -d/ -> �" +c\" -> č +c' -> ć +s\" -> š +z\" -> ž +d/ -> đ" nil t nil nil nil nil nil nil nil nil t) (quail-define-rules - ("c\"" ?�) - ("C\"" ?�) - ("c'" ?�) - ("C'" ?�) - ("s\"" ?�) - ("S\"" ?�) - ("z\"" ?�) - ("Z\"" ?�) - ("d/" ?�) - ("D/" ?�)) + ("c\"" ?č) + ("C\"" ?Č) + ("c'" ?ć) + ("C'" ?Ć) + ("s\"" ?š) + ("S\"" ?Š) + ("z\"" ?ž) + ("Z\"" ?Ž) + ("d/" ?đ) + ("D/" ?Đ)) (quail-define-package "croatian-xy" "Croatian" "HR" nil "An alternative Croatian input method. -cx -> � -cy -> � -sx -> � -zx -> � -dy -> �" +cx -> č +cy -> ć +sx -> š +zx -> ž +dy -> đ" nil t nil nil nil nil nil nil nil nil t) (quail-define-rules - ("cx" ?�) - ("CX" ?�) - ("Cx" ?�) - ("cy" ?�) - ("CY" ?�) - ("Cy" ?�) - ("sx" ?�) - ("SX" ?�) - ("Sx" ?�) - ("zx" ?�) - ("ZX" ?�) - ("Zx" ?�) - ("dy" ?�) - ("DY" ?�) - ("Dy" ?�)) + ("cx" ?č) + ("CX" ?Č) + ("Cx" ?Č) + ("cy" ?ć) + ("CY" ?Ć) + ("Cy" ?Ć) + ("sx" ?š) + ("SX" ?Š) + ("Sx" ?Š) + ("zx" ?ž) + ("ZX" ?Ž) + ("Zx" ?Ž) + ("dy" ?đ) + ("DY" ?Đ) + ("Dy" ?Đ)) (quail-define-package "croatian-cc" "Croatian" "HR" nil "Another alternative Croatian input method. -cc -> � -ch -> � -ss -> � -zz -> � -dd -> �" +cc -> č +ch -> ć +ss -> š +zz -> ž +dd -> đ" nil t nil nil nil nil nil nil nil nil t) (quail-define-rules - ("cc" ?�) - ("CC" ?�) - ("Cc" ?�) - ("ch" ?�) - ("CH" ?�) - ("Ch" ?�) - ("ss" ?�) - ("SS" ?�) - ("Ss" ?�) - ("zz" ?�) - ("ZZ" ?�) - ("Zz" ?�) - ("dd" ?�) - ("DD" ?�) - ("Dd" ?�)) + ("cc" ?č) + ("CC" ?Č) + ("Cc" ?Č) + ("ch" ?ć) + ("CH" ?Ć) + ("Ch" ?Ć) + ("ss" ?š) + ("SS" ?Š) + ("Ss" ?Š) + ("zz" ?ž) + ("ZZ" ?Ž) + ("Zz" ?Ž) + ("dd" ?đ) + ("DD" ?Đ) + ("Dd" ?Đ)) ;;; croatian.el ends here diff --git a/lib-src/etags.c b/lib-src/etags.c index ec96f45fc9..c1e12e95da 100644 --- a/lib-src/etags.c +++ b/lib-src/etags.c @@ -1,4 +1,4 @@ -/* Tags file maker to go with GNU Emacs -*- coding: latin-1 -*- +/* Tags file maker to go with GNU Emacs -*- coding: utf-8 -*- Copyright (C) 1984 The Regents of the University of California @@ -64,12 +64,12 @@ University of California, as described above. */ * 1985 Emacs TAGS format by Richard Stallman. * 1989 Sam Kendall added C++. * 1992 Joseph B. Wells improved C and C++ parsing. - * 1993 Francesco Potort� reorganized C and C++. + * 1993 Francesco Potortì reorganized C and C++. * 1994 Line-by-line regexp tags by Tom Tromey. - * 2001 Nested classes by Francesco Potort� (concept by Mykola Dzyuba). - * 2002 #line directives by Francesco Potort�. + * 2001 Nested classes by Francesco Potortì (concept by Mykola Dzyuba). + * 2002 #line directives by Francesco Potortì. * - * Francesco Potort� <[email protected]> has maintained and improved it since 1993. + * Francesco Potortì <[email protected]> has maintained and improved it since 1993. */ /* @@ -4275,7 +4275,7 @@ Asm_labels (FILE *inf) * Perl variable names: /^(my|local).../ * Original code by Bart Robinson <[email protected]> (1995) * Additions by Michael Ernst <[email protected]> (1997) - * Ideas by Kai Gro�johann <[email protected]> (2001) + * Ideas by Kai Großjohann <[email protected]> (2001) */ static void Perl_functions (FILE *inf) @@ -5105,7 +5105,7 @@ Texinfo_nodes (FILE *inf) * Contents of <title>, <h1>, <h2>, <h3> are tags. * Contents of <a name=xxx> are tags with name xxx. * - * Francesco Potort�, 2002. + * Francesco Potortì, 2002. */ static void HTML_labels (FILE *inf) diff --git a/lisp/battery.el b/lisp/battery.el index 98ba7d1b63..d4e4d8b3a3 100644 --- a/lisp/battery.el +++ b/lisp/battery.el @@ -1,4 +1,4 @@ -;;; battery.el --- display battery status information -*- coding: iso-8859-1 -*- +;;; battery.el --- display battery status information -*- coding: utf-8 -*- ;; Copyright (C) 1997-1998, 2000-2013 Free Software Foundation, Inc. @@ -116,7 +116,7 @@ string are substituted as defined by the current value of the variable (defcustom battery-mode-line-format (cond ((eq battery-status-function 'battery-linux-proc-acpi) - "[%b%p%%,%d�C]") + "[%b%p%%,%d°C]") (battery-status-function "[%b%p%%]")) "Control string formatting the string to display in the mode line. diff --git a/lisp/filesets.el b/lisp/filesets.el index 62ab7423f6..978512bd3a 100644 --- a/lisp/filesets.el +++ b/lisp/filesets.el @@ -1,4 +1,4 @@ -;;; filesets.el --- handle group of files +;;; filesets.el --- handle group of files -*- coding: utf-8 -*- ;; Copyright (C) 2002-2013 Free Software Foundation, Inc. @@ -805,8 +805,8 @@ In order to view pdf or rtf files in an Emacs buffer, you could use these: (:match-number 2) (:get-file-name (lambda (master file) (filesets-which-file master file load-path)))))) - ("^\\([A-Z���][a-z����]+\\([A-Z���][a-z����]+\\)+\\)$" t - (((:pattern "\\<\\([A-Z���][a-z����]+\\([A-Z���][a-z����]+\\)+\\)\\>") + ("^\\([A-ZÄÖÜ][a-zäöüß]+\\([A-ZÄÖÜ][a-zäöüß]+\\)+\\)$" t + (((:pattern "\\<\\([A-ZÄÖÜ][a-zäöüß]+\\([A-ZÄÖÜ][a-zäöüß]+\\)+\\)\\>") (:scan-depth 5) (:stubp (lambda (a b) (not (filesets-files-in-same-directory-p a b)))) (:case-sensitive t) diff --git a/lisp/gnus/ChangeLog.1 b/lisp/gnus/ChangeLog.1 index 34533f31bf..9043a23361 100644 --- a/lisp/gnus/ChangeLog.1 +++ b/lisp/gnus/ChangeLog.1 @@ -452,7 +452,7 @@ * gnus-sum.el (gnus-remove-thread): Didn't work with sparse threads. -1998-08-14 Fran�ois Pinard <[email protected]> +1998-08-14 François Pinard <[email protected]> * nndoc.el (nndoc-generate-mime-parts-head): Use original Subject, Message-ID, and References in fully blown articles. @@ -619,7 +619,7 @@ * gnus.el: Gnus v5.6.31 is released. -1998-08-09 Fran�ois Pinard <[email protected]> +1998-08-09 François Pinard <[email protected]> * nndoc.el: Split MIME multipart messages, maybe recursively. (nndoc-mime-parts-type-p, nndoc-transform-mime-parts, @@ -760,7 +760,7 @@ * gnus-group.el (gnus-group-read-ephemeral-group): Make the server unique. -1998-07-28 Fran�ois Pinard <[email protected]> +1998-07-28 François Pinard <[email protected]> * gnus-uu.el (gnus-uu-reginize-string): Consider the number of parts as part of the fixed subject, instead of a wild quantity. @@ -943,7 +943,7 @@ * nntp.el (nntp-server-opened-hook): Doc change. -1998-07-10 Fran�ois Pinard <[email protected]> +1998-07-10 François Pinard <[email protected]> * gnus-sum.el (gnus-summary-respool-trace): New command and keystroke. @@ -1003,7 +1003,7 @@ * nntp.el (nntp-record-command): Give more precise time info. (nntp-next-result-arrived-p): Look for the end of error lines. -1998-07-01 Fran�ois Pinard <[email protected]> +1998-07-01 François Pinard <[email protected]> * gnus-util.el (gnus-delete-if): Would do the opposite. @@ -2016,7 +2016,7 @@ * gnus-picon.el (gnus-picons-display-x-face): `buf' -- unbound var. -1998-02-28 Fran�ois Pinard <[email protected]> +1998-02-28 François Pinard <[email protected]> * gnus: configure'd. @@ -2370,7 +2370,7 @@ * gnus-sum.el (gnus-summary-exit): Call purging function. -1998-02-13 Fran�ois Pinard <[email protected]> +1998-02-13 François Pinard <[email protected]> * nnmail.el (nnmail-get-new-mail): Don't clear split-history. (nnmail-purge-split-history): New function. @@ -3724,3 +3724,7 @@ You should have received a copy of the GNU General Public License along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. + +;; Local Variables: +;; coding: utf-8 +;; End: diff --git a/lisp/gnus/deuglify.el b/lisp/gnus/deuglify.el index 8ef89a9e56..36e91980ba 100644 --- a/lisp/gnus/deuglify.el +++ b/lisp/gnus/deuglify.el @@ -270,7 +270,7 @@ :group 'gnus-outlook-deuglify) (defcustom gnus-outlook-deuglify-attrib-verb-regexp - "wrote\\|writes\\|says\\|schrieb\\|schreibt\\|meinte\\|skrev\\|a �crit\\|schreef\\|escribi�" + "wrote\\|writes\\|says\\|schrieb\\|schreibt\\|meinte\\|skrev\\|a écrit\\|schreef\\|escribió" "Regular expression matching the verb used in an attribution line." :version "22.1" :type 'string @@ -472,7 +472,7 @@ NODISPLAY is non-nil, don't redisplay the article buffer." (provide 'deuglify) ;; Local Variables: -;; coding: iso-8859-1 +;; coding: utf-8 ;; End: ;;; deuglify.el ends here diff --git a/lisp/gnus/gnus-delay.el b/lisp/gnus/gnus-delay.el index 5c14ffcfbd..921d24109c 100644 --- a/lisp/gnus/gnus-delay.el +++ b/lisp/gnus/gnus-delay.el @@ -2,7 +2,7 @@ ;; Copyright (C) 2001-2013 Free Software Foundation, Inc. -;; Author: Kai Gro�johann <[email protected]> +;; Author: Kai Großjohann <[email protected]> ;; Keywords: mail, news, extensions ;; This file is part of GNU Emacs. @@ -186,7 +186,7 @@ Checking delayed messages is skipped if optional arg NO-CHECK is non-nil." (provide 'gnus-delay) ;; Local Variables: -;; coding: iso-8859-1 +;; coding: utf-8 ;; End: ;;; gnus-delay.el ends here diff --git a/lisp/gnus/gnus-spec.el b/lisp/gnus/gnus-spec.el index 446e826020..2606b8860a 100644 --- a/lisp/gnus/gnus-spec.el +++ b/lisp/gnus/gnus-spec.el @@ -418,7 +418,7 @@ characters when given a pad value." ;; them will have the balloon-help text property. (let ((case-fold-search nil)) (if (string-match - "\\`\\(.*\\)%[0-9]?[{(�]\\(.*\\)%[0-9]?[�})]\\(.*\n?\\)\\'\\|%[-0-9]*=\\|%[-0-9]*\\*" + "\\`\\(.*\\)%[0-9]?[{(«]\\(.*\\)%[0-9]?[»})]\\(.*\n?\\)\\'\\|%[-0-9]*=\\|%[-0-9]*\\*" format) (gnus-parse-complex-format format spec-alist) ;; This is a simple format. @@ -435,13 +435,13 @@ characters when given a pad value." (goto-char (point-min)) (insert "(\"") ;; Convert all font specs into font spec lists. - (while (re-search-forward "%\\([0-9]+\\)?\\([��{}()]\\)" nil t) + (while (re-search-forward "%\\([0-9]+\\)?\\([«»{}()]\\)" nil t) (let ((number (if (match-beginning 1) (match-string 1) "0")) (delim (aref (match-string 2) 0))) (if (or (= delim ?\() (= delim ?\{) - (= delim ?\�)) + (= delim ?\«)) (replace-match (concat "\"(" (cond ((= delim ?\() "mouse") ((= delim ?\{) "face") @@ -733,7 +733,7 @@ If PROPS, insert the result." (provide 'gnus-spec) ;; Local Variables: -;; coding: iso-8859-1 +;; coding: utf-8 ;; End: ;;; gnus-spec.el ends here diff --git a/lisp/gnus/gnus-sum.el b/lisp/gnus/gnus-sum.el index 183eabca6d..93bc35af3b 100644 --- a/lisp/gnus/gnus-sum.el +++ b/lisp/gnus/gnus-sum.el @@ -451,7 +451,7 @@ current article is unread." :group 'gnus-summary-maneuvering :type 'boolean) -(defcustom gnus-auto-center-summary +(defcustom gnus-auto-center-summary (max (or (bound-and-true-p scroll-margin) 0) 2) "*If non-nil, always center the current summary buffer. In particular, if `vertical' do only vertical recentering. If non-nil @@ -9788,7 +9788,7 @@ installed for this command to work." (when (message-goto-body) (gnus-narrow-to-body)) (goto-char (point-min)) - (while (search-forward "�" (point-max) t) + (while (search-forward "·" (point-max) t) (replace-match ".")) (unmorse-region (point-min) (point-max)) (widen) @@ -12978,7 +12978,7 @@ BOOKMARK is a bookmark name or a bookmark record." (run-hooks 'gnus-sum-load-hook) ;; Local Variables: -;; coding: iso-8859-1 +;; coding: utf-8 ;; End: ;;; gnus-sum.el ends here diff --git a/lisp/gnus/html2text.el b/lisp/gnus/html2text.el index 4e05f1abb4..68e75196c8 100644 --- a/lisp/gnus/html2text.el +++ b/lisp/gnus/html2text.el @@ -1,4 +1,4 @@ -;;; html2text.el --- a simple html to plain text converter +;;; html2text.el --- a simple html to plain text converter -*- coding: utf-8 -*- ;; Copyright (C) 2002-2013 Free Software Foundation, Inc. @@ -65,14 +65,14 @@ ("–" . "-") ("‰" . "%%") ("±" . "+-") - ("£" . "�") + ("£" . "£") (""" . "\"") ("»" . ">>") ("&rdquo" . "\"") ("®" . "(R)") ("›" . ")") ("’" . "'") - ("§" . "�") + ("§" . "§") ("¹" . "^1") ("²" . "^2") ("³" . "^3") diff --git a/lisp/gnus/message.el b/lisp/gnus/message.el index 808e1edd6c..a6638097b4 100644 --- a/lisp/gnus/message.el +++ b/lisp/gnus/message.el @@ -1743,7 +1743,7 @@ no, only reply back to the author." (file-error)) (mm-coding-system-p 'utf-8) (executable-find idna-program) - (string= (idna-to-ascii "r�ksm�rg�s") + (string= (idna-to-ascii "räksmörgås") "xn--rksmrgs-5wao1o") t) "Whether to encode non-ASCII in domain names into ASCII according to IDNA. @@ -8421,7 +8421,7 @@ Used in `message-simplify-recipients'." (run-hooks 'message-load-hook) ;; Local Variables: -;; coding: iso-8859-1 +;; coding: utf-8 ;; End: ;;; message.el ends here diff --git a/lisp/gnus/mm-decode.el b/lisp/gnus/mm-decode.el index 812ee7396d..04f325633b 100644 --- a/lisp/gnus/mm-decode.el +++ b/lisp/gnus/mm-decode.el @@ -1803,7 +1803,7 @@ If RECURSIVE, search recursively." (replace-match (char-to-string char)))) ;; Remove "soft hyphens". (goto-char (point-min)) - (while (search-forward "�" nil t) + (while (search-forward "" nil t) (replace-match "" t t)) (libxml-parse-html-region (point-min) (point-max)))) (unless (bobp) @@ -1825,7 +1825,7 @@ If RECURSIVE, search recursively." (provide 'mm-decode) ;; Local Variables: -;; coding: iso-8859-1 +;; coding: utf-8 ;; End: ;;; mm-decode.el ends here diff --git a/lisp/gnus/mml1991.el b/lisp/gnus/mml1991.el index 88dee4ad88..5af7639019 100644 --- a/lisp/gnus/mml1991.el +++ b/lisp/gnus/mml1991.el @@ -2,7 +2,7 @@ ;; Copyright (C) 1998-2013 Free Software Foundation, Inc. -;; Author: Sascha L�decke <[email protected]>, +;; Author: Sascha Lüdecke <[email protected]>, ;; Simon Josefsson <[email protected]> (Mailcrypt interface, Gnus glue) ;; Keywords: PGP @@ -480,7 +480,7 @@ If no one is selected, default secret key is used. " (provide 'mml1991) ;; Local Variables: -;; coding: iso-8859-1 +;; coding: utf-8 ;; End: ;;; mml1991.el ends here diff --git a/lisp/gnus/nnir.el b/lisp/gnus/nnir.el index 0e2e76f25b..cf5a813c5a 100644 --- a/lisp/gnus/nnir.el +++ b/lisp/gnus/nnir.el @@ -1,8 +1,8 @@ -;;; nnir.el --- search mail with various search engines -*- coding: iso-8859-1 -*- +;;; nnir.el --- search mail with various search engines -*- coding: utf-8 -*- ;; Copyright (C) 1998-2013 Free Software Foundation, Inc. -;; Author: Kai Gro�johann <[email protected]> +;; Author: Kai Großjohann <[email protected]> ;; Swish-e and Swish++ backends by: ;; Christoph Conrad <[email protected]>. ;; IMAP backend by: Simon Josefsson <[email protected]>. diff --git a/lisp/gnus/shr.el b/lisp/gnus/shr.el index 9bf14ee147..5df5297ba8 100644 --- a/lisp/gnus/shr.el +++ b/lisp/gnus/shr.el @@ -347,11 +347,11 @@ size, and full-buffer size." ((eq shr-folding-mode 'none) (insert text)) (t - (when (and (string-match "\\`[ \t\n�]" text) + (when (and (string-match "\\`[ \t\n ]" text) (not (bolp)) (not (eq (char-after (1- (point))) ? ))) (insert " ")) - (dolist (elem (split-string text "[ \f\t\n\r\v�]+" t)) + (dolist (elem (split-string text "[ \f\t\n\r\v ]+" t)) (when (and (bolp) (> shr-indentation 0)) (shr-indent)) @@ -391,7 +391,7 @@ size, and full-buffer size." (shr-indent)) (end-of-line)) (insert " "))) - (unless (string-match "[ \t\r\n�]\\'" text) + (unless (string-match "[ \t\r\n ]\\'" text) (delete-char -1))))) (defun shr-find-fill-point () @@ -1476,7 +1476,7 @@ ones, in case fg and bg are nil." (provide 'shr) ;; Local Variables: -;; coding: iso-8859-1 +;; coding: utf-8 ;; End: ;;; shr.el ends here diff --git a/lisp/gnus/utf7.el b/lisp/gnus/utf7.el index 69b189b6b5..b55b77a383 100644 --- a/lisp/gnus/utf7.el +++ b/lisp/gnus/utf7.el @@ -1,4 +1,4 @@ -;;; utf7.el --- UTF-7 encoding/decoding for Emacs -*-coding: iso-8859-1;-*- +;;; utf7.el --- UTF-7 encoding/decoding for Emacs -*-coding: utf-8;-*- ;; Copyright (C) 1999-2013 Free Software Foundation, Inc. @@ -52,10 +52,10 @@ ;; necessary coding system. The code below doesn't seem to DTRT ;; generally. E.g.: ;; -;; (utf7-encode "a+�") +;; (utf7-encode "a+£") ;; => "a+ACsAow-" ;; -;; $ echo "a+�"|iconv -f iso-8859-1 -t utf-7 +;; $ echo "a+£"|iconv -f utf-8 -t utf-7 ;; a+-+AKM ;; ;; -- fx diff --git a/lisp/international/iso-cvt.el b/lisp/international/iso-cvt.el index 34488db5f1..407ff3ae7a 100644 --- a/lisp/international/iso-cvt.el +++ b/lisp/international/iso-cvt.el @@ -1,4 +1,4 @@ -;;; iso-cvt.el --- translate ISO 8859-1 from/to various encodings -*- coding: iso-latin-1 -*- +;;; iso-cvt.el --- translate ISO 8859-1 from/to various encodings -*- coding: utf-8 -*- ;; This file was formerly called gm-lingo.el. ;; Copyright (C) 1993-1998, 2000-2013 Free Software Foundation, Inc. @@ -45,19 +45,19 @@ (defvar iso-spanish-trans-tab '( - ("~n" "�") - ("\([a-zA-Z]\)#" "\\1�") - ("~N" "�") - ("\\([-a-zA-Z\"`]\\)\"u" "\\1�") - ("\\([-a-zA-Z\"`]\\)\"U" "\\1�") - ("\\([-a-zA-Z]\\)'o" "\\1�") - ("\\([-a-zA-Z]\\)'O" "\\�") - ("\\([-a-zA-Z]\\)'e" "\\1�") - ("\\([-a-zA-Z]\\)'E" "\\1�") - ("\\([-a-zA-Z]\\)'a" "\\1�") + ("~n" "ñ") + ("\([a-zA-Z]\)#" "\\1ñ") + ("~N" "Ñ") + ("\\([-a-zA-Z\"`]\\)\"u" "\\1ü") + ("\\([-a-zA-Z\"`]\\)\"U" "\\1Ü") + ("\\([-a-zA-Z]\\)'o" "\\1ó") + ("\\([-a-zA-Z]\\)'O" "\\Ó") + ("\\([-a-zA-Z]\\)'e" "\\1é") + ("\\([-a-zA-Z]\\)'E" "\\1É") + ("\\([-a-zA-Z]\\)'a" "\\1á") ("\\([-a-zA-Z]\\)'A" "\\1A") - ("\\([-a-zA-Z]\\)'i" "\\1�") - ("\\([-a-zA-Z]\\)'I" "\\1�") + ("\\([-a-zA-Z]\\)'i" "\\1í") + ("\\([-a-zA-Z]\\)'I" "\\1Í") ) "Spanish translation table.") @@ -89,14 +89,14 @@ Optional arg BUFFER is ignored (for use in `format-alist')." (defvar iso-aggressive-german-trans-tab '( - ("\"a" "�") - ("\"A" "�") - ("\"o" "�") - ("\"O" "�") - ("\"u" "�") - ("\"U" "�") - ("\"s" "�") - ("\\\\3" "�") + ("\"a" "ä") + ("\"A" "Ä") + ("\"o" "ö") + ("\"O" "Ö") + ("\"u" "ü") + ("\"U" "Ü") + ("\"s" "ß") + ("\\\\3" "ß") ) "German translation table. This table uses an aggressive translation approach @@ -104,14 +104,14 @@ and may erroneously translate too much.") (defvar iso-conservative-german-trans-tab '( - ("\\([-a-zA-Z\"`]\\)\"a" "\\1�") - ("\\([-a-zA-Z\"`]\\)\"A" "\\1�") - ("\\([-a-zA-Z\"`]\\)\"o" "\\1�") - ("\\([-a-zA-Z\"`]\\)\"O" "\\1�") - ("\\([-a-zA-Z\"`]\\)\"u" "\\1�") - ("\\([-a-zA-Z\"`]\\)\"U" "\\1�") - ("\\([-a-zA-Z\"`]\\)\"s" "\\1�") - ("\\([-a-zA-Z\"`]\\)\\\\3" "\\1�") + ("\\([-a-zA-Z\"`]\\)\"a" "\\1ä") + ("\\([-a-zA-Z\"`]\\)\"A" "\\1Ä") + ("\\([-a-zA-Z\"`]\\)\"o" "\\1ö") + ("\\([-a-zA-Z\"`]\\)\"O" "\\1Ö") + ("\\([-a-zA-Z\"`]\\)\"u" "\\1ü") + ("\\([-a-zA-Z\"`]\\)\"U" "\\1Ü") + ("\\([-a-zA-Z\"`]\\)\"s" "\\1ß") + ("\\([-a-zA-Z\"`]\\)\\\\3" "\\1ß") ) "German translation table. This table uses a conservative translation approach @@ -131,65 +131,65 @@ Optional arg BUFFER is ignored (for use in `format-alist')." (defvar iso-iso2tex-trans-tab '( - ("�" "{\\\\\"a}") - ("�" "{\\\\`a}") - ("�" "{\\\\'a}") - ("�" "{\\\\~a}") - ("�" "{\\\\^a}") - ("�" "{\\\\\"e}") - ("�" "{\\\\`e}") - ("�" "{\\\\'e}") - ("�" "{\\\\^e}") - ("�" "{\\\\\"\\\\i}") - ("�" "{\\\\`\\\\i}") - ("�" "{\\\\'\\\\i}") - ("�" "{\\\\^\\\\i}") - ("�" "{\\\\\"o}") - ("�" "{\\\\`o}") - ("�" "{\\\\'o}") - ("�" "{\\\\~o}") - ("�" "{\\\\^o}") - ("�" "{\\\\\"u}") - ("�" "{\\\\`u}") - ("�" "{\\\\'u}") - ("�" "{\\\\^u}") - ("�" "{\\\\\"A}") - ("�" "{\\\\`A}") - ("�" "{\\\\'A}") - ("�" "{\\\\~A}") - ("�" "{\\\\^A}") - ("�" "{\\\\\"E}") - ("�" "{\\\\`E}") - ("�" "{\\\\'E}") - ("�" "{\\\\^E}") - ("�" "{\\\\\"I}") - ("�" "{\\\\`I}") - ("�" "{\\\\'I}") - ("�" "{\\\\^I}") - ("�" "{\\\\\"O}") - ("�" "{\\\\`O}") - ("�" "{\\\\'O}") - ("�" "{\\\\~O}") - ("�" "{\\\\^O}") - ("�" "{\\\\\"U}") - ("�" "{\\\\`U}") - ("�" "{\\\\'U}") - ("�" "{\\\\^U}") - ("�" "{\\\\~n}") - ("�" "{\\\\~N}") - ("�" "{\\\\c c}") - ("�" "{\\\\c C}") - ("�" "{\\\\ss}") + ("ä" "{\\\\\"a}") + ("à" "{\\\\`a}") + ("á" "{\\\\'a}") + ("ã" "{\\\\~a}") + ("â" "{\\\\^a}") + ("ë" "{\\\\\"e}") + ("è" "{\\\\`e}") + ("é" "{\\\\'e}") + ("ê" "{\\\\^e}") + ("ï" "{\\\\\"\\\\i}") + ("ì" "{\\\\`\\\\i}") + ("í" "{\\\\'\\\\i}") + ("î" "{\\\\^\\\\i}") + ("ö" "{\\\\\"o}") + ("ò" "{\\\\`o}") + ("ó" "{\\\\'o}") + ("õ" "{\\\\~o}") + ("ô" "{\\\\^o}") + ("ü" "{\\\\\"u}") + ("ù" "{\\\\`u}") + ("ú" "{\\\\'u}") + ("û" "{\\\\^u}") + ("Ä" "{\\\\\"A}") + ("À" "{\\\\`A}") + ("Á" "{\\\\'A}") + ("Ã" "{\\\\~A}") + ("Â" "{\\\\^A}") + ("Ë" "{\\\\\"E}") + ("È" "{\\\\`E}") + ("É" "{\\\\'E}") + ("Ê" "{\\\\^E}") + ("Ï" "{\\\\\"I}") + ("Ì" "{\\\\`I}") + ("Í" "{\\\\'I}") + ("Î" "{\\\\^I}") + ("Ö" "{\\\\\"O}") + ("Ò" "{\\\\`O}") + ("Ó" "{\\\\'O}") + ("Õ" "{\\\\~O}") + ("Ô" "{\\\\^O}") + ("Ü" "{\\\\\"U}") + ("Ù" "{\\\\`U}") + ("Ú" "{\\\\'U}") + ("Û" "{\\\\^U}") + ("ñ" "{\\\\~n}") + ("Ñ" "{\\\\~N}") + ("ç" "{\\\\c c}") + ("Ç" "{\\\\c C}") + ("ß" "{\\\\ss}") ("\306" "{\\\\AE}") ("\346" "{\\\\ae}") ("\305" "{\\\\AA}") ("\345" "{\\\\aa}") ("\251" "{\\\\copyright}") - ("�" "{\\\\pounds}") - ("�" "{\\\\P}") - ("�" "{\\\\S}") - ("�" "{?`}") - ("�" "{!`}") + ("£" "{\\\\pounds}") + ("¶" "{\\\\P}") + ("§" "{\\\\S}") + ("¿" "{?`}") + ("¡" "{!`}") ) "Translation table for translating ISO 8859-1 characters to TeX sequences.") @@ -204,183 +204,183 @@ Optional arg BUFFER is ignored (for use in `format-alist')." (defvar iso-tex2iso-trans-tab '( - ("{\\\\\"a}" "�") - ("{\\\\`a}" "�") - ("{\\\\'a}" "�") - ("{\\\\~a}" "�") - ("{\\\\^a}" "�") - ("{\\\\\"e}" "�") - ("{\\\\`e}" "�") - ("{\\\\'e}" "�") - ("{\\\\^e}" "�") - ("{\\\\\"\\\\i}" "�") - ("{\\\\`\\\\i}" "�") - ("{\\\\'\\\\i}" "�") - ("{\\\\^\\\\i}" "�") - ("{\\\\\"i}" "�") - ("{\\\\`i}" "�") - ("{\\\\'i}" "�") - ("{\\\\^i}" "�") - ("{\\\\\"o}" "�") - ("{\\\\`o}" "�") - ("{\\\\'o}" "�") - ("{\\\\~o}" "�") - ("{\\\\^o}" "�") - ("{\\\\\"u}" "�") - ("{\\\\`u}" "�") - ("{\\\\'u}" "�") - ("{\\\\^u}" "�") - ("{\\\\\"A}" "�") - ("{\\\\`A}" "�") - ("{\\\\'A}" "�") - ("{\\\\~A}" "�") - ("{\\\\^A}" "�") - ("{\\\\\"E}" "�") - ("{\\\\`E}" "�") - ("{\\\\'E}" "�") - ("{\\\\^E}" "�") - ("{\\\\\"I}" "�") - ("{\\\\`I}" "�") - ("{\\\\'I}" "�") - ("{\\\\^I}" "�") - ("{\\\\\"O}" "�") - ("{\\\\`O}" "�") - ("{\\\\'O}" "�") - ("{\\\\~O}" "�") - ("{\\\\^O}" "�") - ("{\\\\\"U}" "�") - ("{\\\\`U}" "�") - ("{\\\\'U}" "�") - ("{\\\\^U}" "�") - ("{\\\\~n}" "�") - ("{\\\\~N}" "�") - ("{\\\\c c}" "�") - ("{\\\\c C}" "�") - ("\\\\\"a" "�") - ("\\\\`a" "�") - ("\\\\'a" "�") - ("\\\\~a" "�") - ("\\\\^a" "�") - ("\\\\\"e" "�") - ("\\\\`e" "�") - ("\\\\'e" "�") - ("\\\\^e" "�") + ("{\\\\\"a}" "ä") + ("{\\\\`a}" "à") + ("{\\\\'a}" "á") + ("{\\\\~a}" "ã") + ("{\\\\^a}" "â") + ("{\\\\\"e}" "ë") + ("{\\\\`e}" "è") + ("{\\\\'e}" "é") + ("{\\\\^e}" "ê") + ("{\\\\\"\\\\i}" "ï") + ("{\\\\`\\\\i}" "ì") + ("{\\\\'\\\\i}" "í") + ("{\\\\^\\\\i}" "î") + ("{\\\\\"i}" "ï") + ("{\\\\`i}" "ì") + ("{\\\\'i}" "í") + ("{\\\\^i}" "î") + ("{\\\\\"o}" "ö") + ("{\\\\`o}" "ò") + ("{\\\\'o}" "ó") + ("{\\\\~o}" "õ") + ("{\\\\^o}" "ô") + ("{\\\\\"u}" "ü") + ("{\\\\`u}" "ù") + ("{\\\\'u}" "ú") + ("{\\\\^u}" "û") + ("{\\\\\"A}" "Ä") + ("{\\\\`A}" "À") + ("{\\\\'A}" "Á") + ("{\\\\~A}" "Ã") + ("{\\\\^A}" "Â") + ("{\\\\\"E}" "Ë") + ("{\\\\`E}" "È") + ("{\\\\'E}" "É") + ("{\\\\^E}" "Ê") + ("{\\\\\"I}" "Ï") + ("{\\\\`I}" "Ì") + ("{\\\\'I}" "Í") + ("{\\\\^I}" "Î") + ("{\\\\\"O}" "Ö") + ("{\\\\`O}" "Ò") + ("{\\\\'O}" "Ó") + ("{\\\\~O}" "Õ") + ("{\\\\^O}" "Ô") + ("{\\\\\"U}" "Ü") + ("{\\\\`U}" "Ù") + ("{\\\\'U}" "Ú") + ("{\\\\^U}" "Û") + ("{\\\\~n}" "ñ") + ("{\\\\~N}" "Ñ") + ("{\\\\c c}" "ç") + ("{\\\\c C}" "Ç") + ("\\\\\"a" "ä") + ("\\\\`a" "à") + ("\\\\'a" "á") + ("\\\\~a" "ã") + ("\\\\^a" "â") + ("\\\\\"e" "ë") + ("\\\\`e" "è") + ("\\\\'e" "é") + ("\\\\^e" "ê") ;; Discard spaces and/or one EOF after macro \i. ;; Converting it back will use braces. - ("\\\\\"\\\\i *\n\n" "�\n\n") - ("\\\\\"\\\\i *\n?" "�") - ("\\\\`\\\\i *\n\n" "�\n\n") - ("\\\\`\\\\i *\n?" "�") - ("\\\\'\\\\i *\n\n" "�\n\n") - ("\\\\'\\\\i *\n?" "�") - ("\\\\^\\\\i *\n\n" "�\n\n") - ("\\\\^\\\\i *\n?" "�") - ("\\\\\"i" "�") - ("\\\\`i" "�") - ("\\\\'i" "�") - ("\\\\^i" "�") - ("\\\\\"o" "�") - ("\\\\`o" "�") - ("\\\\'o" "�") - ("\\\\~o" "�") - ("\\\\^o" "�") - ("\\\\\"u" "�") - ("\\\\`u" "�") - ("\\\\'u" "�") - ("\\\\^u" "�") - ("\\\\\"A" "�") - ("\\\\`A" "�") - ("\\\\'A" "�") - ("\\\\~A" "�") - ("\\\\^A" "�") - ("\\\\\"E" "�") - ("\\\\`E" "�") - ("\\\\'E" "�") - ("\\\\^E" "�") - ("\\\\\"I" "�") - ("\\\\`I" "�") - ("\\\\'I" "�") - ("\\\\^I" "�") - ("\\\\\"O" "�") - ("\\\\`O" "�") - ("\\\\'O" "�") - ("\\\\~O" "�") - ("\\\\^O" "�") - ("\\\\\"U" "�") - ("\\\\`U" "�") - ("\\\\'U" "�") - ("\\\\^U" "�") - ("\\\\~n" "�") - ("\\\\~N" "�") - ("\\\\\"{a}" "�") - ("\\\\`{a}" "�") - ("\\\\'{a}" "�") - ("\\\\~{a}" "�") - ("\\\\^{a}" "�") - ("\\\\\"{e}" "�") - ("\\\\`{e}" "�") - ("\\\\'{e}" "�") - ("\\\\^{e}" "�") - ("\\\\\"{\\\\i}" "�") - ("\\\\`{\\\\i}" "�") - ("\\\\'{\\\\i}" "�") - ("\\\\^{\\\\i}" "�") - ("\\\\\"{i}" "�") - ("\\\\`{i}" "�") - ("\\\\'{i}" "�") - ("\\\\^{i}" "�") - ("\\\\\"{o}" "�") - ("\\\\`{o}" "�") - ("\\\\'{o}" "�") - ("\\\\~{o}" "�") - ("\\\\^{o}" "�") - ("\\\\\"{u}" "�") - ("\\\\`{u}" "�") - ("\\\\'{u}" "�") - ("\\\\^{u}" "�") - ("\\\\\"{A}" "�") - ("\\\\`{A}" "�") - ("\\\\'{A}" "�") - ("\\\\~{A}" "�") - ("\\\\^{A}" "�") - ("\\\\\"{E}" "�") - ("\\\\`{E}" "�") - ("\\\\'{E}" "�") - ("\\\\^{E}" "�") - ("\\\\\"{I}" "�") - ("\\\\`{I}" "�") - ("\\\\'{I}" "�") - ("\\\\^{I}" "�") - ("\\\\\"{O}" "�") - ("\\\\`{O}" "�") - ("\\\\'{O}" "�") - ("\\\\~{O}" "�") - ("\\\\^{O}" "�") - ("\\\\\"{U}" "�") - ("\\\\`{U}" "�") - ("\\\\'{U}" "�") - ("\\\\^{U}" "�") - ("\\\\~{n}" "�") - ("\\\\~{N}" "�") - ("\\\\c{c}" "�") - ("\\\\c{C}" "�") - ("{\\\\ss}" "�") + ("\\\\\"\\\\i *\n\n" "ï\n\n") + ("\\\\\"\\\\i *\n?" "ï") + ("\\\\`\\\\i *\n\n" "ì\n\n") + ("\\\\`\\\\i *\n?" "ì") + ("\\\\'\\\\i *\n\n" "í\n\n") + ("\\\\'\\\\i *\n?" "í") + ("\\\\^\\\\i *\n\n" "î\n\n") + ("\\\\^\\\\i *\n?" "î") + ("\\\\\"i" "ï") + ("\\\\`i" "ì") + ("\\\\'i" "í") + ("\\\\^i" "î") + ("\\\\\"o" "ö") + ("\\\\`o" "ò") + ("\\\\'o" "ó") + ("\\\\~o" "õ") + ("\\\\^o" "ô") + ("\\\\\"u" "ü") + ("\\\\`u" "ù") + ("\\\\'u" "ú") + ("\\\\^u" "û") + ("\\\\\"A" "Ä") + ("\\\\`A" "À") + ("\\\\'A" "Á") + ("\\\\~A" "Ã") + ("\\\\^A" "Â") + ("\\\\\"E" "Ë") + ("\\\\`E" "È") + ("\\\\'E" "É") + ("\\\\^E" "Ê") + ("\\\\\"I" "Ï") + ("\\\\`I" "Ì") + ("\\\\'I" "Í") + ("\\\\^I" "Î") + ("\\\\\"O" "Ö") + ("\\\\`O" "Ò") + ("\\\\'O" "Ó") + ("\\\\~O" "Õ") + ("\\\\^O" "Ô") + ("\\\\\"U" "Ü") + ("\\\\`U" "Ù") + ("\\\\'U" "Ú") + ("\\\\^U" "Û") + ("\\\\~n" "ñ") + ("\\\\~N" "Ñ") + ("\\\\\"{a}" "ä") + ("\\\\`{a}" "à") + ("\\\\'{a}" "á") + ("\\\\~{a}" "ã") + ("\\\\^{a}" "â") + ("\\\\\"{e}" "ë") + ("\\\\`{e}" "è") + ("\\\\'{e}" "é") + ("\\\\^{e}" "ê") + ("\\\\\"{\\\\i}" "ï") + ("\\\\`{\\\\i}" "ì") + ("\\\\'{\\\\i}" "í") + ("\\\\^{\\\\i}" "î") + ("\\\\\"{i}" "ï") + ("\\\\`{i}" "ì") + ("\\\\'{i}" "í") + ("\\\\^{i}" "î") + ("\\\\\"{o}" "ö") + ("\\\\`{o}" "ò") + ("\\\\'{o}" "ó") + ("\\\\~{o}" "õ") + ("\\\\^{o}" "ô") + ("\\\\\"{u}" "ü") + ("\\\\`{u}" "ù") + ("\\\\'{u}" "ú") + ("\\\\^{u}" "û") + ("\\\\\"{A}" "Ä") + ("\\\\`{A}" "À") + ("\\\\'{A}" "Á") + ("\\\\~{A}" "Ã") + ("\\\\^{A}" "Â") + ("\\\\\"{E}" "Ë") + ("\\\\`{E}" "È") + ("\\\\'{E}" "É") + ("\\\\^{E}" "Ê") + ("\\\\\"{I}" "Ï") + ("\\\\`{I}" "Ì") + ("\\\\'{I}" "Í") + ("\\\\^{I}" "Î") + ("\\\\\"{O}" "Ö") + ("\\\\`{O}" "Ò") + ("\\\\'{O}" "Ó") + ("\\\\~{O}" "Õ") + ("\\\\^{O}" "Ô") + ("\\\\\"{U}" "Ü") + ("\\\\`{U}" "Ù") + ("\\\\'{U}" "Ú") + ("\\\\^{U}" "Û") + ("\\\\~{n}" "ñ") + ("\\\\~{N}" "Ñ") + ("\\\\c{c}" "ç") + ("\\\\c{C}" "Ç") + ("{\\\\ss}" "ß") ("{\\\\AE}" "\306") ("{\\\\ae}" "\346") ("{\\\\AA}" "\305") ("{\\\\aa}" "\345") ("{\\\\copyright}" "\251") ("\\\\copyright{}" "\251") - ("{\\\\pounds}" "�" ) - ("{\\\\P}" "�" ) - ("{\\\\S}" "�" ) - ("\\\\pounds{}" "�" ) - ("\\\\P{}" "�" ) - ("\\\\S{}" "�" ) - ("{\\?`}" "�") - ("{!`}" "�") - ("\\?`" "�") - ("!`" "�") + ("{\\\\pounds}" "£" ) + ("{\\\\P}" "¶" ) + ("{\\\\S}" "§" ) + ("\\\\pounds{}" "£" ) + ("\\\\P{}" "¶" ) + ("\\\\S{}" "§" ) + ("{\\?`}" "¿") + ("{!`}" "¡") + ("\\?`" "¿") + ("!`" "¡") ) "Translation table for translating TeX sequences to ISO 8859-1 characters. This table is not exhaustive (and due to TeX's power can never be). @@ -397,185 +397,185 @@ Optional arg BUFFER is ignored (for use in `format-alist')." (defvar iso-gtex2iso-trans-tab '( - ("{\\\\\"a}" "�") - ("{\\\\`a}" "�") - ("{\\\\'a}" "�") - ("{\\\\~a}" "�") - ("{\\\\^a}" "�") - ("{\\\\\"e}" "�") - ("{\\\\`e}" "�") - ("{\\\\'e}" "�") - ("{\\\\^e}" "�") - ("{\\\\\"\\\\i}" "�") - ("{\\\\`\\\\i}" "�") - ("{\\\\'\\\\i}" "�") - ("{\\\\^\\\\i}" "�") - ("{\\\\\"i}" "�") - ("{\\\\`i}" "�") - ("{\\\\'i}" "�") - ("{\\\\^i}" "�") - ("{\\\\\"o}" "�") - ("{\\\\`o}" "�") - ("{\\\\'o}" "�") - ("{\\\\~o}" "�") - ("{\\\\^o}" "�") - ("{\\\\\"u}" "�") - ("{\\\\`u}" "�") - ("{\\\\'u}" "�") - ("{\\\\^u}" "�") - ("{\\\\\"A}" "�") - ("{\\\\`A}" "�") - ("{\\\\'A}" "�") - ("{\\\\~A}" "�") - ("{\\\\^A}" "�") - ("{\\\\\"E}" "�") - ("{\\\\`E}" "�") - ("{\\\\'E}" "�") - ("{\\\\^E}" "�") - ("{\\\\\"I}" "�") - ("{\\\\`I}" "�") - ("{\\\\'I}" "�") - ("{\\\\^I}" "�") - ("{\\\\\"O}" "�") - ("{\\\\`O}" "�") - ("{\\\\'O}" "�") - ("{\\\\~O}" "�") - ("{\\\\^O}" "�") - ("{\\\\\"U}" "�") - ("{\\\\`U}" "�") - ("{\\\\'U}" "�") - ("{\\\\^U}" "�") - ("{\\\\~n}" "�") - ("{\\\\~N}" "�") - ("{\\\\c c}" "�") - ("{\\\\c C}" "�") - ("\\\\\"a" "�") - ("\\\\`a" "�") - ("\\\\'a" "�") - ("\\\\~a" "�") - ("\\\\^a" "�") - ("\\\\\"e" "�") - ("\\\\`e" "�") - ("\\\\'e" "�") - ("\\\\^e" "�") - ("\\\\\"\\\\i" "�") - ("\\\\`\\\\i" "�") - ("\\\\'\\\\i" "�") - ("\\\\^\\\\i" "�") - ("\\\\\"i" "�") - ("\\\\`i" "�") - ("\\\\'i" "�") - ("\\\\^i" "�") - ("\\\\\"o" "�") - ("\\\\`o" "�") - ("\\\\'o" "�") - ("\\\\~o" "�") - ("\\\\^o" "�") - ("\\\\\"u" "�") - ("\\\\`u" "�") - ("\\\\'u" "�") - ("\\\\^u" "�") - ("\\\\\"A" "�") - ("\\\\`A" "�") - ("\\\\'A" "�") - ("\\\\~A" "�") - ("\\\\^A" "�") - ("\\\\\"E" "�") - ("\\\\`E" "�") - ("\\\\'E" "�") - ("\\\\^E" "�") - ("\\\\\"I" "�") - ("\\\\`I" "�") - ("\\\\'I" "�") - ("\\\\^I" "�") - ("\\\\\"O" "�") - ("\\\\`O" "�") - ("\\\\'O" "�") - ("\\\\~O" "�") - ("\\\\^O" "�") - ("\\\\\"U" "�") - ("\\\\`U" "�") - ("\\\\'U" "�") - ("\\\\^U" "�") - ("\\\\~n" "�") - ("\\\\~N" "�") - ("\\\\\"{a}" "�") - ("\\\\`{a}" "�") - ("\\\\'{a}" "�") - ("\\\\~{a}" "�") - ("\\\\^{a}" "�") - ("\\\\\"{e}" "�") - ("\\\\`{e}" "�") - ("\\\\'{e}" "�") - ("\\\\^{e}" "�") - ("\\\\\"{\\\\i}" "�") - ("\\\\`{\\\\i}" "�") - ("\\\\'{\\\\i}" "�") - ("\\\\^{\\\\i}" "�") - ("\\\\\"{i}" "�") - ("\\\\`{i}" "�") - ("\\\\'{i}" "�") - ("\\\\^{i}" "�") - ("\\\\\"{o}" "�") - ("\\\\`{o}" "�") - ("\\\\'{o}" "�") - ("\\\\~{o}" "�") - ("\\\\^{o}" "�") - ("\\\\\"{u}" "�") - ("\\\\`{u}" "�") - ("\\\\'{u}" "�") - ("\\\\^{u}" "�") - ("\\\\\"{A}" "�") - ("\\\\`{A}" "�") - ("\\\\'{A}" "�") - ("\\\\~{A}" "�") - ("\\\\^{A}" "�") - ("\\\\\"{E}" "�") - ("\\\\`{E}" "�") - ("\\\\'{E}" "�") - ("\\\\^{E}" "�") - ("\\\\\"{I}" "�") - ("\\\\`{I}" "�") - ("\\\\'{I}" "�") - ("\\\\^{I}" "�") - ("\\\\\"{O}" "�") - ("\\\\`{O}" "�") - ("\\\\'{O}" "�") - ("\\\\~{O}" "�") - ("\\\\^{O}" "�") - ("\\\\\"{U}" "�") - ("\\\\`{U}" "�") - ("\\\\'{U}" "�") - ("\\\\^{U}" "�") - ("\\\\~{n}" "�") - ("\\\\~{N}" "�") - ("\\\\c{c}" "�") - ("\\\\c{C}" "�") - ("{\\\\ss}" "�") + ("{\\\\\"a}" "ä") + ("{\\\\`a}" "à") + ("{\\\\'a}" "á") + ("{\\\\~a}" "ã") + ("{\\\\^a}" "â") + ("{\\\\\"e}" "ë") + ("{\\\\`e}" "è") + ("{\\\\'e}" "é") + ("{\\\\^e}" "ê") + ("{\\\\\"\\\\i}" "ï") + ("{\\\\`\\\\i}" "ì") + ("{\\\\'\\\\i}" "í") + ("{\\\\^\\\\i}" "î") + ("{\\\\\"i}" "ï") + ("{\\\\`i}" "ì") + ("{\\\\'i}" "í") + ("{\\\\^i}" "î") + ("{\\\\\"o}" "ö") + ("{\\\\`o}" "ò") + ("{\\\\'o}" "ó") + ("{\\\\~o}" "õ") + ("{\\\\^o}" "ô") + ("{\\\\\"u}" "ü") + ("{\\\\`u}" "ù") + ("{\\\\'u}" "ú") + ("{\\\\^u}" "û") + ("{\\\\\"A}" "Ä") + ("{\\\\`A}" "À") + ("{\\\\'A}" "Á") + ("{\\\\~A}" "Ã") + ("{\\\\^A}" "Â") + ("{\\\\\"E}" "Ë") + ("{\\\\`E}" "È") + ("{\\\\'E}" "É") + ("{\\\\^E}" "Ê") + ("{\\\\\"I}" "Ï") + ("{\\\\`I}" "Ì") + ("{\\\\'I}" "Í") + ("{\\\\^I}" "Î") + ("{\\\\\"O}" "Ö") + ("{\\\\`O}" "Ò") + ("{\\\\'O}" "Ó") + ("{\\\\~O}" "Õ") + ("{\\\\^O}" "Ô") + ("{\\\\\"U}" "Ü") + ("{\\\\`U}" "Ù") + ("{\\\\'U}" "Ú") + ("{\\\\^U}" "Û") + ("{\\\\~n}" "ñ") + ("{\\\\~N}" "Ñ") + ("{\\\\c c}" "ç") + ("{\\\\c C}" "Ç") + ("\\\\\"a" "ä") + ("\\\\`a" "à") + ("\\\\'a" "á") + ("\\\\~a" "ã") + ("\\\\^a" "â") + ("\\\\\"e" "ë") + ("\\\\`e" "è") + ("\\\\'e" "é") + ("\\\\^e" "ê") + ("\\\\\"\\\\i" "ï") + ("\\\\`\\\\i" "ì") + ("\\\\'\\\\i" "í") + ("\\\\^\\\\i" "î") + ("\\\\\"i" "ï") + ("\\\\`i" "ì") + ("\\\\'i" "í") + ("\\\\^i" "î") + ("\\\\\"o" "ö") + ("\\\\`o" "ò") + ("\\\\'o" "ó") + ("\\\\~o" "õ") + ("\\\\^o" "ô") + ("\\\\\"u" "ü") + ("\\\\`u" "ù") + ("\\\\'u" "ú") + ("\\\\^u" "û") + ("\\\\\"A" "Ä") + ("\\\\`A" "À") + ("\\\\'A" "Á") + ("\\\\~A" "Ã") + ("\\\\^A" "Â") + ("\\\\\"E" "Ë") + ("\\\\`E" "È") + ("\\\\'E" "É") + ("\\\\^E" "Ê") + ("\\\\\"I" "Ï") + ("\\\\`I" "Ì") + ("\\\\'I" "Í") + ("\\\\^I" "Î") + ("\\\\\"O" "Ö") + ("\\\\`O" "Ò") + ("\\\\'O" "Ó") + ("\\\\~O" "Õ") + ("\\\\^O" "Ô") + ("\\\\\"U" "Ü") + ("\\\\`U" "Ù") + ("\\\\'U" "Ú") + ("\\\\^U" "Û") + ("\\\\~n" "ñ") + ("\\\\~N" "Ñ") + ("\\\\\"{a}" "ä") + ("\\\\`{a}" "à") + ("\\\\'{a}" "á") + ("\\\\~{a}" "ã") + ("\\\\^{a}" "â") + ("\\\\\"{e}" "ë") + ("\\\\`{e}" "è") + ("\\\\'{e}" "é") + ("\\\\^{e}" "ê") + ("\\\\\"{\\\\i}" "ï") + ("\\\\`{\\\\i}" "ì") + ("\\\\'{\\\\i}" "í") + ("\\\\^{\\\\i}" "î") + ("\\\\\"{i}" "ï") + ("\\\\`{i}" "ì") + ("\\\\'{i}" "í") + ("\\\\^{i}" "î") + ("\\\\\"{o}" "ö") + ("\\\\`{o}" "ò") + ("\\\\'{o}" "ó") + ("\\\\~{o}" "õ") + ("\\\\^{o}" "ô") + ("\\\\\"{u}" "ü") + ("\\\\`{u}" "ù") + ("\\\\'{u}" "ú") + ("\\\\^{u}" "û") + ("\\\\\"{A}" "Ä") + ("\\\\`{A}" "À") + ("\\\\'{A}" "Á") + ("\\\\~{A}" "Ã") + ("\\\\^{A}" "Â") + ("\\\\\"{E}" "Ë") + ("\\\\`{E}" "È") + ("\\\\'{E}" "É") + ("\\\\^{E}" "Ê") + ("\\\\\"{I}" "Ï") + ("\\\\`{I}" "Ì") + ("\\\\'{I}" "Í") + ("\\\\^{I}" "Î") + ("\\\\\"{O}" "Ö") + ("\\\\`{O}" "Ò") + ("\\\\'{O}" "Ó") + ("\\\\~{O}" "Õ") + ("\\\\^{O}" "Ô") + ("\\\\\"{U}" "Ü") + ("\\\\`{U}" "Ù") + ("\\\\'{U}" "Ú") + ("\\\\^{U}" "Û") + ("\\\\~{n}" "ñ") + ("\\\\~{N}" "Ñ") + ("\\\\c{c}" "ç") + ("\\\\c{C}" "Ç") + ("{\\\\ss}" "ß") ("{\\\\AE}" "\306") ("{\\\\ae}" "\346") ("{\\\\AA}" "\305") ("{\\\\aa}" "\345") ("{\\\\copyright}" "\251") ("\\\\copyright{}" "\251") - ("{\\\\pounds}" "�" ) - ("{\\\\P}" "�" ) - ("{\\\\S}" "�" ) - ("\\\\pounds{}" "�" ) - ("\\\\P{}" "�" ) - ("\\\\S{}" "�" ) - ("?`" "�") - ("!`" "�") - ("{?`}" "�") - ("{!`}" "�") - ("\"a" "�") - ("\"A" "�") - ("\"o" "�") - ("\"O" "�") - ("\"u" "�") - ("\"U" "�") - ("\"s" "�") - ("\\\\3" "�") + ("{\\\\pounds}" "£" ) + ("{\\\\P}" "¶" ) + ("{\\\\S}" "§" ) + ("\\\\pounds{}" "£" ) + ("\\\\P{}" "¶" ) + ("\\\\S{}" "§" ) + ("?`" "¿") + ("!`" "¡") + ("{?`}" "¿") + ("{!`}" "¡") + ("\"a" "ä") + ("\"A" "Ä") + ("\"o" "ö") + ("\"O" "Ö") + ("\"u" "ü") + ("\"U" "Ü") + ("\"s" "ß") + ("\\\\3" "ß") ) "Translation table for translating German TeX sequences to ISO 8859-1. This table is not exhaustive (and due to TeX's power can never be). @@ -583,65 +583,65 @@ It only contains commonly used sequences.") (defvar iso-iso2gtex-trans-tab '( - ("�" "\"a") - ("�" "{\\\\`a}") - ("�" "{\\\\'a}") - ("�" "{\\\\~a}") - ("�" "{\\\\^a}") - ("�" "{\\\\\"e}") - ("�" "{\\\\`e}") - ("�" "{\\\\'e}") - ("�" "{\\\\^e}") - ("�" "{\\\\\"\\\\i}") - ("�" "{\\\\`\\\\i}") - ("�" "{\\\\'\\\\i}") - ("�" "{\\\\^\\\\i}") - ("�" "\"o") - ("�" "{\\\\`o}") - ("�" "{\\\\'o}") - ("�" "{\\\\~o}") - ("�" "{\\\\^o}") - ("�" "\"u") - ("�" "{\\\\`u}") - ("�" "{\\\\'u}") - ("�" "{\\\\^u}") - ("�" "\"A") - ("�" "{\\\\`A}") - ("�" "{\\\\'A}") - ("�" "{\\\\~A}") - ("�" "{\\\\^A}") - ("�" "{\\\\\"E}") - ("�" "{\\\\`E}") - ("�" "{\\\\'E}") - ("�" "{\\\\^E}") - ("�" "{\\\\\"I}") - ("�" "{\\\\`I}") - ("�" "{\\\\'I}") - ("�" "{\\\\^I}") - ("�" "\"O") - ("�" "{\\\\`O}") - ("�" "{\\\\'O}") - ("�" "{\\\\~O}") - ("�" "{\\\\^O}") - ("�" "\"U") - ("�" "{\\\\`U}") - ("�" "{\\\\'U}") - ("�" "{\\\\^U}") - ("�" "{\\\\~n}") - ("�" "{\\\\~N}") - ("�" "{\\\\c c}") - ("�" "{\\\\c C}") - ("�" "\"s") + ("ä" "\"a") + ("à" "{\\\\`a}") + ("á" "{\\\\'a}") + ("ã" "{\\\\~a}") + ("â" "{\\\\^a}") + ("ë" "{\\\\\"e}") + ("è" "{\\\\`e}") + ("é" "{\\\\'e}") + ("ê" "{\\\\^e}") + ("ï" "{\\\\\"\\\\i}") + ("ì" "{\\\\`\\\\i}") + ("í" "{\\\\'\\\\i}") + ("î" "{\\\\^\\\\i}") + ("ö" "\"o") + ("ò" "{\\\\`o}") + ("ó" "{\\\\'o}") + ("õ" "{\\\\~o}") + ("ô" "{\\\\^o}") + ("ü" "\"u") + ("ù" "{\\\\`u}") + ("ú" "{\\\\'u}") + ("û" "{\\\\^u}") + ("Ä" "\"A") + ("À" "{\\\\`A}") + ("Á" "{\\\\'A}") + ("Ã" "{\\\\~A}") + ("Â" "{\\\\^A}") + ("Ë" "{\\\\\"E}") + ("È" "{\\\\`E}") + ("É" "{\\\\'E}") + ("Ê" "{\\\\^E}") + ("Ï" "{\\\\\"I}") + ("Ì" "{\\\\`I}") + ("Í" "{\\\\'I}") + ("Î" "{\\\\^I}") + ("Ö" "\"O") + ("Ò" "{\\\\`O}") + ("Ó" "{\\\\'O}") + ("Õ" "{\\\\~O}") + ("Ô" "{\\\\^O}") + ("Ü" "\"U") + ("Ù" "{\\\\`U}") + ("Ú" "{\\\\'U}") + ("Û" "{\\\\^U}") + ("ñ" "{\\\\~n}") + ("Ñ" "{\\\\~N}") + ("ç" "{\\\\c c}") + ("Ç" "{\\\\c C}") + ("ß" "\"s") ("\306" "{\\\\AE}") ("\346" "{\\\\ae}") ("\305" "{\\\\AA}") ("\345" "{\\\\aa}") ("\251" "{\\\\copyright}") - ("�" "{\\\\pounds}") - ("�" "{\\\\P}") - ("�" "{\\\\S}") - ("�" "{?`}") - ("�" "{!`}") + ("£" "{\\\\pounds}") + ("¶" "{\\\\P}") + ("§" "{\\\\S}") + ("¿" "{?`}") + ("¡" "{!`}") ) "Translation table for translating ISO 8859-1 characters to German TeX.") @@ -664,13 +664,13 @@ Optional arg BUFFER is ignored (for use in `format-alist')." (iso-translate-conventions from to iso-iso2gtex-trans-tab)) (defvar iso-iso2duden-trans-tab - '(("�" "ae") - ("�" "Ae") - ("�" "oe") - ("�" "Oe") - ("�" "ue") - ("�" "Ue") - ("�" "ss")) + '(("ä" "ae") + ("Ä" "Ae") + ("ö" "oe") + ("Ö" "Oe") + ("ü" "ue") + ("Ü" "Ue") + ("ß" "ss")) "Translation table for translating ISO 8859-1 characters to Duden sequences.") ;;;###autoload @@ -683,133 +683,133 @@ Optional arg BUFFER is ignored (for use in `format-alist')." (iso-translate-conventions from to iso-iso2duden-trans-tab)) (defvar iso-iso2sgml-trans-tab - '(("�" "À") - ("�" "Á") - ("�" "Â") - ("�" "Ã") - ("�" "Ä") - ("�" "Å") - ("�" "Æ") - ("�" "Ç") - ("�" "È") - ("�" "É") - ("�" "Ê") - ("�" "Ë") - ("�" "Ì") - ("�" "Í") - ("�" "Î") - ("�" "Ï") - ("�" "Ð") - ("�" "Ñ") - ("�" "Ò") - ("�" "Ó") - ("�" "Ô") - ("�" "Õ") - ("�" "Ö") - ("�" "Ø") - ("�" "Ù") - ("�" "Ú") - ("�" "Û") - ("�" "Ü") - ("�" "Ý") - ("�" "Þ") - ("�" "ß") - ("�" "à") - ("�" "á") - ("�" "â") - ("�" "ã") - ("�" "ä") - ("�" "å") - ("�" "æ") - ("�" "ç") - ("�" "è") - ("�" "é") - ("�" "ê") - ("�" "ë") - ("�" "ì") - ("�" "í") - ("�" "î") - ("�" "ï") - ("�" "ð") - ("�" "ñ") - ("�" "ò") - ("�" "ó") - ("�" "ô") - ("�" "õ") - ("�" "ö") - ("�" "ø") - ("�" "ù") - ("�" "ú") - ("�" "û") - ("�" "ü") - ("�" "ý") - ("�" "þ") - ("�" "ÿ"))) + '(("À" "À") + ("Á" "Á") + ("Â" "Â") + ("Ã" "Ã") + ("Ä" "Ä") + ("Å" "Å") + ("Æ" "Æ") + ("Ç" "Ç") + ("È" "È") + ("É" "É") + ("Ê" "Ê") + ("Ë" "Ë") + ("Ì" "Ì") + ("Í" "Í") + ("Î" "Î") + ("Ï" "Ï") + ("Ð" "Ð") + ("Ñ" "Ñ") + ("Ò" "Ò") + ("Ó" "Ó") + ("Ô" "Ô") + ("Õ" "Õ") + ("Ö" "Ö") + ("Ø" "Ø") + ("Ù" "Ù") + ("Ú" "Ú") + ("Û" "Û") + ("Ü" "Ü") + ("Ý" "Ý") + ("Þ" "Þ") + ("ß" "ß") + ("à" "à") + ("á" "á") + ("â" "â") + ("ã" "ã") + ("ä" "ä") + ("å" "å") + ("æ" "æ") + ("ç" "ç") + ("è" "è") + ("é" "é") + ("ê" "ê") + ("ë" "ë") + ("ì" "ì") + ("í" "í") + ("î" "î") + ("ï" "ï") + ("ð" "ð") + ("ñ" "ñ") + ("ò" "ò") + ("ó" "ó") + ("ô" "ô") + ("õ" "õ") + ("ö" "ö") + ("ø" "ø") + ("ù" "ù") + ("ú" "ú") + ("û" "û") + ("ü" "ü") + ("ý" "ý") + ("þ" "þ") + ("ÿ" "ÿ"))) (defvar iso-sgml2iso-trans-tab - '(("À" "�") - ("Á" "�") - ("Â" "�") - ("Ã" "�") - ("Ä" "�") - ("Å" "�") - ("Æ" "�") - ("Ç" "�") - ("È" "�") - ("É" "�") - ("Ê" "�") - ("Ë" "�") - ("Ì" "�") - ("Í" "�") - ("Î" "�") - ("Ï" "�") - ("Ð" "�") - ("Ñ" "�") - ("Ò" "�") - ("Ó" "�") - ("Ô" "�") - ("Õ" "�") - ("Ö" "�") - ("Ø" "�") - ("Ù" "�") - ("Ú" "�") - ("Û" "�") - ("Ü" "�") - ("Ý" "�") - ("Þ" "�") - ("ß" "�") - ("à" "�") - ("á" "�") - ("â" "�") - ("ã" "�") - ("ä" "�") - ("å" "�") - ("æ" "�") - ("ç" "�") - ("è" "�") - ("é" "�") - ("ê" "�") - ("ë" "�") - ("ì" "�") - ("í" "�") - ("î" "�") - ("ï" "�") - ("ð" "�") - ("ñ" "�") - (" " "�") - ("ò" "�") - ("ó" "�") - ("ô" "�") - ("õ" "�") - ("ö" "�") - ("ø" "�") - ("ù" "�") - ("ú" "�") - ("û" "�") - ("ü" "�") - ("ý" "�") - ("þ" "�") - ("ÿ" "�"))) + '(("À" "À") + ("Á" "Á") + ("Â" "Â") + ("Ã" "Ã") + ("Ä" "Ä") + ("Å" "Å") + ("Æ" "Æ") + ("Ç" "Ç") + ("È" "È") + ("É" "É") + ("Ê" "Ê") + ("Ë" "Ë") + ("Ì" "Ì") + ("Í" "Í") + ("Î" "Î") + ("Ï" "Ï") + ("Ð" "Ð") + ("Ñ" "Ñ") + ("Ò" "Ò") + ("Ó" "Ó") + ("Ô" "Ô") + ("Õ" "Õ") + ("Ö" "Ö") + ("Ø" "Ø") + ("Ù" "Ù") + ("Ú" "Ú") + ("Û" "Û") + ("Ü" "Ü") + ("Ý" "Ý") + ("Þ" "Þ") + ("ß" "ß") + ("à" "à") + ("á" "á") + ("â" "â") + ("ã" "ã") + ("ä" "ä") + ("å" "å") + ("æ" "æ") + ("ç" "ç") + ("è" "è") + ("é" "é") + ("ê" "ê") + ("ë" "ë") + ("ì" "ì") + ("í" "í") + ("î" "î") + ("ï" "ï") + ("ð" "ð") + ("ñ" "ñ") + (" " " ") + ("ò" "ò") + ("ó" "ó") + ("ô" "ô") + ("õ" "õ") + ("ö" "ö") + ("ø" "ø") + ("ù" "ù") + ("ú" "ú") + ("û" "û") + ("ü" "ü") + ("ý" "ý") + ("þ" "þ") + ("ÿ" "ÿ"))) ;;;###autoload (defun iso-iso2sgml (from to &optional buffer) diff --git a/lisp/international/iso-transl.el b/lisp/international/iso-transl.el index 4bc0400ef2..4bbb89c708 100644 --- a/lisp/international/iso-transl.el +++ b/lisp/international/iso-transl.el @@ -1,4 +1,4 @@ -;;; iso-transl.el --- keyboard input definitions for ISO 8859-1 -*- coding: iso-8859-1 -*- +;;; iso-transl.el --- keyboard input definitions for ISO 8859-1 -*- coding: utf-8 -*- ;; Copyright (C) 1987, 1993-1999, 2001-2013 Free Software Foundation, ;; Inc. @@ -73,125 +73,125 @@ ;; language-specific table might override the short form for its own use. (defvar iso-transl-char-map - '(("* " . [?�]) - (" " . [?�]) - ("*!" . [?�]) - ("!" . [?�]) - ("\"\"" . [?�]) - ("\"A" . [?�]) - ("\"E" . [?�]) - ("\"I" . [?�]) - ("\"O" . [?�]) - ("\"U" . [?�]) - ("\"a" . [?�]) - ("\"e" . [?�]) - ("\"i" . [?�]) - ("\"o" . [?�]) - ("\"s" . [?�]) - ("\"u" . [?�]) - ("\"y" . [?�]) - ("''" . [?�]) - ("'A" . [?�]) - ("'E" . [?�]) - ("'I" . [?�]) - ("'O" . [?�]) - ("'U" . [?�]) - ("'Y" . [?�]) - ("'a" . [?�]) - ("'e" . [?�]) - ("'i" . [?�]) - ("'o" . [?�]) - ("'u" . [?�]) - ("'y" . [?�]) - ("*$" . [?�]) - ("$" . [?�]) - ("*+" . [?�]) - ("+" . [?�]) - (",," . [?�]) - (",C" . [?�]) - (",c" . [?�]) - ("*-" . [?�]) - ("-" . [?�]) - ("*." . [?�]) - ("." . [?�]) - ("//" . [?�]) - ("/A" . [?�]) - ("/E" . [?�]) - ("/O" . [?�]) - ("/a" . [?�]) - ("/e" . [?�]) - ("/o" . [?�]) - ("1/2" . [?�]) - ("1/4" . [?�]) - ("3/4" . [?�]) - ("*<" . [?�]) - ("<" . [?�]) - ("*=" . [?�]) - ("=" . [?�]) - ("*>" . [?�]) - (">" . [?�]) - ("*?" . [?�]) - ("?" . [?�]) - ("*C" . [?�]) - ("C" . [?�]) - ("*L" . [?�]) - ("L" . [?�]) - ("*P" . [?�]) - ("P" . [?�]) - ("*R" . [?�]) - ("R" . [?�]) - ("*S" . [?�]) - ("S" . [?�]) - ("*Y" . [?�]) - ("Y" . [?�]) - ("^1" . [?�]) - ("^2" . [?�]) - ("^3" . [?�]) - ("^A" . [?�]) - ("^E" . [?�]) - ("^I" . [?�]) - ("^O" . [?�]) - ("^U" . [?�]) - ("^a" . [?�]) - ("^e" . [?�]) - ("^i" . [?�]) - ("^o" . [?�]) - ("^u" . [?�]) - ("_a" . [?�]) - ("_o" . [?�]) - ("`A" . [?�]) - ("`E" . [?�]) - ("`I" . [?�]) - ("`O" . [?�]) - ("`U" . [?�]) - ("`a" . [?�]) - ("`e" . [?�]) - ("`i" . [?�]) - ("`o" . [?�]) - ("`u" . [?�]) - ("*c" . [?�]) - ("c" . [?�]) - ("*o" . [?�]) - ("o" . [?�]) - ("*u" . [?�]) - ("u" . [?�]) - ("*m" . [?�]) - ("m" . [?�]) - ("*x" . [?�]) - ("x" . [?�]) - ("*|" . [?�]) - ("|" . [?�]) - ("~A" . [?�]) - ("~D" . [?�]) - ("~N" . [?�]) - ("~O" . [?�]) - ("~T" . [?�]) - ("~a" . [?�]) - ("~d" . [?�]) - ("~n" . [?�]) - ("~o" . [?�]) - ("~t" . [?�]) - ("~~" . [?�]) + '(("* " . [? ]) + (" " . [? ]) + ("*!" . [?¡]) + ("!" . [?¡]) + ("\"\"" . [?¨]) + ("\"A" . [?Ä]) + ("\"E" . [?Ë]) + ("\"I" . [?Ï]) + ("\"O" . [?Ö]) + ("\"U" . [?Ü]) + ("\"a" . [?ä]) + ("\"e" . [?ë]) + ("\"i" . [?ï]) + ("\"o" . [?ö]) + ("\"s" . [?ß]) + ("\"u" . [?ü]) + ("\"y" . [?ÿ]) + ("''" . [?´]) + ("'A" . [?Á]) + ("'E" . [?É]) + ("'I" . [?Í]) + ("'O" . [?Ó]) + ("'U" . [?Ú]) + ("'Y" . [?Ý]) + ("'a" . [?á]) + ("'e" . [?é]) + ("'i" . [?í]) + ("'o" . [?ó]) + ("'u" . [?ú]) + ("'y" . [?ý]) + ("*$" . [?¤]) + ("$" . [?¤]) + ("*+" . [?±]) + ("+" . [?±]) + (",," . [?¸]) + (",C" . [?Ç]) + (",c" . [?ç]) + ("*-" . [?]) + ("-" . [?]) + ("*." . [?·]) + ("." . [?·]) + ("//" . [?÷]) + ("/A" . [?Å]) + ("/E" . [?Æ]) + ("/O" . [?Ø]) + ("/a" . [?å]) + ("/e" . [?æ]) + ("/o" . [?ø]) + ("1/2" . [?½]) + ("1/4" . [?¼]) + ("3/4" . [?¾]) + ("*<" . [?«]) + ("<" . [?«]) + ("*=" . [?¯]) + ("=" . [?¯]) + ("*>" . [?»]) + (">" . [?»]) + ("*?" . [?¿]) + ("?" . [?¿]) + ("*C" . [?©]) + ("C" . [?©]) + ("*L" . [?£]) + ("L" . [?£]) + ("*P" . [?¶]) + ("P" . [?¶]) + ("*R" . [?®]) + ("R" . [?®]) + ("*S" . [?§]) + ("S" . [?§]) + ("*Y" . [?¥]) + ("Y" . [?¥]) + ("^1" . [?¹]) + ("^2" . [?²]) + ("^3" . [?³]) + ("^A" . [?Â]) + ("^E" . [?Ê]) + ("^I" . [?Î]) + ("^O" . [?Ô]) + ("^U" . [?Û]) + ("^a" . [?â]) + ("^e" . [?ê]) + ("^i" . [?î]) + ("^o" . [?ô]) + ("^u" . [?û]) + ("_a" . [?ª]) + ("_o" . [?º]) + ("`A" . [?À]) + ("`E" . [?È]) + ("`I" . [?Ì]) + ("`O" . [?Ò]) + ("`U" . [?Ù]) + ("`a" . [?à]) + ("`e" . [?è]) + ("`i" . [?ì]) + ("`o" . [?ò]) + ("`u" . [?ù]) + ("*c" . [?¢]) + ("c" . [?¢]) + ("*o" . [?°]) + ("o" . [?°]) + ("*u" . [?µ]) + ("u" . [?µ]) + ("*m" . [?µ]) + ("m" . [?µ]) + ("*x" . [?×]) + ("x" . [?×]) + ("*|" . [?¦]) + ("|" . [?¦]) + ("~A" . [?Ã]) + ("~D" . [?Ð]) + ("~N" . [?Ñ]) + ("~O" . [?Õ]) + ("~T" . [?Þ]) + ("~a" . [?ã]) + ("~d" . [?ð]) + ("~n" . [?ñ]) + ("~o" . [?õ]) + ("~t" . [?þ]) + ("~~" . [?¬]) ("' " . "'") ("` " . "`") ("\" " . "\"") @@ -205,37 +205,37 @@ sequence VECTOR. (VECTOR is normally one character long.)") ;; Language-specific translation lists. (defvar iso-transl-language-alist '(("Esperanto" - ("C" . [?�]) - ("G" . [?�]) - ("H" . [?�]) - ("J" . [?�]) - ("S" . [?�]) - ("U" . [?�]) - ("c" . [?�]) - ("g" . [?�]) - ("h" . [?�]) - ("j" . [?�]) - ("s" . [?�]) - ("u" . [?�])) + ("C" . [?Æ]) + ("G" . [?Ø]) + ("H" . [?¦]) + ("J" . [?¬]) + ("S" . [?Þ]) + ("U" . [?Ý]) + ("c" . [?æ]) + ("g" . [?ø]) + ("h" . [?¶]) + ("j" . [?¼]) + ("s" . [?þ]) + ("u" . [?ý])) ("French" - ("C" . [?�]) - ("c" . [?�])) + ("C" . [?Ç]) + ("c" . [?ç])) ("German" - ("A" . [?�]) - ("O" . [?�]) - ("U" . [?�]) - ("a" . [?�]) - ("o" . [?�]) - ("s" . [?�]) - ("u" . [?�])) + ("A" . [?Ä]) + ("O" . [?Ö]) + ("U" . [?Ü]) + ("a" . [?ä]) + ("o" . [?ö]) + ("s" . [?ß]) + ("u" . [?ü])) ("Portuguese" - ("C" . [?�]) - ("c" . [?�])) + ("C" . [?Ç]) + ("c" . [?ç])) ("Spanish" - ("!" . [?�]) - ("?" . [?�]) - ("N" . [?�]) - ("n" . [?�])))) + ("!" . [?¡]) + ("?" . [?¿]) + ("N" . [?Ñ]) + ("n" . [?ñ])))) (defvar iso-transl-ctl-x-8-map nil "Keymap for C-x 8 prefix.") diff --git a/lisp/language/romanian.el b/lisp/language/romanian.el index 98eff2a7db..608ff81192 100644 --- a/lisp/language/romanian.el +++ b/lisp/language/romanian.el @@ -1,4 +1,4 @@ -;;; romanian.el --- support for Romanian -*- coding: iso-latin-2 -*- +;;; romanian.el --- support for Romanian -*- coding: utf-8 -*- ;; Copyright (C) 1998, 2001-2013 Free Software Foundation, Inc. @@ -34,7 +34,7 @@ (input-method . "latin-2-postfix") (unibyte-display . iso-8859-2) (tutorial . "TUTORIAL.ro") - (sample-text . "Bun� ziua, bine a�i venit!") + (sample-text . "Bună ziua, bine aţi venit!") (documentation . "Romanian environment using Latin-2 encoding. An environment for generic Latin-10 encoding is also available.")) '("European")) diff --git a/lisp/mh-e/ChangeLog.1 b/lisp/mh-e/ChangeLog.1 index 07320246c4..e57911947b 100644 --- a/lisp/mh-e/ChangeLog.1 +++ b/lisp/mh-e/ChangeLog.1 @@ -5114,7 +5114,7 @@ (mail-abbrevs): Declare it in XEmacs. (mh-alias-add-alias-to-file): Remove unused code. -2003-02-14 Ville Skytt� <[email protected]> +2003-02-14 Ville Skyttä <[email protected]> * mh-comp.el: Add autoloaded auto-mode-alist association. @@ -11416,3 +11416,7 @@ You should have received a copy of the GNU General Public License along with GNU Emacs. If not, see <http://www.gnu.org/licenses/>. + +;; Local Variables: +;; coding: utf-8 +;; End: diff --git a/lisp/net/eudc-bob.el b/lisp/net/eudc-bob.el index 45f15b14a5..106aab2ac0 100644 --- a/lisp/net/eudc-bob.el +++ b/lisp/net/eudc-bob.el @@ -1,9 +1,9 @@ -;;; eudc-bob.el --- Binary Objects Support for EUDC +;;; eudc-bob.el --- Binary Objects Support for EUDC -*- coding: utf-8 -*- ;; Copyright (C) 1999-2013 Free Software Foundation, Inc. ;; Author: Oscar Figueiredo <[email protected]> -;; Maintainer: Pavel Jan�k <[email protected]> +;; Maintainer: Pavel Janík <[email protected]> ;; Keywords: comm ;; Package: eudc diff --git a/lisp/net/eudc-export.el b/lisp/net/eudc-export.el index 690a5f15c4..b43a8c631e 100644 --- a/lisp/net/eudc-export.el +++ b/lisp/net/eudc-export.el @@ -1,9 +1,9 @@ -;;; eudc-export.el --- functions to export EUDC query results +;;; eudc-export.el --- functions to export EUDC query results -*- coding: utf-8 -*- ;; Copyright (C) 1998-2013 Free Software Foundation, Inc. ;; Author: Oscar Figueiredo <[email protected]> -;; Maintainer: Pavel Jan�k <[email protected]> +;; Maintainer: Pavel Janík <[email protected]> ;; Keywords: comm ;; Package: eudc diff --git a/lisp/net/eudc-hotlist.el b/lisp/net/eudc-hotlist.el index 0322fa766f..a8a51b7d61 100644 --- a/lisp/net/eudc-hotlist.el +++ b/lisp/net/eudc-hotlist.el @@ -1,9 +1,9 @@ -;;; eudc-hotlist.el --- hotlist management for EUDC +;;; eudc-hotlist.el --- hotlist management for EUDC -*- coding: utf-8 -*- ;; Copyright (C) 1998-2013 Free Software Foundation, Inc. ;; Author: Oscar Figueiredo <[email protected]> -;; Maintainer: Pavel Jan�k <[email protected]> +;; Maintainer: Pavel Janík <[email protected]> ;; Keywords: comm ;; Package: eudc diff --git a/lisp/net/eudc-vars.el b/lisp/net/eudc-vars.el index c2cc015415..d53fd83eee 100644 --- a/lisp/net/eudc-vars.el +++ b/lisp/net/eudc-vars.el @@ -1,9 +1,9 @@ -;;; eudc-vars.el --- Emacs Unified Directory Client +;;; eudc-vars.el --- Emacs Unified Directory Client -*- coding: utf-8 -*- ;; Copyright (C) 1998-2013 Free Software Foundation, Inc. ;; Author: Oscar Figueiredo <[email protected]> -;; Maintainer: Pavel Jan�k <[email protected]> +;; Maintainer: Pavel Janík <[email protected]> ;; Keywords: comm ;; Package: eudc diff --git a/lisp/net/eudc.el b/lisp/net/eudc.el index 621b9b9087..ef09267f85 100644 --- a/lisp/net/eudc.el +++ b/lisp/net/eudc.el @@ -1,9 +1,9 @@ -;;; eudc.el --- Emacs Unified Directory Client +;;; eudc.el --- Emacs Unified Directory Client -*- coding: utf-8 -*- ;; Copyright (C) 1998-2013 Free Software Foundation, Inc. ;; Author: Oscar Figueiredo <[email protected]> -;; Maintainer: Pavel Jan�k <[email protected]> +;; Maintainer: Pavel Janík <[email protected]> ;; Keywords: comm ;; This file is part of GNU Emacs. diff --git a/lisp/net/eudcb-bbdb.el b/lisp/net/eudcb-bbdb.el index 58d9462248..9f6dba703b 100644 --- a/lisp/net/eudcb-bbdb.el +++ b/lisp/net/eudcb-bbdb.el @@ -1,9 +1,9 @@ -;;; eudcb-bbdb.el --- Emacs Unified Directory Client - BBDB Backend +;;; eudcb-bbdb.el --- Emacs Unified Directory Client - BBDB Backend -*- coding: utf-8 -*- ;; Copyright (C) 1998-2013 Free Software Foundation, Inc. ;; Author: Oscar Figueiredo <[email protected]> -;; Maintainer: Pavel Jan�k <[email protected]> +;; Maintainer: Pavel Janík <[email protected]> ;; Keywords: comm ;; Package: eudc diff --git a/lisp/net/eudcb-ldap.el b/lisp/net/eudcb-ldap.el index 23eed4b3c0..d0ba47ad75 100644 --- a/lisp/net/eudcb-ldap.el +++ b/lisp/net/eudcb-ldap.el @@ -1,9 +1,9 @@ -;;; eudcb-ldap.el --- Emacs Unified Directory Client - LDAP Backend +;;; eudcb-ldap.el --- Emacs Unified Directory Client - LDAP Backend -*- coding: utf-8 -*- ;; Copyright (C) 1998-2013 Free Software Foundation, Inc. ;; Author: Oscar Figueiredo <[email protected]> -;; Maintainer: Pavel Jan�k <[email protected]> +;; Maintainer: Pavel Janík <[email protected]> ;; Keywords: comm ;; Package: eudc diff --git a/lisp/net/eudcb-ph.el b/lisp/net/eudcb-ph.el index 3033e945c2..1796f2d980 100644 --- a/lisp/net/eudcb-ph.el +++ b/lisp/net/eudcb-ph.el @@ -1,9 +1,9 @@ -;;; eudcb-ph.el --- Emacs Unified Directory Client - CCSO PH/QI Backend +;;; eudcb-ph.el --- Emacs Unified Directory Client - CCSO PH/QI Backend -*- coding: utf-8 -*- ;; Copyright (C) 1998-2013 Free Software Foundation, Inc. ;; Author: Oscar Figueiredo <[email protected]> -;; Maintainer: Pavel Jan�k <[email protected]> +;; Maintainer: Pavel Janík <[email protected]> ;; Keywords: comm ;; Package: eudc diff --git a/lisp/obsolete/iso-insert.el b/lisp/obsolete/iso-insert.el index 18cf87a4c6..2c0adf32d1 100644 --- a/lisp/obsolete/iso-insert.el +++ b/lisp/obsolete/iso-insert.el @@ -1,4 +1,4 @@ -;;; iso-insert.el --- insert functions for ISO 8859/1 -*- coding: iso-8859-1;-*- +;;; iso-insert.el --- insert functions for ISO 8859/1 -*- coding: utf-8;-*- ;; Copyright (C) 1987, 1994, 2001-2013 Free Software Foundation, Inc. @@ -31,482 +31,482 @@ (defun insert-no-break-space () (interactive "*") - (insert ?\�) + (insert ?\ ) ) (defun insert-inverted-exclamation-mark () (interactive "*") - (insert ?\�) + (insert ?\¡) ) (defun insert-cent-sign () (interactive "*") - (insert ?\�) + (insert ?\¢) ) (defun insert-pound-sign () (interactive "*") - (insert ?\�) + (insert ?\£) ) (defun insert-general-currency-sign () (interactive "*") - (insert ?\�) + (insert ?\¤) ) (defun insert-yen-sign () (interactive "*") - (insert ?\�) + (insert ?\¥) ) (defun insert-broken-vertical-line () (interactive "*") - (insert ?\�) + (insert ?\¦) ) (defun insert-section-sign () (interactive "*") - (insert ?\�) + (insert ?\§) ) (defun insert-diaeresis () (interactive "*") - (insert ?\�) + (insert ?\¨) ) (defun insert-copyright-sign () (interactive "*") - (insert ?\�) + (insert ?\©) ) (defun insert-ordinal-indicator-feminine () (interactive "*") - (insert ?\�) + (insert ?\ª) ) (defun insert-angle-quotation-mark-left () (interactive "*") - (insert ?\�) + (insert ?\«) ) (defun insert-not-sign () (interactive "*") - (insert ?\�) + (insert ?\¬) ) (defun insert-soft-hyphen () (interactive "*") - (insert ?\�) + (insert ?\) ) (defun insert-registered-sign () (interactive "*") - (insert ?\�) + (insert ?\®) ) (defun insert-macron () (interactive "*") - (insert ?\�) + (insert ?\¯) ) (defun insert-degree-sign () (interactive "*") - (insert ?\�) + (insert ?\°) ) (defun insert-plus-or-minus-sign () (interactive "*") - (insert ?\�) + (insert ?\±) ) (defun insert-superscript-two () (interactive "*") - (insert ?\�) + (insert ?\²) ) (defun insert-superscript-three () (interactive "*") - (insert ?\�) + (insert ?\³) ) (defun insert-acute-accent () (interactive "*") - (insert ?\�) + (insert ?\´) ) (defun insert-micro-sign () (interactive "*") - (insert ?\�) + (insert ?\µ) ) (defun insert-pilcrow () (interactive "*") - (insert ?\�) + (insert ?\¶) ) (defun insert-middle-dot () (interactive "*") - (insert ?\�) + (insert ?\·) ) (defun insert-cedilla () (interactive "*") - (insert ?\�) + (insert ?\¸) ) (defun insert-superscript-one () (interactive "*") - (insert ?\�) + (insert ?\¹) ) (defun insert-ordinal-indicator-masculine () (interactive "*") - (insert ?\�) + (insert ?\º) ) (defun insert-angle-quotation-mark-right () (interactive "*") - (insert ?\�) + (insert ?\») ) (defun insert-fraction-one-quarter () (interactive "*") - (insert ?\�) + (insert ?\¼) ) (defun insert-fraction-one-half () (interactive "*") - (insert ?\�) + (insert ?\½) ) (defun insert-fraction-three-quarters () (interactive "*") - (insert ?\�) + (insert ?\¾) ) (defun insert-inverted-question-mark () (interactive "*") - (insert ?\�) + (insert ?\¿) ) (defun insert-A-grave () (interactive "*") - (insert ?\�) + (insert ?\À) ) (defun insert-A-acute () (interactive "*") - (insert ?\�) + (insert ?\Á) ) (defun insert-A-circumflex () (interactive "*") - (insert ?\�) + (insert ?\Â) ) (defun insert-A-tilde () (interactive "*") - (insert ?\�) + (insert ?\Ã) ) (defun insert-A-umlaut () (interactive "*") - (insert ?\�) + (insert ?\Ä) ) (defun insert-A-ring () (interactive "*") - (insert ?\�) + (insert ?\Å) ) (defun insert-AE () (interactive "*") - (insert ?\�) + (insert ?\Æ) ) (defun insert-C-cedilla () (interactive "*") - (insert ?\�) + (insert ?\Ç) ) (defun insert-E-grave () (interactive "*") - (insert ?\�) + (insert ?\È) ) (defun insert-E-acute () (interactive "*") - (insert ?\�) + (insert ?\É) ) (defun insert-E-circumflex () (interactive "*") - (insert ?\�) + (insert ?\Ê) ) (defun insert-E-umlaut () (interactive "*") - (insert ?\�) + (insert ?\Ë) ) (defun insert-I-grave () (interactive "*") - (insert ?\�) + (insert ?\Ì) ) (defun insert-I-acute () (interactive "*") - (insert ?\�) + (insert ?\Í) ) (defun insert-I-circumflex () (interactive "*") - (insert ?\�) + (insert ?\Î) ) (defun insert-I-umlaut () (interactive "*") - (insert ?\�) + (insert ?\Ï) ) (defun insert-D-stroke () (interactive "*") - (insert ?\�) + (insert ?\Ð) ) (defun insert-N-tilde () (interactive "*") - (insert ?\�) + (insert ?\Ñ) ) (defun insert-O-grave () (interactive "*") - (insert ?\�) + (insert ?\Ò) ) (defun insert-O-acute () (interactive "*") - (insert ?\�) + (insert ?\Ó) ) (defun insert-O-circumflex () (interactive "*") - (insert ?\�) + (insert ?\Ô) ) (defun insert-O-tilde () (interactive "*") - (insert ?\�) + (insert ?\Õ) ) (defun insert-O-umlaut () (interactive "*") - (insert ?\�) + (insert ?\Ö) ) (defun insert-multiplication-sign () (interactive "*") - (insert ?\�) + (insert ?\×) ) (defun insert-O-slash () (interactive "*") - (insert ?\�) + (insert ?\Ø) ) (defun insert-U-grave () (interactive "*") - (insert ?\�) + (insert ?\Ù) ) (defun insert-U-acute () (interactive "*") - (insert ?\�) + (insert ?\Ú) ) (defun insert-U-circumflex () (interactive "*") - (insert ?\�) + (insert ?\Û) ) (defun insert-U-umlaut () (interactive "*") - (insert ?\�) + (insert ?\Ü) ) (defun insert-Y-acute () (interactive "*") - (insert ?\�) + (insert ?\Ý) ) (defun insert-THORN () (interactive "*") - (insert ?\�) + (insert ?\Þ) ) (defun insert-ss () (interactive "*") - (insert ?\�) + (insert ?\ß) ) (defun insert-a-grave () (interactive "*") - (insert ?\�) + (insert ?\à) ) (defun insert-a-acute () (interactive "*") - (insert ?\�) + (insert ?\á) ) (defun insert-a-circumflex () (interactive "*") - (insert ?\�) + (insert ?\â) ) (defun insert-a-tilde () (interactive "*") - (insert ?\�) + (insert ?\ã) ) (defun insert-a-umlaut () (interactive "*") - (insert ?\�) + (insert ?\ä) ) (defun insert-a-ring () (interactive "*") - (insert ?\�) + (insert ?\å) ) (defun insert-ae () (interactive "*") - (insert ?\�) + (insert ?\æ) ) (defun insert-c-cedilla () (interactive "*") - (insert ?\�) + (insert ?\ç) ) (defun insert-e-grave () (interactive "*") - (insert ?\�) + (insert ?\è) ) (defun insert-e-acute () (interactive "*") - (insert ?\�) + (insert ?\é) ) (defun insert-e-circumflex () (interactive "*") - (insert ?\�) + (insert ?\ê) ) (defun insert-e-umlaut () (interactive "*") - (insert ?\�) + (insert ?\ë) ) (defun insert-i-grave () (interactive "*") - (insert ?\�) + (insert ?\ì) ) (defun insert-i-acute () (interactive "*") - (insert ?\�) + (insert ?\í) ) (defun insert-i-circumflex () (interactive "*") - (insert ?\�) + (insert ?\î) ) (defun insert-i-umlaut () (interactive "*") - (insert ?\�) + (insert ?\ï) ) (defun insert-d-stroke () (interactive "*") - (insert ?\�) + (insert ?\ð) ) (defun insert-n-tilde () (interactive "*") - (insert ?\�) + (insert ?\ñ) ) (defun insert-o-grave () (interactive "*") - (insert ?\�) + (insert ?\ò) ) (defun insert-o-acute () (interactive "*") - (insert ?\�) + (insert ?\ó) ) (defun insert-o-circumflex () (interactive "*") - (insert ?\�) + (insert ?\ô) ) (defun insert-o-tilde () (interactive "*") - (insert ?\�) + (insert ?\õ) ) (defun insert-o-umlaut () (interactive "*") - (insert ?\�) + (insert ?\ö) ) (defun insert-division-sign () (interactive "*") - (insert ?\�) + (insert ?\÷) ) (defun insert-o-slash () (interactive "*") - (insert ?\�) + (insert ?\ø) ) (defun insert-u-grave () (interactive "*") - (insert ?\�) + (insert ?\ù) ) (defun insert-u-acute () (interactive "*") - (insert ?\�) + (insert ?\ú) ) (defun insert-u-circumflex () (interactive "*") - (insert ?\�) + (insert ?\û) ) (defun insert-u-umlaut () (interactive "*") - (insert ?\�) + (insert ?\ü) ) (defun insert-y-acute () (interactive "*") - (insert ?\�) + (insert ?\ý) ) (defun insert-thorn () (interactive "*") - (insert ?\�) + (insert ?\þ) ) (defun insert-y-umlaut () (interactive "*") - (insert ?\�) + (insert ?\ÿ) ) (defvar 8859-1-map nil "Keymap for ISO 8859/1 character insertion.") diff --git a/lisp/org/org-freemind.el b/lisp/org/org-freemind.el index c33b70224f..3b1c6863f5 100644 --- a/lisp/org/org-freemind.el +++ b/lisp/org/org-freemind.el @@ -275,7 +275,7 @@ will also unescape &#nn;." ))) org-str)))) -;; (let* ((str1 "a quote: \", an amp: &, lt: <; over 256: ������") +;; (let* ((str1 "a quote: \", an amp: &, lt: <; over 256: öåäÖÅÄ") ;; (str2 (org-freemind-escape-str-from-org str1)) ;; (str3 (org-freemind-unescape-str-to-org str2))) ;; (unless (string= str1 str3) @@ -1221,6 +1221,7 @@ PATH should be a list of steps, where each step has the form ;; Local variables: ;; generated-autoload-file: "org-loaddefs.el" +;; coding: utf-8 ;; End: ;;; org-freemind.el ends here diff --git a/lisp/play/bubbles.el b/lisp/play/bubbles.el index 10493093aa..665e98a69b 100644 --- a/lisp/play/bubbles.el +++ b/lisp/play/bubbles.el @@ -1,4 +1,4 @@ -;;; bubbles.el --- Puzzle game for Emacs +;;; bubbles.el --- Puzzle game for Emacs -*- coding: utf-8 -*- ;; Copyright (C) 2007-2013 Free Software Foundation, Inc. @@ -198,7 +198,7 @@ types are present." :group 'bubbles) (defcustom bubbles-chars - '(?+ ?O ?# ?X ?. ?* ?& ?�) + '(?+ ?O ?# ?X ?. ?* ?& ?§) "Characters used for bubbles. Note that the actual number of different bubbles is determined by the number of colors, see `bubbles-colors'." diff --git a/lisp/play/handwrite.el b/lisp/play/handwrite.el index de6c198092..63b09895e8 100644 --- a/lisp/play/handwrite.el +++ b/lisp/play/handwrite.el @@ -1,4 +1,4 @@ -;;; handwrite.el --- turns your emacs buffer into a handwritten document -*- coding: iso-latin-1; -*- +;;; handwrite.el --- turns your emacs buffer into a handwritten document -*- coding: utf-8; -*- ;; Copyright (C) 1996, 2001-2013 Free Software Foundation, Inc. @@ -170,15 +170,15 @@ Variables: `handwrite-linespace' (default 12) (textp) (ps-buf-name) ;name of the PostScript buffer (trans-table - '(("�" . "264") ("�" . "207") ("�" . "210") ("�" . "211") - ("�" . "212") ("�" . "213") ("�" . "214") ("�" . "216") - ("�" . "217") ("�" . "220") ("�" . "221") ("�" . "222") - ("�" . "223") ("�" . "224") ("�" . "225") ("�" . "227") - ("�" . "230") ("�" . "231") ("�" . "232") ("�" . "233") - ("�" . "234") ("�" . "235") ("�" . "236") ("�" . "237") - ("�" . "247") ("�" . "241") ("�" . "250") ("�" . "251") - ("ij" . "264") ("�" . "215") ("�" . "244") ("�" . "226") - ("�" . "243"))) + '(("ÿ" . "264") ("á" . "207") ("à" . "210") ("â" . "211") + ("ä" . "212") ("ã" . "213") ("å" . "214") ("é" . "216") + ("è" . "217") ("ê" . "220") ("ë" . "221") ("í" . "222") + ("ì" . "223") ("î" . "224") ("ï" . "225") ("ó" . "227") + ("ò" . "230") ("ô" . "231") ("ö" . "232") ("õ" . "233") + ("ú" . "234") ("ù" . "235") ("û" . "236") ("ü" . "237") + ("ß" . "247") ("°" . "241") ("®" . "250") ("©" . "251") + ("ij" . "264") ("ç" . "215") ("§" . "244") ("ñ" . "226") + ("£" . "243"))) (escape-table '("\\\\" "(" ")")) ; \\ comes first to not work ; on inserted backslashes line) diff --git a/lisp/progmodes/cc-engine.el b/lisp/progmodes/cc-engine.el index 977bc755e3..368b1fc50d 100644 --- a/lisp/progmodes/cc-engine.el +++ b/lisp/progmodes/cc-engine.el @@ -1,4 +1,4 @@ -;;; cc-engine.el --- core syntax guessing engine for CC mode +;;; cc-engine.el --- core syntax guessing engine for CC mode -*- coding: utf-8 -*- ;; Copyright (C) 1985, 1987, 1992-2013 Free Software Foundation, Inc. @@ -2280,25 +2280,25 @@ comment at the start of cc-engine.el for more info." (while (and c (> (car c) c-state-semi-nonlit-pos-cache-limit)) (setq c (cdr c))) (setq c-state-semi-nonlit-pos-cache c) - + (while (and c (> (car c) here)) (setq high-pos (car c)) (setq c (cdr c))) (setq pos (or (car c) (point-min))) - + (unless high-pos (while ;; Add an element to `c-state-semi-nonlit-pos-cache' each iteration. (and (<= (setq npos (+ pos c-state-nonlit-pos-interval)) here) - + ;; Test for being in a literal. If so, go to after it. (progn (setq lit (car (cddr (c-state-pp-to-literal pos npos)))) (or (null lit) (prog1 (<= (cdr lit) here) (setq npos (cdr lit)))))) - + (setq pos npos) (setq c-state-semi-nonlit-pos-cache (cons pos c-state-semi-nonlit-pos-cache)))) @@ -2606,11 +2606,11 @@ comment at the start of cc-engine.el for more info." ;; OLD: { (.) {...........} ;; ^ ^ ;; FROM HERE - ;; + ;; ;; NEW: { {....} (.) {......... ;; ^ ^ ^ ;; LOWER BRACE PAIR HERE or HERE - ;; + ;; ;; This routine should be fast. Since it can get called a LOT, we maintain ;; `c-state-brace-pair-desert', a small cache of "failures", such that we ;; reduce the time wasted in repeated fruitless searches in brace deserts. @@ -2907,7 +2907,7 @@ comment at the start of cc-engine.el for more info." start-point)) (goto-char pos) (while (and c-state-cache - (or (numberp (car c-state-cache)) ; Have we a { at all? + (or (numberp (car c-state-cache)) ; Have we a { at all? (cdr c-state-cache)) (< (point) here)) (cond @@ -4610,7 +4610,7 @@ comment at the start of cc-engine.el for more info." s ; state 'syntax-table))) ; stop-comment (setq pos (point))) - + ;; Now try and find enough non-literal characters recorded on the stack. ;; Go back one recorded literal each time round this loop. (while (and (< count how-far-back) @@ -8516,8 +8516,8 @@ comment at the start of cc-engine.el for more info." )) (defun c-looking-at-special-brace-list (&optional lim) - ;; If we're looking at the start of a pike-style list, ie `({�})', - ;; `([�])', `(<�>)' etc, a cons of a cons of its starting and ending + ;; If we're looking at the start of a pike-style list, i.e., `({ })', + ;; `([ ])', `(< >)', etc., a cons of a cons of its starting and ending ;; positions and its entry in c-special-brace-lists is returned, nil ;; otherwise. The ending position is nil if the list is still open. ;; LIM is the limit for forward search. The point may either be at @@ -8762,7 +8762,7 @@ comment at the start of cc-engine.el for more info." (c-simple-skip-symbol-backward) (looking-at c-macro-with-semi-re) (goto-char pos) - (not (c-in-literal)))))) ; The most expensive check last. + (not (c-in-literal)))))) ; The most expensive check last. (defun c-macro-vsemi-status-unknown-p () t) ; See cc-defs.el. diff --git a/lisp/progmodes/cc-langs.el b/lisp/progmodes/cc-langs.el index 0d5549e444..ba9c42e4c8 100644 --- a/lisp/progmodes/cc-langs.el +++ b/lisp/progmodes/cc-langs.el @@ -1,4 +1,4 @@ -;;; cc-langs.el --- language specific settings for CC Mode +;;; cc-langs.el --- language specific settings for CC Mode -*- coding: utf-8 -*- ;; Copyright (C) 1985, 1987, 1992-2013 Free Software Foundation, Inc. @@ -2907,7 +2907,7 @@ is in effect or not." (c-lang-defconst c-special-brace-lists "List of open- and close-chars that makes up a pike-style brace list, -i.e. for a ([�]) list there should be a cons (?\\[ . ?\\]) in this +i.e. for a ([ ]) list there should be a cons (?\\[ . ?\\]) in this list." t nil pike '((?{ . ?}) (?\[ . ?\]) (?< . ?>))) diff --git a/lisp/progmodes/hideshow.el b/lisp/progmodes/hideshow.el index fbd1ded35a..fc753bf726 100644 --- a/lisp/progmodes/hideshow.el +++ b/lisp/progmodes/hideshow.el @@ -1,4 +1,4 @@ -;;; hideshow.el --- minor mode cmds to selectively display code/comment blocks +;;; hideshow.el --- minor mode cmds to selectively display code/comment blocks -*- coding: utf-8 -*- ;; Copyright (C) 1994-2013 Free Software Foundation, Inc. @@ -207,7 +207,7 @@ ;; Dean Andrews, Alf-Ivar Holm, Holger Bauer, Christoph Conrad, Dave Love, ;; Dirk Herrmann, Gael Marziou, Jan Djarv, Guillaume Leray, Moody Ahmad, ;; Preston F. Crow, Lars Lindberg, Reto Zimmermann, Keith Sheffield, -;; Chew Meng Kuan, Tony Lam, Pete Ware, Fran�ois Pinard, Stefan Monnier, +;; Chew Meng Kuan, Tony Lam, Pete Ware, François Pinard, Stefan Monnier, ;; Joseph Eydelnant, Michael Ernst, Peter Heslin ;; ;; Special thanks go to Dan Nicolaescu, who reimplemented hideshow using diff --git a/lisp/progmodes/prolog.el b/lisp/progmodes/prolog.el index 460dcd6944..85e4172c8f 100644 --- a/lisp/progmodes/prolog.el +++ b/lisp/progmodes/prolog.el @@ -1,9 +1,9 @@ -;;; prolog.el --- major mode for editing and running Prolog (and Mercury) code +;;; prolog.el --- major mode for Prolog (and Mercury) -*- coding: utf-8 -*- ;; Copyright (C) 1986-1987, 1997-1999, 2002-2003, 2011-2013 Free ;; Software Foundation, Inc. -;; Authors: Emil �str�m <emil_astrom(at)hotmail(dot)com> +;; Authors: Emil Åström <emil_astrom(at)hotmail(dot)com> ;; Milan Zamazal <pdm(at)freesoft(dot)cz> ;; Stefan Bruda <stefan(at)bruda(dot)ca> ;; * See below for more details @@ -31,7 +31,7 @@ ;; Original author: Masanobu UMEDA <umerin(at)mse(dot)kyutech(dot)ac(dot)jp> ;; Parts of this file was taken from a modified version of the original ;; by Johan Andersson, Peter Olin, Mats Carlsson, Johan Bevemyr, Stefan -;; Andersson, and Per Danielsson (all SICS people), and Henrik B�kman +;; Andersson, and Per Danielsson (all SICS people), and Henrik Båkman ;; at Uppsala University, Sweden. ;; ;; Some ideas and also a few lines of code have been borrowed (not stolen ;-) diff --git a/lisp/progmodes/sh-script.el b/lisp/progmodes/sh-script.el index da30edf272..8f1954402e 100644 --- a/lisp/progmodes/sh-script.el +++ b/lisp/progmodes/sh-script.el @@ -1842,7 +1842,7 @@ May return nil if the line should not be treated as continued." ;; (defconst sh-smie-csh-grammar ;; (smie-prec2->grammar ;; (smie-bnf->prec2 -;; '((exp) ;A constant, or a $var, or a sequence of them… +;; '((exp) ;A constant, or a $var, or a sequence of them... ;; (elseifcmd (cmd) ;; (cmd "else" "else-if" exp "then" elseifcmd)) ;; (cmd ("switch" branches "endsw") diff --git a/lisp/ruler-mode.el b/lisp/ruler-mode.el index 08c4ba5190..009bb11fc1 100644 --- a/lisp/ruler-mode.el +++ b/lisp/ruler-mode.el @@ -137,8 +137,8 @@ or remove a tab stop. \\[ruler-mode-toggle-show-tab-stops] or (format "Invalid character value: %S" value)) widget)))) -(defcustom ruler-mode-fill-column-char (if (char-displayable-p ?�) - ?\� +(defcustom ruler-mode-fill-column-char (if (char-displayable-p ?¶) + ?\¶ ?\|) "Character used at the `fill-column' location." :group 'ruler-mode @@ -163,8 +163,8 @@ or remove a tab stop. \\[ruler-mode-toggle-show-tab-stops] or (integer :tag "Integer char value" :validate ruler-mode-character-validate))) -(defcustom ruler-mode-current-column-char (if (char-displayable-p ?�) - ?\� +(defcustom ruler-mode-current-column-char (if (char-displayable-p ?¦) + ?\¦ ?\@) "Character used at the `current-column' location." :group 'ruler-mode @@ -774,7 +774,7 @@ Optional argument PROPS specifies other text properties to apply." (provide 'ruler-mode) ;; Local Variables: -;; coding: iso-latin-1 +;; coding: utf-8 ;; End: ;;; ruler-mode.el ends here diff --git a/lisp/textmodes/conf-mode.el b/lisp/textmodes/conf-mode.el index 93ff179229..67f2d96d00 100644 --- a/lisp/textmodes/conf-mode.el +++ b/lisp/textmodes/conf-mode.el @@ -1,4 +1,4 @@ -;;; conf-mode.el --- Simple major mode for editing conf/ini/properties files +;;; conf-mode.el --- Simple major mode for editing conf/ini/properties files -*- coding: utf-8 -*- ;; Copyright (C) 2004-2013 Free Software Foundation, Inc. @@ -23,7 +23,7 @@ ;;; Commentary: ;; ;; This mode is designed to edit many similar varieties of Conf/Ini files and -;; Java properties. It started out from Aur�lien Tisn�'s ini-mode. +;; Java properties. It started out from Aurélien Tisné's ini-mode. ;; `conf-space-keywords' were inspired by Robert Fitzgerald's any-ini-mode. diff --git a/lisp/textmodes/po.el b/lisp/textmodes/po.el index 331f220f95..610227af79 100644 --- a/lisp/textmodes/po.el +++ b/lisp/textmodes/po.el @@ -1,8 +1,8 @@ -;;; po.el --- basic support of PO translation files -*- coding: latin-1; -*- +;;; po.el --- basic support of PO translation files -*- coding: utf-8; -*- ;; Copyright (C) 1995-1998, 2000-2013 Free Software Foundation, Inc. -;; Authors: Fran�ois Pinard <[email protected]>, +;; Authors: François Pinard <[email protected]>, ;; Greg McGary <[email protected]>, ;; Bruno Haible <[email protected]>. ;; Keywords: i18n, files diff --git a/lisp/textmodes/tildify.el b/lisp/textmodes/tildify.el index 3ba19bb9f4..f25fa87d0e 100644 --- a/lisp/textmodes/tildify.el +++ b/lisp/textmodes/tildify.el @@ -40,7 +40,7 @@ ;; The default variable settings are suited for Czech, so do not try to ;; understand them if you are not familiar with Czech grammar and spelling. ;; -;; The algorithm was inspired by Petr Ol��k's program `vlna'. Abilities of +;; The algorithm was inspired by Petr Olšák's program `vlna'. Abilities of ;; `tildify.el' are a little limited; if you have improvement suggestions, let ;; me know. @@ -349,7 +349,7 @@ further questions)." ;; Local variables: -;; coding: iso-latin-2 +;; coding: utf-8 ;; End: ;;; tildify.el ends here diff --git a/lisp/wdired.el b/lisp/wdired.el index 59a09d6d5a..47cd99f45a 100644 --- a/lisp/wdired.el +++ b/lisp/wdired.el @@ -3,7 +3,7 @@ ;; Copyright (C) 2004-2013 Free Software Foundation, Inc. ;; Filename: wdired.el -;; Author: Juan Le�n Lahoz Garc�a <[email protected]> +;; Author: Juan León Lahoz García <[email protected]> ;; Version: 2.0 ;; Keywords: dired, environment, files, renaming @@ -851,7 +851,7 @@ Like original function but it skips read-only words." (provide 'wdired) ;; Local Variables: -;; coding: latin-1 +;; coding: utf-8 ;; byte-compile-dynamic: t ;; End: |