Mercurial > hg > xemacs-beta
comparison lisp/mule/hebrew.el @ 778:2923009caf47
[xemacs-hg @ 2002-03-16 10:38:59 by ben]
cm.c, file-coding.c: fix warnings.
.cvsignore: Those pesky *.tmp files.
mule\arabic.el, mule\canna-leim.el, mule\china-util.el, mule\chinese.el, mule\cyril-util.el, mule\cyrillic.el, mule\devan-util.el, mule\devanagari.el, mule\english.el, mule\ethio-util.el, mule\ethiopic.el, mule\european.el, mule\greek.el, mule\hebrew.el, mule\indian.el, mule\japan-util.el, mule\japanese.el, mule\korea-util.el, mule\korean.el, mule\lao-util.el, mule\lao.el, mule\misc-lang.el, mule\mule-charset.el, mule\mule-cmds.el, mule\thai-util.el, mule\thai.el, mule\tibet-util.el, mule\tibetan.el, mule\viet-util.el, mule\vietnamese.el, unicode.el: Fix lots of warnings. Sync up some files to FSF 21.1. Copy over
all charset definitions from FSF 21.1, convert them to our format,
and stick them in the relevant files. Eventually we will actually
be able to dump these files (though they may not quite work).
autoload.el: Support defun*, defmacro*.
mule/mule-composite.el, mule/mule-composite-stub.el: New file, stubs for
nonexistent composition funs/vars.
mule/viet-chars.el, dumped-lisp.el: Account for these changes.
font.el, mouse.el, msw-font-menu.el, printer.el, startup.el: fix warnings.
author | ben |
---|---|
date | Sat, 16 Mar 2002 10:39:19 +0000 |
parents | 943eaba38521 |
children | 949ac151a10d |
comparison
equal
deleted
inserted
replaced
777:e65d9cf16707 | 778:2923009caf47 |
---|---|
25 ;;; Commentary: | 25 ;;; Commentary: |
26 | 26 |
27 ;; ISO 8859-8 (Hebrew) support. | 27 ;; ISO 8859-8 (Hebrew) support. |
28 | 28 |
29 ;;; Code: | 29 ;;; Code: |
30 | |
31 ; (make-charset 'hebrew-iso8859-8 | |
32 ; "Right-Hand Part of Latin/Hebrew Alphabet (ISO/IEC 8859-8): ISO-IR-138" | |
33 ; '(dimension | |
34 ; 1 | |
35 ; registry "ISO8859-8" | |
36 ; chars 96 | |
37 ; columns 1 | |
38 ; direction r2l | |
39 ; final ?H | |
40 ; graphic 1 | |
41 ; short-name "RHP of ISO8859/8" | |
42 ; long-name "RHP of Hebrew (ISO 8859-8): ISO-IR-138" | |
43 ; )) | |
30 | 44 |
31 ;; Syntax of Hebrew characters | 45 ;; Syntax of Hebrew characters |
32 (loop for c from 96 to 122 | 46 (loop for c from 96 to 122 |
33 do (modify-syntax-entry (make-char 'hebrew-iso8859-8 c) "w")) | 47 do (modify-syntax-entry (make-char 'hebrew-iso8859-8 c) "w")) |
34 (modify-syntax-entry (make-char 'hebrew-iso8859-8 32) "w") ; no-break space | 48 (modify-syntax-entry (make-char 'hebrew-iso8859-8 32) "w") ; no-break space |