From 5c433a18368682a2ac049f7551ed74c740fe1b39 Mon Sep 17 00:00:00 2001 From: morioka Date: Mon, 23 Aug 1999 06:03:30 +0000 Subject: [PATCH] 1999-08-19 TSUMURA Tomoaki * mel-b-el.el (base64-num-to-char): Use <(` ...)> and <(, ...)> instead of <`...> and <,...>. (base64-char-to-num): Likewise. --- mel-b-el.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) 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)) -- 1.7.10.4