comparison leim/quail/latin-pre.el @ 38453:519983161a46

Some fixes to follow lisp coding conventions and typo fixes.

38452:e1e6c0c30e69

;;; latin-pre.el -- Quail packages for inputting various European characters.

;; Copyright (C) 1997 Electrotechnical Laboratory, JAPAN.
;; Licensed to the Free Software Foundation.
;; Copyright (C) 2000 Free Software Foundation, Inc.

;; latin-1-prefix: extra special characters added, adapted from the vim 
;;                 digraphs (from J.H.M.Dassen <[e-mail]>)
;;                 by R.F. Smith <[e-mail]>
;;
;; polish-slash:
;;  Author:	W,B3(Bodek Bzyl <[e-mail]>
;;  Maintainer:	W,B3(Bodek Bzyl <[e-mail]>
;;
;; latin-[89]-prefix: Dave Love <[e-mail]>

;;; Code:

             |  _ /   | _: -> ,Aw(B  /c -> ,A"(B  /2 -> ,A=(B  /4 -> ,A<(B  /3 -> ,A>(B
             |  _ /   | /= => ,A,(B
   symbol    |   ^    | ^r -> ,A.(B  ^c -> ,A)(B  ^1 -> ,A9(B  ^2 -> ,A2(B  ^3 -> ,A3(B
" nil t nil nil nil nil nil nil nil nil t)

;; Fixme: should we have non-break space somehow?  Is so, how?
(quail-define-rules
 ("'A" ?,AA(B)
 ("'E" ?,AI(B)
 ("'I" ?,AM(B)
 ("'O" ?,AS(B)

 ("~p" ?,_6(B)
 ("~s" ?,_'(B)
 ("~$" ?,_#(B)
 ("^r" ?,_.(B)
 ("^c" ?,_)(B))

38453:519983161a46

;;; latin-pre.el --- Quail packages for inputting various European characters

;; Copyright (C) 1997 Electrotechnical Laboratory, JAPAN.
;; Licensed to the Free Software Foundation.
;; Copyright (C) 2000 Free Software Foundation, Inc.

;; latin-1-prefix: extra special characters added, adapted from the vim 
;;                 digraphs (from J.H.M.Dassen <[e-mail]>)
;;                 by R.F. Smith <[e-mail]>
;;
;; polish-slash:
;; Author: W,B3(Bodek Bzyl <[e-mail]>
;; Maintainer: W,B3(Bodek Bzyl <[e-mail]>
;;
;; latin-[89]-prefix: Dave Love <[e-mail]>

;;; Code:

             |  _ /   | _: -> ,Aw(B  /c -> ,A"(B  /2 -> ,A=(B  /4 -> ,A<(B  /3 -> ,A>(B
             |  _ /   | /= => ,A,(B
   symbol    |   ^    | ^r -> ,A.(B  ^c -> ,A)(B  ^1 -> ,A9(B  ^2 -> ,A2(B  ^3 -> ,A3(B
" nil t nil nil nil nil nil nil nil nil t)

;; Fixme: should we have non-break space somehow?  If so, how?
(quail-define-rules
 ("'A" ?,AA(B)
 ("'E" ?,AI(B)
 ("'I" ?,AM(B)
 ("'O" ?,AS(B)

 ("~p" ?,_6(B)
 ("~s" ?,_'(B)
 ("~$" ?,_#(B)
 ("^r" ?,_.(B)
 ("^c" ?,_)(B))

;;; latin-pre.el ends here