New alias for windows-1252.

diff --git a/lisp/language/european.el b/lisp/language/european.el
index 5063ded3c654e02b09a05b818223ecb6a10e2587..fbac05274257ce00197ca77373f27b10d1c02065 100644 (file)
--- a/lisp/language/european.el
+++ b/lisp/language/european.el
@@ -77,6 +77,9 @@ Indonesian/Malay, Tagalog (Philippines), Swahili and Afrikaans."))
         ?\\e,AU\e(B ?\\e,AV\e(B ?\\e,AW\e(B ?\\e,AX\e(B ?\\e,AY\e(B ?\\e,AZ\e(B ?\\e,A[\e(B ?\\e,A\\e(B ?\\e,A]\e(B ?\\e,A^\e(B ?\\e,A_\e(B ?\\e,A`\e(B ?\\e,Aa\e(B ?\\e,Ab\e(B ?\\e,Ac\e(B ?\\e,Ad\e(B ?\\e,Ae\e(B
         ?\\e,Af\e(B ?\\e,Ag\e(B ?\\e,Ah\e(B ?\\e,Ai\e(B ?\\e,Aj\e(B ?\\e,Ak\e(B ?\\e,Al\e(B ?\\e,Am\e(B ?\\e,An\e(B ?\\e,Ao\e(B ?\\e,Ap\e(B ?\\e,Aq\e(B ?\\e,Ar\e(B ?\\e,As\e(B ?\\e,At\e(B ?\\e,Au\e(B ?\\e,Av\e(B
         ?\\e,Aw\e(B ?\\e,Ax\e(B ?\\e,Ay\e(B ?\\e,Az\e(B ?\\e,A{\e(B ?\\e,A|\e(B ?\\e,A}\e(B ?\\e,A~\e(B ?\\e,A\7f\e(B])))
+
+(define-coding-system-alias 'cp1252 'windows-1252)
+
 \f
 ;; Latin-2 (ISO-8859-2)