[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[cgreek:00232] cgreek21 alpha release
I tried using the new cgreek21 with xemacs 21.5 (since this supports
unicode) but I got the following error message:
----------------------
(1) (initialization/error) An error has occurred while loading c:\.xemacs\init.el:
Symbol's function definition is void: char-valid-p
Backtrace follows:
(char-valid-p output)
(cond ((not (stringp input)) (error "robin-define-package: bad input sequence %S" r)) ((char-valid-p output) (put-char-code-property output (intern name) input)) ((not (stringp output)) (error "robin-define-package: bad output pattern %S" r)))
(while --dolist-temp--61002 (setq r (car --dolist-temp--61002)) (setq input (car r) output (cadr r)) (robin-add-rule name new input output) (cond ((not (stringp input)) (error "robin-define-package: bad input sequence %S" r)) ((char-valid-p output) (put-char-code-property output (intern name) input)) ((not (stringp output)) (error "robin-define-package: bad output pattern %S" r))) (setq --dolist-temp--61002 (cdr --dolist-temp--61002)))
# bind (r --dolist-temp--61002)
(let ((--dolist-temp--61002 rules) r) (while --dolist-temp--61002 (setq r (car --dolist-temp--61002)) (setq input (car r) output (cadr r)) (robin-add-rule name new input output) (cond ((not (stringp input)) (error "robin-define-package: bad input sequence %S" r)) ((char-valid-p output) (put-char-code-property output (intern name) input)) ((not (stringp output)) (error "robin-define-package: bad output pattern %S" r))) (setq --dolist-temp--61002 (cdr --dolist-temp--61002))) nil)
# (catch --cl-block-nil-- ...)
(catch (quote --cl-block-nil--) (let ((--dolist-temp--61002 rules) r) (while --dolist-temp--61002 (setq r (car --dolist-temp--61002)) (setq input (car r) output (cadr r)) (robin-add-rule name new input output) (cond ((not (stringp input)) (error "robin-define-package: bad input sequence %S" r)) ((char-valid-p output) (put-char-code-property output (intern name) input)) ((not (stringp output)) (error "robin-define-package: bad output pattern %S" r))) (setq --dolist-temp--61002 (cdr --dolist-temp--61002))) nil))
(cl-block-wrapper (catch (quote --cl-block-nil--) (let ((--dolist-temp--61002 rules) r) (while --dolist-temp--61002 (setq r (car --dolist-temp--61002)) (setq input (car r) output (cadr r)) (robin-add-rule name new input output) (cond ((not (stringp input)) (error "robin-define-package: bad input sequence %S" r)) ((char-valid-p output) (put-char-code-property output (intern name) input)) ((not (stringp output)) (error "robin-define-package: bad output pattern %S" r))) (setq --dolist-temp--61002 (cdr --dolist-temp--61002))) nil)))
(block nil (let ((--dolist-temp--61002 rules) r) (while --dolist-temp--61002 (setq r (car --dolist-temp--61002)) (setq input (car r) output (cadr r)) (robin-add-rule name new input output) (cond ((not (stringp input)) (error "robin-define-package: bad input sequence %S" r)) ((char-valid-p output) (put-char-code-property output (intern name) input)) ((not (stringp output)) (error "robin-define-package: bad output pattern %S" r))) (setq --dolist-temp--61002 (cdr --dolist-temp--61002))) nil))
(dolist (r rules) (setq input (car r) output (cadr r)) (robin-add-rule name new input output) (cond ((not (stringp input)) (error "robin-define-package: bad input sequence %S" r)) ((char-valid-p output) (put-char-code-property output (intern name) input)) ((not (stringp output)) (error "robin-define-package: bad output pattern %S" r))))
# bind (output input new old)
(let ((old (assoc name robin-package-alist)) (new (list name "")) input output) (dolist (r rules) (setq input (car r) output (cadr r)) (robin-add-rule name new input output) (cond ((not (stringp input)) (error "robin-define-package: bad input sequence %S" r)) ((char-valid-p output) (put-char-code-property output (intern name) input)) ((not (stringp output)) (error "robin-define-package: bad output pattern %S" r)))) (setcar (cdr new) docstring) (if old (setcdr old (cdr new)) (setq robin-package-alist (cons new robin-package-alist))) t)
# bind (rules docstring name)
(lambda (name docstring &rest rules) "Define a robin package.\n\nNAME is the string of this robin package.\nDOCSTRING is the documentation string of this robin package.\nEach RULE is of the form (INPUT OUTPUT) where INPUT is a string and\nOUTPUT is either a character or a string. RULES are not evaluated.\n\nIf there already exists a robin package whose name is NAME, the new\none replaces the old one." (let ((old (assoc name robin-package-alist)) (new (list name "")) input output) (dolist (r rules) (setq input (car r) output (cadr r)) (robin-add-rule name new input output) (cond ((not (stringp input)) (error "robin-define-package: bad input sequence %S" r)) ((char-valid-p output) (put-char-code-property output (intern name) input)) ((not (stringp output)) (error "robin-define-package: bad output pattern %S" r)))) (setcar (cdr new) docstring) (if old (setcdr old (cdr new)) (setq robin-package-alist (cons new robin-package-alist))) t))("greek-mizuochi" "The Mizuochi input method for Classical Greek.\n\n-------------------------------------\ncharacter capital small\n-------------------------------------\nalpha A a\nbeta B b\ngamma G g\ndelta D d\nepsilon E e\nzeta Z z\neta H h\ntheta Q q\niota I i\nkappa K k\nlamda L l\nmu M m\nnu H n\nxi X x\nomicron O o\npi P p\nrho R r\nsigma S s\nfinal sigma j\ntau T t\nupsilon U u\nphi F f\nchi C c\npsi Y y\nomega W w\n-------------------------------------\nsampi !\ndigamma #\nstigma $\nkoppa & %\n-------------------------------------\n\n------------------------\nmark key\n------------------------\nypogegrammeni J\npsili ' or v\ndasia ` or V\noxia /\nvaria ?\nperispomeni \\ or ^\ndialytika \"\nano teleia :\nerotimatiko ;\n----------------------" ("!" ??) ("#" ??) ("$" ??) ("%" ??) ("&" ??) ("'" ??) ("v" ??) ("/" ??) (":" ??) (";" ??) ("\"" ?¨) ("A" ??) ("B" ??) ("C" ??) ("D" ??) ("E" ??) ("F" ?F) ("G" ?G) ("H" ??) ("I" ??) ("wJ" ??) ("K" ??) ("L" ??) ("M" ??) ("N" ??) ("O" ??) ("P" ??) ("Q" ?T) ("R" ??) ("S" ?S) ("T" ??) ("U" ??) ("hJ" ??) ("W" ?O) ("X" ??) ("Y" ??) ("Z" ??) ("?" ??) ("\\" ??) ("^" ??) ("`" ??) ("V" ??) ("a" ?a) ("b" ?ß) ("c" ??) ("d" ?d) ("e" ?e) ("f" ?f) ("g" ??) ("h" ??) ("i" ??) ("j" ??) ("k" ??) ("l" ??) ("m" ?µ) ("n" ??) ("o" ??) ("p" ?p) ("q" ??) ("r" ??) ("s" ?s) ("t" ?t) ("u" ??) ("aJ" ??) ("w" ??) ("x" ??) ("y" ??) ("z" ??) ("i`" ??) ("iV" ??) ("i'" ??) ("iv" ??) ("i/" ??) ("i`/" ??) ("iV/" ??) ("i/`" ??) ("i/V" ??) ("i'/" ??) ("iv/" ??) ("i/'" ??) ("i/v" ??) ("i?" ??) ("i`?" ??) ("iV?" ??) ("i?`" ??) ("i?V" ??) ("i'?" ??) ("iv?" ??) ("i?'" ??) ("i?v" ??) ("i^" ??) ("i\\" ??) ("i`^" ??) ("i`\\" ??) ("iV^" ??) ("iV\\" ??) ("i^`" ??) ("i\\`" ??) ("i^V" ??) ("i\\V" ??) ("i'^" ??) ("i'\\" ??) ("iv^" ??) ("iv\\" ??) ("i^'" ??) ("i\\'" ??) ("i^v" ??) ("i\\v" ??) ("i\"" ??) ("i/\"" ??) ("i\"/" ??) ("i?\"" ??) ("i\"?" ??) ("^`" ??) ("^V" ??) ("\\`" ??) ("\\V" ??) ("`^" ??) ("V^" ??) ("`\\" ??) ("V\\" ??) ("^'" ??) ("^v" ??) ("\\'" ??) ("\\v" ??) ("'^" ??) ("v^" ??) ("'\\" ??) ("v\\" ??) ("/`" ??) ("/V" ??) ("`/" ??) ("V/" ??) ("/'" ??) ("/v" ??) ("'/" ??) ("v/" ??) ("?`" ??) ("?V" ??) ("`?" ??) ("V?" ??) ("?'" ??) ("?v" ??) ("'?" ??) ("v?" ??) ("\"/" ??) ("/\"" ??) ("\"?" ??) ("?\"" ??) ("e`" ??) ("eV" ??) ("e'" ??) ("ev" ??) ("e/" ??) ("e/`" ??) ("e/V" ??) ("e`/" ??) ("eV/" ??) ("e/'" ??) ("e/v" ??) ("e'/" ??) ("ev/" ??) ("e?" ??) ("e?`" ??) ("e?V" ??) ("e`?" ??) ("eV?" ??) ("e?'" ??) ("e?v" ??) ("e'?" ??) ("ev?" ??) ("a`" ??) ("aV" ??) ("a'" ??) ("av" ??) ("a/" ??) ("a/`" ??) ("a/V" ??) ("a`/" ??) ("aV/" ??) ("a/'" ??) ("a/v" ??) ("a'/" ??) ("av/" ??) ("a?" ??) ("a?`" ??) ("a?V" ??) ("a`?" ??) ("aV?" ??) ("a?'" ??) ("a?v" ??) ("a'?" ??) ("av?" ??) ("a^" ??) ("a\\" ??) ("a^`" ??) ("a^V" ??) ("a\\`" ??) ("a\\V" ??) ("a`^" ??) ("aV^" ??) ("a`\\" ??) ("aV\\" ??) ("a^'" ??) ("a^v" ??) ("a\\'" ??) ("a\\v" ??) ("a'^" ??) ("av^" ??) ("a'\\" ??) ("av\\" ??) ("aJ`" ??) ("aJV" ??) ("aJ'" ??) ("aJv" ??) ("aJ/" ??) ("aJ/`" ??) ("aJ/V" ??) ("aJ`/" ??) ("aJV/" ??) ("aJ/'" ??) ("aJ/v" ??) ("aJ'/" ??) ("aJv/" ??) ("aJ?" ??) ("aJ?`" ??) ("aJ?V" ??) ("aJ`?" ??) ("aJV?" ??) ("aJ?'" ??) ("aJ?v" ??) ("aJ'?" ??) ("aJv?" ??) ("aJ^" ??) ("aJ\\" ??) ("aJ^`" ??) ("aJ^V" ??) ("aJ\\`" ??) ("aJ\\V" ??) ("aJ`^" ??) ("aJV^" ??) ("aJ`\\" ??) ("aJV\\" ??) ("aJ^'" ??) ("aJ^v" ??) ("aJ\\'" ??) ("aJ\\v" ??) ("aJ'^" ??) ("aJv^" ??) ("aJ'\\" ??) ("aJv\\" ??) ("r`" ??) ("rV" ??) ("r'" ??) ("rv" ??) ("h`" ??) ("hV" ??) ("h'" ??) ("hv" ??) ("h/" ??) ("h/`" ??) ("h/V" ??) ("h`/" ??) ("hV/" ??) ("h/'" ??) ("h/v" ??) ("h'/" ??) ("hv/" ??) ("h?" ??) ("h?`" ??) ("h?V" ??) ("h`?" ??) ("hV?" ??) ("h?'" ??) ("h?v" ??) ("h'?" ??) ("hv?" ??) ("h^" ??) ("h\\" ??) ("h^`" ??) ("h^V" ??) ("h\\`" ??) ("h\\V" ??) ("h`^" ??) ("h`\\" ??) ("hV^" ??) ("hV\\" ??) ("h^'" ??) ("h^v" ??) ("h\\'" ??) ("h\\v" ??) ("h'^" ??) ("h'\\" ??) ("hv^" ??) ("hv\\" ??) ("J" ??) ("hJ`" ??) ("hJV" ??) ("hJ'" ??) ("hJv" ??) ("hJ/" ??) ("hJ`/" ??) ("hJV/" ??) ("hJ/`" ??) ("hJ/V" ??) ("hJ'/" ??) ("hJv/" ??) ("hJ/'" ??) ("hJ/v" ??) ("hJ?" ??) ("hJ`?" ??) ("hJV?" ??) ("hJ?`" ??) ("hJ?V" ??) ("hJ'?" ??) ("hJv?" ??) ("hJ?'" ??) ("hJ?v" ??) ("hJ^" ??) ("hJ\\" ??) ("hJ`^" ??) ("hJ`\\" ??) ("hJV^" ??) ("hJV\\" ??) ("hJ^`" ??) ("hJ\\`" ??) ("hJ^V" ??) ("hJ\\V" ??) ("hJ'^" ??) ("hJ'\\" ??) ("hJv^" ??) ("hJv\\" ??) ("hJ^'" ??) ("hJ\\'" ??) ("hJ^v" ??) ("hJ\\v" ??) ("o`" ??) ("oV" ??) ("o'" ??) ("ov" ??) ("o/" ??) ("o/`" ??) ("o/V" ??) ("o`/" ??) ("oV/" ??) ("o/'" ??) ("o/v" ??) ("o'/" ??) ("ov/" ??) ("o?" ??) ("o?`" ??) ("o?V" ??) ("o`?" ??) ("oV?" ??) ("o?'" ??) ("o?v" ??) ("o'?" ??) ("ov?" ??) ("u`" ??) ("uV" ??) ("u'" ??) ("uv" ??) ("u/" ??) ("u/`" ??) ("u/V" ??) ("u`/" ??) ("uV/" ??) ("u/'" ??) ("u/v" ??) ("u'/" ??) ("uv/" ??) ("u?" ??) ("u?`" ??) ("u?V" ??) ("u`?" ??) ("uV?" ??) ("u?'" ??) ("u?v" ??) ("u'?" ??) ("uv?" ??) ("u^" ??) ("u\\" ??) ("u^`" ??) ("u^V" ??) ("u\\`" ??) ("u\\V" ??) ("u`^" ??) ("uV^" ??) ("u`\\" ??) ("uV\\" ??) ("u^'" ??) ("u^v" ??) ("u\\'" ??) ("u\\v" ??) ("u'^" ??) ("uv^" ??) ("u'\\" ??) ("uv\\" ??) ("u\"" ??) ("u\"/" ??) ("u/\"" ??) ("u\"?" ??) ("u?\"" ??) ("w`" ??) ("wV" ??) ("w'" ??) ("wv" ??) ("w/" ??) ("w/`" ??) ("w/V" ??) ("w`/" ??) ("wV/" ??) ("w/'" ??) ("w/v" ??) ("w'/" ??) ("wv/" ??) ("w?" ??) ("w?`" ??) ("w?V" ??) ("w`?" ??) ("wV?" ??) ("w?'" ??) ("w?v" ??) ("w'?" ??) ("wv?" ??) ("w^" ??) ("w\\" ??) ("w^`" ??) ("w^V" ??) ("w\\`" ??) ("w\\V" ??) ("w`^" ??) ("wV^" ??) ("w`\\" ??) ("wV\\" ??) ("w^'" ??) ("w^v" ??) ("w\\'" ??) ("w\\v" ??) ("w'^" ??) ("wv^" ??) ("w'\\" ??) ("wv\\" ??) ("wJ`" ??) ("wJV" ??) ("wJ'" ??) ("wJv" ??) ("wJ/" ??) ("wJ/`" ??) ("wJ/V" ??) ("wJ`/" ??) ("wJV/" ??) ("wJ/'" ??) ("wJ/v" ??) ("wJ'/" ??) ("wJv/" ??) ("wJ?" ??) ("wJ?`" ??) ("wJ?V" ??) ("wJ`?" ??) ("wJV?" ??) ("wJ?'" ??) ("wJ?v" ??) ("wJ'?" ??) ("wJv?" ??) ("wJ^" ??) ("wJ\\" ??) ("wJ^`" ??) ("wJ^V" ??) ("wJ\\`" ??) ("wJ\\V" ??) ("wJ`^" ??) ("wJV^" ??) ("wJ`\\" ??) ("wJV\\" ??) ("wJ^'" ??) ("wJ^v" ??) ("wJ\\'" ??) ("wJ\\v" ??) ("wJ'^" ??) ("wJv^" ??) ("wJ'\\" ??) ("wJv\\" ??))
(robin-define-package "greek-mizuochi" "The Mizuochi input method for Classical Greek.\n\n-------------------------------------\ncharacter capital small\n-------------------------------------\nalpha A a\nbeta B b\ngamma G g\ndelta D d\nepsilon E e\nzeta Z z\neta H h\ntheta Q q\niota I i\nkappa K k\nlamda L l\nmu M m\nnu H n\nxi X x\nomicron O o\npi P p\nrho R r\nsigma S s\nfinal sigma j\ntau T t\nupsilon U u\nphi F f\nchi C c\npsi Y y\nomega W w\n-------------------------------------\nsampi !\ndigamma #\nstigma $\nkoppa & %\n-------------------------------------\n\n------------------------\nmark key\n------------------------\nypogegrammeni J\npsili ' or v\ndasia ` or V\noxia /\nvaria ?\nperispomeni \\ or ^\ndialytika \"\nano teleia :\nerotimatiko ;\n----------------------" ("!" ??) ("#" ??) ("$" ??) ("%" ??) ("&" ??) ("'" ??) ("v" ??) ("/" ??) (":" ??) (";" ??) ("\"" ?¨) ("A" ??) ("B" ??) ("C" ??) ("D" ??) ("E" ??) ("F" ?F) ("G" ?G) ("H" ??) ("I" ??) ("wJ" ??) ("K" ??) ("L" ??) ("M" ??) ("N" ??) ("O" ??) ("P" ??) ("Q" ?T) ("R" ??) ("S" ?S) ("T" ??) ("U" ??) ("hJ" ??) ("W" ?O) ("X" ??) ("Y" ??) ("Z" ??) ("?" ??) ("\\" ??) ("^" ??) ("`" ??) ("V" ??) ("a" ?a) ("b" ?ß) ("c" ??) ("d" ?d) ("e" ?e) ("f" ?f) ("g" ??) ("h" ??) ("i" ??) ("j" ??) ("k" ??) ("l" ??) ("m" ?µ) ("n" ??) ("o" ??) ("p" ?p) ("q" ??) ("r" ??) ("s" ?s) ("t" ?t) ("u" ??) ("aJ" ??) ("w" ??) ("x" ??) ("y" ??) ("z" ??) ("i`" ??) ("iV" ??) ("i'" ??) ("iv" ??) ("i/" ??) ("i`/" ??) ("iV/" ??) ("i/`" ??) ("i/V" ??) ("i'/" ??) ("iv/" ??) ("i/'" ??) ("i/v" ??) ("i?" ??) ("i`?" ??) ("iV?" ??) ("i?`" ??) ("i?V" ??) ("i'?" ??) ("iv?" ??) ("i?'" ??) ("i?v" ??) ("i^" ??) ("i\\" ??) ("i`^" ??) ("i`\\" ??) ("iV^" ??) ("iV\\" ??) ("i^`" ??) ("i\\`" ??) ("i^V" ??) ("i\\V" ??) ("i'^" ??) ("i'\\" ??) ("iv^" ??) ("iv\\" ??) ("i^'" ??) ("i\\'" ??) ("i^v" ??) ("i\\v" ??) ("i\"" ??) ("i/\"" ??) ("i\"/" ??) ("i?\"" ??) ("i\"?" ??) ("^`" ??) ("^V" ??) ("\\`" ??) ("\\V" ??) ("`^" ??) ("V^" ??) ("`\\" ??) ("V\\" ??) ("^'" ??) ("^v" ??) ("\\'" ??) ("\\v" ??) ("'^" ??) ("v^" ??) ("'\\" ??) ("v\\" ??) ("/`" ??) ("/V" ??) ("`/" ??) ("V/" ??) ("/'" ??) ("/v" ??) ("'/" ??) ("v/" ??) ("?`" ??) ("?V" ??) ("`?" ??) ("V?" ??) ("?'" ??) ("?v" ??) ("'?" ??) ("v?" ??) ("\"/" ??) ("/\"" ??) ("\"?" ??) ("?\"" ??) ("e`" ??) ("eV" ??) ("e'" ??) ("ev" ??) ("e/" ??) ("e/`" ??) ("e/V" ??) ("e`/" ??) ("eV/" ??) ("e/'" ??) ("e/v" ??) ("e'/" ??) ("ev/" ??) ("e?" ??) ("e?`" ??) ("e?V" ??) ("e`?" ??) ("eV?" ??) ("e?'" ??) ("e?v" ??) ("e'?" ??) ("ev?" ??) ("a`" ??) ("aV" ??) ("a'" ??) ("av" ??) ("a/" ??) ("a/`" ??) ("a/V" ??) ("a`/" ??) ("aV/" ??) ("a/'" ??) ("a/v" ??) ("a'/" ??) ("av/" ??) ("a?" ??) ("a?`" ??) ("a?V" ??) ("a`?" ??) ("aV?" ??) ("a?'" ??) ("a?v" ??) ("a'?" ??) ("av?" ??) ("a^" ??) ("a\\" ??) ("a^`" ??) ("a^V" ??) ("a\\`" ??) ("a\\V" ??) ("a`^" ??) ("aV^" ??) ("a`\\" ??) ("aV\\" ??) ("a^'" ??) ("a^v" ??) ("a\\'" ??) ("a\\v" ??) ("a'^" ??) ("av^" ??) ("a'\\" ??) ("av\\" ??) ("aJ`" ??) ("aJV" ??) ("aJ'" ??) ("aJv" ??) ("aJ/" ??) ("aJ/`" ??) ("aJ/V" ??) ("aJ`/" ??) ("aJV/" ??) ("aJ/'" ??) ("aJ/v" ??) ("aJ'/" ??) ("aJv/" ??) ("aJ?" ??) ("aJ?`" ??) ("aJ?V" ??) ("aJ`?" ??) ("aJV?" ??) ("aJ?'" ??) ("aJ?v" ??) ("aJ'?" ??) ("aJv?" ??) ("aJ^" ??) ("aJ\\" ??) ("aJ^`" ??) ("aJ^V" ??) ("aJ\\`" ??) ("aJ\\V" ??) ("aJ`^" ??) ("aJV^" ??) ("aJ`\\" ??) ("aJV\\" ??) ("aJ^'" ??) ("aJ^v" ??) ("aJ\\'" ??) ("aJ\\v" ??) ("aJ'^" ??) ("aJv^" ??) ("aJ'\\" ??) ("aJv\\" ??) ("r`" ??) ("rV" ??) ("r'" ??) ("rv" ??) ("h`" ??) ("hV" ??) ("h'" ??) ("hv" ??) ("h/" ??) ("h/`" ??) ("h/V" ??) ("h`/" ??) ("hV/" ??) ("h/'" ??) ("h/v" ??) ("h'/" ??) ("hv/" ??) ("h?" ??) ("h?`" ??) ("h?V" ??) ("h`?" ??) ("hV?" ??) ("h?'" ??) ("h?v" ??) ("h'?" ??) ("hv?" ??) ("h^" ??) ("h\\" ??) ("h^`" ??) ("h^V" ??) ("h\\`" ??) ("h\\V" ??) ("h`^" ??) ("h`\\" ??) ("hV^" ??) ("hV\\" ??) ("h^'" ??) ("h^v" ??) ("h\\'" ??) ("h\\v" ??) ("h'^" ??) ("h'\\" ??) ("hv^" ??) ("hv\\" ??) ("J" ??) ("hJ`" ??) ("hJV" ??) ("hJ'" ??) ("hJv" ??) ("hJ/" ??) ("hJ`/" ??) ("hJV/" ??) ("hJ/`" ??) ("hJ/V" ??) ("hJ'/" ??) ("hJv/" ??) ("hJ/'" ??) ("hJ/v" ??) ("hJ?" ??) ("hJ`?" ??) ("hJV?" ??) ("hJ?`" ??) ("hJ?V" ??) ("hJ'?" ??) ("hJv?" ??) ("hJ?'" ??) ("hJ?v" ??) ("hJ^" ??) ("hJ\\" ??) ("hJ`^" ??) ("hJ`\\" ??) ("hJV^" ??) ("hJV\\" ??) ("hJ^`" ??) ("hJ\\`" ??) ("hJ^V" ??) ("hJ\\V" ??) ("hJ'^" ??) ("hJ'\\" ??) ("hJv^" ??) ("hJv\\" ??) ("hJ^'" ??) ("hJ\\'" ??) ("hJ^v" ??) ("hJ\\v" ??) ("o`" ??) ("oV" ??) ("o'" ??) ("ov" ??) ("o/" ??) ("o/`" ??) ("o/V" ??) ("o`/" ??) ("oV/" ??) ("o/'" ??) ("o/v" ??) ("o'/" ??) ("ov/" ??) ("o?" ??) ("o?`" ??) ("o?V" ??) ("o`?" ??) ("oV?" ??) ("o?'" ??) ("o?v" ??) ("o'?" ??) ("ov?" ??) ("u`" ??) ("uV" ??) ("u'" ??) ("uv" ??) ("u/" ??) ("u/`" ??) ("u/V" ??) ("u`/" ??) ("uV/" ??) ("u/'" ??) ("u/v" ??) ("u'/" ??) ("uv/" ??) ("u?" ??) ("u?`" ??) ("u?V" ??) ("u`?" ??) ("uV?" ??) ("u?'" ??) ("u?v" ??) ("u'?" ??) ("uv?" ??) ("u^" ??) ("u\\" ??) ("u^`" ??) ("u^V" ??) ("u\\`" ??) ("u\\V" ??) ("u`^" ??) ("uV^" ??) ("u`\\" ??) ("uV\\" ??) ("u^'" ??) ("u^v" ??) ("u\\'" ??) ("u\\v" ??) ("u'^" ??) ("uv^" ??) ("u'\\" ??) ("uv\\" ??) ("u\"" ??) ("u\"/" ??) ("u/\"" ??) ("u\"?" ??) ("u?\"" ??) ("w`" ??) ("wV" ??) ("w'" ??) ("wv" ??) ("w/" ??) ("w/`" ??) ("w/V" ??) ("w`/" ??) ("wV/" ??) ("w/'" ??) ("w/v" ??) ("w'/" ??) ("wv/" ??) ("w?" ??) ("w?`" ??) ("w?V" ??) ("w`?" ??) ("wV?" ??) ("w?'" ??) ("w?v" ??) ("w'?" ??) ("wv?" ??) ("w^" ??) ("w\\" ??) ("w^`" ??) ("w^V" ??) ("w\\`" ??) ("w\\V" ??) ("w`^" ??) ("wV^" ??) ("w`\\" ??) ("wV\\" ??) ("w^'" ??) ("w^v" ??) ("w\\'" ??) ("w\\v" ??) ("w'^" ??) ("wv^" ??) ("w'\\" ??) ("wv\\" ??) ("wJ`" ??) ("wJV" ??) ("wJ'" ??) ("wJv" ??) ("wJ/" ??) ("wJ/`" ??) ("wJ/V" ??) ("wJ`/" ??) ("wJV/" ??) ("wJ/'" ??) ("wJ/v" ??) ("wJ'/" ??) ("wJv/" ??) ("wJ?" ??) ("wJ?`" ??) ("wJ?V" ??) ("wJ`?" ??) ("wJV?" ??) ("wJ?'" ??) ("wJ?v" ??) ("wJ'?" ??) ("wJv?" ??) ("wJ^" ??) ("wJ\\" ??) ("wJ^`" ??) ("wJ^V" ??) ("wJ\\`" ??) ("wJ\\V" ??) ("wJ`^" ??) ("wJV^" ??) ("wJ`\\" ??) ("wJV\\" ??) ("wJ^'" ??) ("wJ^v" ??) ("wJ\\'" ??) ("wJ\\v" ??) ("wJ'^" ??) ("wJv^" ??) ("wJ'\\" ??) ("wJv\\" ??))
# bind (current-load-list)
# (unwind-protect ...)
# bind (load-file-name)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
load-internal("greek" nil nil nil utf-8)
# bind (path handler filename nosuffix nomessage noerror file)
load("greek")
# bind (current-load-list)
# (unwind-protect ...)
# bind (load-file-name)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
load-internal("cgreek" nil nil nil undecided)
# bind (path handler filename nosuffix nomessage noerror file)
load("cgreek")
# bind (current-load-list)
# (unwind-protect ...)
# bind (load-file-name)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
# (unwind-protect ...)
load-internal("c:\\.xemacs\\init.el" t t t undecided)
# bind (path handler filename nosuffix nomessage noerror file)
load("c:\\.xemacs\\init.el" t t t)
load-user-init-file()
#<compiled-function nil "...(10)" [init-file-had-error load-user-init-file-p load-user-init-file nil] 2>()
# (unwind-protect ...)
call-with-condition-handler(#<compiled-function (__load_init_file_arg__) "...(26)" [init-file-had-error user-init-file __load_init_file_arg__ errstr error-message-string message "Error in init file: %s" lwarn initialization error "An error has occurred while loading %s:\n\n%s\n\nBacktrace follows:\n\n%s\n\nTo ensure normal operation, you should investigate the cause of the error\nin your initialization file and remove it. Use the `-debug-init' option\nto XEmacs to enter the debugger when the error occurs and investigate the\nexact problem." backtrace-in-condition-handler-eliminating-handler t] 8> #<compiled-function nil "...(10)" [init-file-had-error load-user-init-file-p load-user-init-file nil] 2>)
# (condition-case ... . ((error)))
# bind (debug-on-error debug-on-error-from-init-file debug-on-error-should-be-set debug-on-error-initial)
load-init-file()
# bind (command-line-args-left)
command-line()
# (condition-case ... . ((t (byte-code " §" [error-data data nil] 1))))
# bind (error-data)
normal-top-level()
# (condition-case ... . error)
# (catch top-level ...)
To ensure normal operation, you should investigate the cause of the error
in your initialization file and remove it. Use the `-debug-init' option
to XEmacs to enter the debugger when the error occurs and investigate the
exact problem.
(2) (font/notice) Unable to instantiate font for charset japanese-jisx0208, face default
(3) (font/notice) Unable to instantiate font for charset chinese-cns11643-1, face default
(4) (font/notice) Unable to instantiate font for charset japanese-jisx0208, face zmacs-region
(5) (font/notice) Unable to instantiate font for charset chinese-cns11643-1, face zmacs-region
-----------------------------
Any ideas? And, by the way, I found a place in robin.el where you have
written `robir' -- which I assume should be `robin'.
Bill Furley
TAKAHASHI Naoto writes:
> An alpha version of CGreek21 is ready.
>
> ftp://ftp.m17n.org/pub/cgreek/cgreek21-20030619.tar.gz
>
> It is based on Unicode, and works with GNU Emacs-21 but not with GNU
> Emacs-20. It is still in a development stage and may be buggy.
> However, it will never get better if nobody sends me bug reports and
> comments. Any feedback is welcome.
>
> Best regards,
>
> --
> TAKAHASHI Naoto
> ntakahas@xxxxxxxx
> http://www.m17n.org/ntakahas/