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")))
-
openSUSE Build Service is sponsored by