[Mew-dist 05992] Re: Decoding quoted printable on Emacs-20.3

[Hideyuki SHIRAI ( 白井秀行 )]

$BGr0f$G$9!#(B

From: SAKAI Kiyotaka <ksakai at example.com> $B$5$s[)$/(B
Subject: [Mew-dist 05973] Decoding quoted printable on Emacs-20.3
Message-ID: <19980818163654G.ksakai at example.com>
Date: Tue, 18 Aug 1998 16:37:04 +0900

sakai> Emacs 20.3 $B$G$O(B
sakai>   (concat "\305" "$B$"(B")
sakai> $B$,(B "\305$B$"(B" $B$G$O$J$/$F(B "NE$B$"(B" $B$rJV$9$3$H$, at example.com<0$J;EMM$K$J$j!"(B"\305$B$"(B" $B$r(B
sakai> $BJV$5$;$k$?$a$K$O(B

sakai>   (concat (string-as-multibyte "\305") "$B$"(B")
sakai> $B$H$9$kI,MW$,$"$j$^$9!#(B

$B$N%Q%C%A$N$J$+$N(B string-as-multibyte $B$J$N$G$9$,(B
$BNc$($P!"(BEmacs20.2.1 + emu.el $B$N$h$&$J(B

M-x describe-function^J string-as-multibyte^J

string-as-multibyte is a Lisp macro.

Return a multibyte string with the same individual bytes as STRING.
If STRING is multibyte, the result is STRING itself.
[Emacs 20.3 emulating macro]

$B$H$G$k4D6-$G$O!"%(%i!<$K$J$C$F$7$^$$$^$9!#(B
$B$A$J$_$K(B (apel-8.16 $BIUB0$N(B) emu.el $B$G$O$3$&$d$C$FDj5A$7$F$$$^$9!#(B

(defmacro-maybe string-as-multibyte (string)
  "Return a multibyte string with the same individual bytes as STRING.
If STRING is multibyte, the result is STRING itself.
\[Emacs 20.3 emulating macro]"
  string)

$BD4$Y$?$H$3$m!"B>$K(B string-as-multibyte $B$r8F$s$G$$$k$b$N$,$J$$$h(B
$B$&$@$C$?(B(?)$B$N$G(B $B>e5-$N(B defmacro $B$r%3%a%s%H%"%&%H$7$F$7$^$C$?$N$G(B
$B$9$,!"$H$j$"$($:$4Js9p$^$G!#(B

## (macrop 'string-as-multibyte) $B$C$F=PMh$J$$$N$+$7$i!#(B

sakai> # Emacs 20.3 $B$OL at example.com|(B 8/19 $B$K%j%j!<%9M=Dj$i$7$$$G$9!#(B

$B$3$A$i$O$H$C$F$b3Z$7$_$G$9!#(B

-- 
$BGr0f=(9T(B (Hideyuki SHIRAI)