ddskk/skk-emacs-type.patch
2012-07-04 13:37:18 +00:00

46 lines
1.8 KiB
Diff

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