APPROVE COMMIT
NOTE: This patch has been committed.
mule-packages/mule-base/ChangeLog addition:
2009-09-11 Aidan Kehoe <kehoea(a)parhasard.net>
* japan-util.el (setup-japanese-environment-internal):
Don't check whether the current console--which may be mswindows or
something else--provides the X11 keysym `kana_A', rather call
#'kana-keyboard-define-keys if we have X11 support at all.
XEmacs Packages (existing ChangeLogs) source patch:
Diff command: cvs -q diff -Nu
Files affected: mule-packages/mule-base/japan-util.el
Index: mule-packages/mule-base/japan-util.el
===================================================================
RCS file: /pack/xemacscvs/XEmacs/packages/mule-packages/mule-base/japan-util.el,v
retrieving revision 1.7
diff -u -r1.7 japan-util.el
--- mule-packages/mule-base/japan-util.el 2003/05/08 16:47:27 1.7
+++ mule-packages/mule-base/japan-util.el 2009/09/11 16:48:37
@@ -40,10 +40,7 @@
(setq default-file-name-coding-system 'euc-jp))
(setq sentence-end-save sentence-end)
(setq sentence-end (concat sentence-end "\\|[$B!#!)!*(B]"))
-
- (when (and (fboundp 'x-keysym-on-keyboard-p)
- (console-on-window-system-p)
- (x-keysym-on-keyboard-p 'kana_A))
+ (when (memq 'x (device-type-list))
(kana-keyboard-define-keys)))
(defun exit-japanese-environment ()
--
¿Dónde estará ahora mi sobrino Yoghurtu Nghe, que tuvo que huir
precipitadamente de la aldea por culpa de la escasez de rinocerontes?
_______________________________________________
XEmacs-Patches mailing list
XEmacs-Patches(a)xemacs.org
http://calypso.tux.org/cgi-bin/mailman/listinfo/xemacs-patches