Fix Morse for non-ASCII letters

* lisp/play/morse.el (morse-code): Downcase letters in the table because they must match downcased input.
2021-06-17 11:18:46 +02:00 · 2021-06-17 11:18:46 +02:00 · ac73d77ced
commit ac73d77ced
parent 6af9f1f3ef
1 changed files with 10 additions and 11 deletions
--- a/lisp/play/morse.el
+++ b/lisp/play/morse.el
@ -79,17 +79,16 @@
 		     ("8" . "---..")
 		     ("9" . "----.")
 		     ;; Non-ASCII
-		     ("Ä" . ".-.-")
-		     ("Æ" . ".-.-")
-		     ("Á" . ".--.-")
-		     ("Å" . ".--.-")
-		     ;; ligature character?? ("Ch" . "----")
-		     ("ß" . ".../...")
-		     ("É" . "..-..")
-		     ("Ñ" . "--.--")
-		     ("Ö" . "---.")
-		     ("Ø" . "---.")
-		     ("Ü" . "..--")
+		     ("ä" . ".-.-")
+		     ("æ" . ".-.-")
+		     ("á" . ".--.-")
+		     ("å" . ".--.-")
+		     ("ß" . ".../...")  ; also ...--..
+		     ("é" . "..-..")
+		     ("ñ" . "--.--")
+		     ("ö" . "---.")
+		     ("ø" . "---.")
+		     ("ü" . "..--")
 		     ;; Recently standardized
 		     ("@" . ".--.-."))
  "Morse code character set.")