From 7e7f83a41feff9ef32605f68df153a3a43ba8744 Mon Sep 17 00:00:00 2001 From: Dave Love Date: Tue, 30 Jul 2002 11:41:04 +0000 Subject: [PATCH] ("welsh"): Doc fix. --- leim/quail/welsh.el | 91 +-------------------------------------------- 1 file changed, 1 insertion(+), 90 deletions(-) diff --git a/leim/quail/welsh.el b/leim/quail/welsh.el index e585d3cb800..bbd81843b34 100644 --- a/leim/quail/welsh.el +++ b/leim/quail/welsh.el @@ -25,8 +25,6 @@ ;;; Commentary: ;; Welsh input following the Yudit map by david@sheetmusic.org.uk. -;; This is set up to produce utf-8. A Latin-8 version of most of it -;; is commented-out at the end. ;;; Code: @@ -34,7 +32,7 @@ (quail-define-package "welsh" "Welsh" "$,1!4(B" t - "Welsh postfix input method, using Unicode" + "Welsh postfix input method." nil t nil nil nil nil nil nil nil nil t) (quail-define-rules @@ -118,91 +116,4 @@ ;; "hawlfraint" (copyright). Dyma arwyddlun hawlfraint. ("(h)" ?$,1W(B)) -;; In the following line paren changed to bracket to avoid an error -;; message from quail-update-leim-list-file, which doesn't know about -;; Lisp comments. -;; [quail-define-package -;; "welsh" "Welsh" "$,1!4(B" t -;; "Welsh postfix input method, using Latin-8" -;; nil t nil nil nil nil nil nil nil nil t) - -;; (quail-define-rules -;; ("A\\" ?,A@(B) -;; ("A/" ?,AA(B) -;; ("A^" ?,AB(B) -;; ("A+" ?,AB(B) -;; ("A\"" ?,AD(B) -;; ("a\\" ?,A`(B) -;; ("a/" ?,Aa(B) -;; ("a^" ?,Ab(B) -;; ("a+" ?,Ab(B) -;; ("a\"" ?,Ad(B) - -;; ("E\\" ?,AH(B) -;; ("E/" ?,AI(B) -;; ("E^" ?,AJ(B) -;; ("E+" ?,AJ(B) -;; ("E\"" ?,AK(B) -;; ("e\\" ?,Ah(B) -;; ("e/" ?,Ai(B) -;; ("e^" ?,Aj(B) -;; ("e+" ?,Aj(B) -;; ("e\"" ?,Ak(B) - -;; ("I\\" ?,AL(B) -;; ("I/" ?,AM(B) -;; ("I^" ?,AN(B) -;; ("I+" ?,AN(B) -;; ("I\"" ?,AO(B) -;; ("i\\" ?,Al(B) -;; ("i/" ?,Am(B) -;; ("i^" ?,An(B) -;; ("i+" ?,An(B) -;; ("i\"" ?,Ao(B) - -;; ("O\\" ?,AR(B) -;; ("O/" ?,AS(B) -;; ("O^" ?,AT(B) -;; ("O+" ?,AT(B) -;; ("O\"" ?,AV(B) -;; ("o\\" ?,Ar(B) -;; ("o/" ?,As(B) -;; ("o^" ?,At(B) -;; ("o+" ?,At(B) -;; ("o\"" ?,Av(B) - -;; ("U\\" ?,AY(B) -;; ("U/" ?,AZ(B) -;; ("U^" ?,A[(B) -;; ("U+" ?,A[(B) -;; ("U\"" ?,A\(B) -;; ("u\\" ?,Ay(B) -;; ("u/" ?,Az(B) -;; ("u^" ?,A{(B) -;; ("u+" ?,A{(B) -;; ("u\"" ?,A|(B) - -;; ("Y\\" ?,A,(B) -;; ("Y/" ?,A](B) -;; ("Y^" ?,A^(B) -;; ("Y+" ?,A^(B) -;; ("Y\"" ?,A/(B) -;; ("y\\" ?,A<(B) -;; ("y/" ?,A}(B) -;; ("y\"" ?,A(B) -;; ("y^" ?,A~(B) -;; ("y+" ?,A~(B) - -;; ("W\\" ?,A((B) -;; ("W/" ?,A*(B) -;; ("W^" ?,AP(B) -;; ("W+" ?,AP(B) -;; ("W\"" ?,A=(B) -;; ("w\\" ?,A8(B) -;; ("w/" ?,A:(B) -;; ("w^" ?,Ap(B) -;; ("w+" ?,Ap(B) -;; ("w\"" ?,A>(B)) - - ;;; welsh.el ends here -- 2.39.2