Mercurial > emacs
changeset 32298:f3d3118f2946
(morse-region, unmorse-region): Add autoload
cookie.
author | Dave Love <fx@gnu.org> |
---|---|
date | Sun, 08 Oct 2000 17:37:14 +0000 |
parents | 5a9159a46fe5 |
children | 4888d3b1cf29 |
files | lisp/play/morse.el |
diffstat | 1 files changed, 8 insertions(+), 0 deletions(-) [+] |
line wrap: on
line diff
--- 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 <rick_farnbach@MENTORG.COM> +;; 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")