File tamago-fix-access-to-fwnn.patch of Package tamago
From: Mitsutoshi NAKANO <bkbin005@rinku.zaq.ne.jp>
Date: 2013-08-27 14:52:16 +0900
Subject: Fix that Emacs's tamago can not access to FreeWnn's jserver .
References: bnc#836138
Upstream: dead
I fixed that Emacs's tamago can not access to FreeWnn's jserver .
0. I inported new tar ball from
http://packages.debian.org/wheezy/egg .
1. I deleted (make-local-hook) function .
2. Defvaralias 'last-command-char 'last-command-event .
3. I deleted egg-canna.el .
4. I changed comm-accept-timeout from nil to 1000 in egg-com.el .
---
diff -ur egg-4.0.6+0.20041122cvs.05-oldprep/egg-com.el egg-4.0.6+0.20041122cvs/egg-com.el
--- egg-4.0.6+0.20041122cvs.05-oldprep/egg-com.el 2013-08-27 10:32:53.809412379 +0900
+++ egg-4.0.6+0.20041122cvs/egg-com.el 2013-08-28 06:54:50.607995017 +0900
@@ -822,7 +822,7 @@
(error "comm-format %s: arguments mismatch" format))
result))
-(defvar comm-accept-timeout nil)
+(defvar comm-accept-timeout 1000)
;; Assume PROC is bound to the process of current buffer
;; Do not move the point, leave it where it was.
diff -ur egg-4.0.6+0.20041122cvs.05-oldprep/egg.el egg-4.0.6+0.20041122cvs/egg.el
--- egg-4.0.6+0.20041122cvs.05-oldprep/egg.el 2013-08-27 10:32:53.808412379 +0900
+++ egg-4.0.6+0.20041122cvs/egg.el 2013-08-25 12:58:57.622094211 +0900
@@ -30,6 +30,11 @@
;;; Code:
+;;; for 24.3 and later
+(if (string< "24.3" emacs-version)
+ (progn
+ (defvaralias 'last-command-char 'last-command-event)))
+
(defconst egg-version "4.0.6+20020909cvs"
"Version number for this version of Tamago.")
@@ -169,7 +174,7 @@
(setq egg-modeless-mode t))
(setq inactivate-current-input-method-function 'egg-mode)
(setq describe-current-input-method-function 'egg-help)
- (make-local-hook 'input-method-activate-hook)
+;;; (make-local-hook 'input-method-activate-hook)
(add-hook 'input-method-activate-hook 'its-set-mode-line-title nil t)
(if (eq (selected-window) (minibuffer-window))
(add-hook 'minibuffer-exit-hook 'egg-exit-from-minibuffer))
diff -ur egg-4.0.6+0.20041122cvs.05-oldprep/menudiag.el egg-4.0.6+0.20041122cvs/menudiag.el
--- egg-4.0.6+0.20041122cvs.05-oldprep/menudiag.el 2001-01-28 03:53:13.000000000 +0900
+++ egg-4.0.6+0.20041122cvs/menudiag.el 2013-08-27 11:46:32.615174586 +0900
@@ -503,7 +503,7 @@
(make-local-variable 'inhibit-read-only)
(setq buffer-read-only t
inhibit-read-only nil)
- (make-local-hook 'post-command-hook)
+;;; (make-local-hook 'post-command-hook)
(add-hook 'post-command-hook 'menudiag-selection-align-to-item nil t)
(use-local-map menudiag-selection-map)
(setq mode-name "Menudiag Selection")
diff -ur egg-4.0.6+0.20041122cvs.05-oldprep/suse-start.el egg-4.0.6+0.20041122cvs/suse-start.el
--- egg-4.0.6+0.20041122cvs.05-oldprep/suse-start.el 2013-08-25 15:56:40.255474625 +0900
+++ egg-4.0.6+0.20041122cvs/suse-start.el 2013-08-27 14:36:47.539624883 +0900
@@ -1,8 +1 @@
(load "/usr/share/emacs/site-lisp/egg/leim-list")
-
-;; egg-canna.el makes the CANNA commands of emcws available with tamago.
-;; egg-canna.el is already part of the tamago package in SuSE GNU/Linux.
-;; to use it you need the following hook:
-
-(add-hook 'canna-load-hook '(lambda () (load "egg-canna.el")))
-