* lisp/play/morse.el (denato-region): Handle varying case.

Fixes: debbugs:8386
This commit is contained in:
Aaron S. Hawley 2011-04-06 20:27:15 -07:00 committed by Glenn Morris
parent 5fac70838c
commit eb237b0f7f
2 changed files with 5 additions and 1 deletions

View file

@ -1,3 +1,7 @@
2011-04-07 Aaron S. Hawley <aaron.s.hawley@gmail.com>
* play/morse.el (denato-region): Handle varying case. (Bug#8386)
2011-04-06 Chong Yidong <cyd@stupidchicken.com>
* emacs-lisp/cconv.el (cconv--analyse-use): Ignore "ignored" when

View file

@ -231,7 +231,7 @@ Geospatial-Intelligence Agency at http://www.nga.mil/")
(if (null (looking-at "[a-z]+"))
(forward-char 1)
(setq str (buffer-substring (match-beginning 0) (match-end 0)))
(if (null (setq nato (rassoc str nato-alphabet)))
(if (null (setq nato (rassoc (capitalize str) nato-alphabet)))
(goto-char (match-end 0))
(replace-match
(if (string-equal "(" (car nato))