X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=mel-b-el.el;h=42380158a74d4fa3fd9537326eb875c7ecf71639;hb=refs%2Ftags%2Fclime-1_13_3;hp=f66185332b78a2b22635b4af0932509f7f058425;hpb=88006a55b33c0bb9f537158612a9880f50176792;p=elisp%2Fflim.git

diff --git a/mel-b-el.el b/mel-b-el.el
index f661853..4238015 100644
--- a/mel-b-el.el
+++ b/mel-b-el.el
@@ -100,7 +100,7 @@ external decoder is called."
   )
 
 (defmacro base64-num-to-char (n)
-  `(aref base64-characters ,n))
+  (` (aref base64-characters (, n))))
 
 (defun base64-encode-1 (pack)
   (let ((buf (make-string 4 ?=)))
@@ -170,7 +170,7 @@ external decoder is called."
       vec)))
 
 (defmacro base64-char-to-num (c)
-  `(aref base64-numbers ,c))
+  (` (aref base64-numbers (, c))))
 
 (defsubst base64-internal-decode (string buffer)
   (let* ((len (length string))