File skk-emacs-type.patch of Package ddskk

Description: Don't use the abolished variable `skk-emacs-type'
Author: Tatsuya Kinoshita <tats@vega.ocn.ne.jp>

2012-01-04  Tatsuya Kinoshita  <tats@vega.ocn.ne.jp>

	* experimental/skk-exserv.el, experimental/skk-w3m.el,
	experimental/rdbms/skk-rdbms.el: Don't use `skk-emacs-type'.

--- ddskk-14.4.orig/experimental/rdbms/skk-rdbms.el	2010-08-03 00:21:06.000000000 +0900
+++ ddskk-14.4/experimental/rdbms/skk-rdbms.el	2012-01-04 00:26:21.000000000 +0900
@@ -475,7 +475,7 @@
 					 skk-rdbms-shell
 					 skk-rdbms-shell-args))
 		    (process-kill-without-query skk-rdbms-process)
-		    (cond ((eq skk-emacs-type 'xemacs)
+		    (cond ((featurep 'xemacs)
 			   (set-process-input-coding-system
 			    skk-rdbms-process
 			    skk-rdbms-process-coding-system)
--- ddskk-14.4.orig/experimental/skk-exserv.el	2010-08-03 00:21:05.000000000 +0900
+++ ddskk-14.4/experimental/skk-exserv.el	2012-01-04 00:25:07.000000000 +0900
@@ -116,11 +116,9 @@
 	      nil
 	    (process-kill-without-query process)
 	    (static-cond
-	     ((eq skk-emacs-type 'xemacs)
+	     ((featurep 'xemacs)
 	      (set-process-input-coding-system process coding-system)
 	      (set-process-output-coding-system process coding-system))
-	     ((eq skk-emacs-type 'nemacs)
-	      (set-process-kanji-code process 0))
 	     (t
 	      (set-process-coding-system process coding-system coding-system)))
 	    (oset engine process process)
--- ddskk-14.4.orig/experimental/skk-w3m.el	2010-08-03 00:21:05.000000000 +0900
+++ ddskk-14.4/experimental/skk-w3m.el	2012-01-04 00:26:02.000000000 +0900
@@ -314,7 +314,7 @@
 
 (defun skk-w3m-set-process-coding-system (coding-system)
   (static-cond
-   ((eq skk-emacs-type 'xemacs)
+   ((featurep 'xemacs)
     (set-process-input-coding-system skk-w3m-process coding-system)
     (set-process-output-coding-system skk-w3m-process coding-system))
    (t
openSUSE Build Service is sponsored by