# HG changeset patch # User Dave Love # Date 971026634 0 # Node ID f3d3118f2946aff46b1527485e805b1a68c1ea24 # Parent 5a9159a46fe587893b03784314c9e36b8837bd53 (morse-region, unmorse-region): Add autoload cookie. diff -r 5a9159a46fe5 -r f3d3118f2946 lisp/play/morse.el --- a/lisp/play/morse.el Sun Oct 08 17:36:39 2000 +0000 +++ b/lisp/play/morse.el Sun Oct 08 17:37:14 2000 +0000 @@ -3,6 +3,7 @@ ;; Copyright (C) 1995 Free Software Foundation, Inc. ;; Author: Rick Farnbach +;; Keywords: games ;; This file is part of GNU Emacs. @@ -21,6 +22,11 @@ ;; Free Software Foundation, Inc., 59 Temple Place - Suite 330, ;; Boston, MA 02111-1307, USA. +;;; Commentary: + +;; Converts text to Morse code and back with M-x morese-region and +;; M-x unmorse-region (though Morse code is no longer official :-(). + ;;; Code: (defvar morse-code '(("a" . ".-") @@ -73,6 +79,7 @@ ("9" . "----.")) "Morse code character set.") +;;;###autoload (defun morse-region (beg end) "Convert all text in a given region to morse code." (interactive "r") @@ -95,6 +102,7 @@ (forward-char 1) (setq sep ""))))))) +;;;###autoload (defun unmorse-region (beg end) "Convert morse coded text in region to ordinary ASCII text." (interactive "r")