From 97a7a0e454b27e62675adabd05d428bf668db91d Mon Sep 17 00:00:00 2001
From: morioka <morioka>
Date: Mon, 15 Jan 1996 21:19:11 +0000
Subject: [PATCH] (mu-register/get-citation-name): new implementation by macro

---
 mu-register.el |    6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/mu-register.el b/mu-register.el
index a3f448d..f7d1d08 100644
--- a/mu-register.el
+++ b/mu-register.el
@@ -7,7 +7,7 @@
 ;;;         modified by MORIOKA Tomohiko <morioka@jaist.ac.jp>
 ;;; Created: 1995/12/27 by MINOURA Makoto <minoura@leo.bekkoame.or.jp>
 ;;; Version:
-;;;	$Id: mu-register.el,v 1.7 1996-01-15 21:07:05 morioka Exp $
+;;;	$Id: mu-register.el,v 1.8 1996-01-15 21:19:11 morioka Exp $
 ;;;
 ;;; This file is part of tl (Tiny Library).
 ;;;
@@ -72,8 +72,8 @@
 ;;;
 
 ;; get citation-name from the database
-(defsubst mu-register/get-citation-name (from)
-  (cdr (assoc from mu-register/citation-name-alist)))
+(defmacro mu-register/get-citation-name (from)
+  (` (cdr (assoc (, from) mu-register/citation-name-alist))))
 
 ;; register citation-name to the database
 (defun mu-register/add-citation-name (name from)
-- 
1.7.10.4