make-ccl-coding-system の、バ ージョン依存の動作につい て (Re: Quoted-Printable なエンティテ ィの保存に失敗する )

--Multipart_Fri_Feb_08_23:49:26_2008-1
Content-Type: text/plain; charset=ISO-2022-JP

apel-ja $B$N3'MM!"$O$8$a$^$7$F!"0KF#$H?=$7$^$9!#(B

Windows $B>e$N(B Emacs 22.1 (Meadow 3) $B$G(B Wanderlust $B$r;HMQ$7$F$$$k$N$G$9$,!"(B
Quoted-Printable $B$G%(%s%3!<%I$5$l$?%(%s%F%#%F%#$r%G%#%9%/$KJ]B8$9$k$H(B
$B@5$7$/%G%3!<%I$5$l$J$$$H$$$&8=>]$,@8$8$^$9!#(B

$B0JA0$K(B emacs-mime-ja $B$KEj9F$7$?%a!<%k(B ([emacs-mime-ja: 02196]) $B$G$O(B
$B<h$j4:$($:F0:n$9$k!"(BFLIM $B$KBP$9$k%Q%C%A$rEj9F$7$^$7$?$,!"(B
$B$b$&>/$7D4$Y$?$H$3$m!"(BAPEL $B$bMm$s$@OC$N$h$&$K;W$$$^$7$?$N$G(B
apel-ja $B$K$bEj9F$7$^$9!#(B

$BA02s$N%a!<%k$K=q$$$?$h$&$KD>@\$N860x$O(B

> $BJ]B8;~$K(Bcoding-system-for-write $B$K@_Dj$7$F$$$k(B
> mel-ccl-quoted-printable-lf-lf-rev $B$N(B EOL type $B$O(B undecided $B$G$"$j!"(B
> Windows $B>e$N(B Emacs 22 $B$G$O(B EOL type $B$K(B CRLF $B$,(B
> $BA*Br$5$l$F$7$^$&(B ($B7k2L!"(BEOL $B$,(B CRLF $B$J%G!<%?$,%G%3!<%@$KEO$j!"(B
> $B%G%3!<%@$O$=$N%G!<%?$r(B EOL $B$,(B LF $B$H$7$F%G%3!<%I$7$F$$$k(B) $B0Y$N$h$&$G$9!#(B

$B$@$H;W$o$l$^$9!#(B
$B$5$F!"$3$N(B mel-ccl-quoted-printable-lf-lf-rev $B$H$$$&(B coding system $B$O(B
APEL $B$GDs6!$5$l$k(B make-ccl-coding-system $B$rMQ$$$F:n$i$l$F$$$^$9!#(B

$B$H$3$m$,!"(Bmake-ccl-coding-system $B$rMQ$$$F(B coding system $B$r:n$C$?>l9g!"(B
Emacs 21$B0J9_$H$=$l$h$jA0$G$OF0:n$,0[$J$j$^$9!#(B
($B0J2<$O%=!<%9$+$i$N?dB,$b$^$8$j$^$9!#(B
 Meadow (Emacs 20.7.1) $B$H(B Meadow2 (Emacs 21.4.1) $B0J9_$G0[$J$k;v$O(B
 $B3NG'$7$^$7$?!#(B)
Emacs 20.7 $B$^$G$O(B EOL type $B$,(B LF $B$K@_Dj$5$l$^$9$,!"(B
Emacs 21.1 $B0J9_(B $B$G$O(B EOL type $B$,(B undecided $B$K@_Dj$5$l!"(B
-unix, -dos, -mac $B$,KvHx$K$D$$$?(B coding system $B$bF1;~$K:n@.$5$l$^$9!#(B

$B$3$l$O!"(Bmake-ccl-coding-system $B$+$i8F$S=P$5$l$k(B make-coding-system $B$N(B
$BF0:n$,JQ$o$C$?;v$K$h$j$^$9!#(B
Emacs 21 $B0J9_$N(B make-coding-system $B$O!"%*%W%7%g%s$N0z?t(B eol-type $B$,(B
$BA}$(!";XDj$7$J$$>l9g$O(B EOL type $B$,(B undecided $B$J(B coding system $B$r(B
$B:n@.$9$k$h$&$K$J$j$^$7$?!#(B
Emacs 20.7 $B0JA0$O(B CCL based $B$J(B coding system $B$N>l9g!">o$K(B EOL type $B$O(B
LF $B$K$J$C$F$$$?$h$&$G$9!#(B

$B<h$j4:$($:(B Emacs 21 $B0J9_$G$b(B EOL type $B$,(B LF $B$J(B coding system $B$N$_$,(B
$B:n$i$l$k$h$&$K$9$k%Q%C%A$rE:IU$7$^$9!#(B
APEL $B$N;EMM$,J,$+$i$J$$$N$G(B FLIM $B$H$I$A$i$GBP:v$9$Y$-$+$b(B
$BJ,$+$j$^$;$s$,!";EMM$HBP:v$r$48!F$$$$?$@$1$l$P9,$$$G$9!#(B

-- 
$B0KF#(B $BOBGn(B(Kazuhiro Ito)

--Multipart_Fri_Feb_08_23:49:26_2008-1
Content-Type: application/octet-stream; type=patch
Content-Disposition: attachment; filename="apel.diff"
Content-Transfer-Encoding: 7bit

Index: pccl-20.el
===================================================================
RCS file: /cvs/root/apel/pccl-20.el,v
retrieving revision 1.9
diff -u -r1.9 pccl-20.el
--- pccl-20.el	6 Jul 2005 02:08:52 -0000	1.9
+++ pccl-20.el	15 Jan 2008 04:08:15 -0000
@@ -88,8 +88,11 @@
       (when-broken ccl-accept-symbol-as-program
 	(setq decoder (symbol-value decoder))
 	(setq encoder (symbol-value encoder)))
-      (make-coding-system coding-system 4 mnemonic docstring
-			  (cons decoder encoder)))
+      (if (>= emacs-major-version 21)
+	  (make-coding-system coding-system 4 mnemonic docstring
+			      (cons decoder encoder) nil 'unix)
+	(make-coding-system coding-system 4 mnemonic docstring
+			    (cons decoder encoder))))
     )
 
   (when-broken ccl-accept-symbol-as-program

--Multipart_Fri_Feb_08_23:49:26_2008-1--