From: Simon Josefsson <jas@extundo.com>
Date: Thu, 21 Nov 2002 18:11:49 +0000 (+0000)
Subject: (morse-code): Add non-ASCII characters, according
X-Git-Tag: ttn-vms-21-2-B4~12309
X-Git-Url: http://git.eshelyaron.com/gitweb/?a=commitdiff_plain;h=4203c128a6cb57ab1c5e024131c4546d1a7dc5f1;p=emacs.git

(morse-code): Add non-ASCII characters, according
to table at http://www.soton.ac.uk/~scp93ch/morse/.
---

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 6134b9addc4..b2933d0ae4d 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
+2002-11-20  Simon Josefsson  <jas@extundo.com>
+
+	* play/morse.el (morse-code): Add non-ASCII characters, according
+	to table at http://www.soton.ac.uk/~scp93ch/morse/.
+
 2002-11-21  Richard M. Stallman  <rms@gnu.org>
 
 	* dired.el (dired-sort-inhibit): New variable.
diff --git a/lisp/play/morse.el b/lisp/play/morse.el
index db868de6325..e9ff8552cc2 100644
--- a/lisp/play/morse.el
+++ b/lisp/play/morse.el
@@ -1,6 +1,6 @@
-;;; morse.el --- convert text to morse code and back
+;;; morse.el --- convert text to morse code and back             -*- coding: utf-8 -*-
 
-;; Copyright (C) 1995 Free Software Foundation, Inc.
+;; Copyright (C) 1995, 2002 Free Software Foundation, Inc.
 
 ;; Author: Rick Farnbach <rick_farnbach@MENTORG.COM>
 ;; Keywords: games
@@ -76,7 +76,17 @@
 		     ("6" . "-....")
 		     ("7" . "--...")
 		     ("8" . "---..")
-		     ("9" . "----."))
+		     ("9" . "----.")
+		     ;; Non-ASCII
+		     ("Ä" . ".-.-")
+		     ("Á" . ".--.-")
+		     ("Å" . ".--.-")
+		     ;; ligature character?? ("Ch" . "----")
+		     ("ß" . ".../...")
+		     ("É" . "..-..")
+		     ("Ñ" . "--.--")
+		     ("Ö" . "---.")
+		     ("Ü" . "..--"))
   "Morse code character set.")
 
 ;;;###autoload