From 36f4e08ee2f7859f9325e0c0b02af416e9ddbc72 Mon Sep 17 00:00:00 2001 From: morioka Date: Mon, 15 Jan 1996 20:28:32 +0000 Subject: [PATCH] (mu-register/save-to-file): new implementation --- mu-register.el | 15 ++++++++++----- 1 file changed, 10 insertions(+), 5 deletions(-) diff --git a/mu-register.el b/mu-register.el index 25a10a6..dd053bc 100644 --- a/mu-register.el +++ b/mu-register.el @@ -7,7 +7,7 @@ ;;; modified by MORIOKA Tomohiko ;;; Created: 1995/12/27 by MINOURA Makoto ;;; Version: -;;; $Id: mu-register.el,v 1.5 1996-01-15 20:04:52 morioka Exp $ +;;; $Id: mu-register.el,v 1.6 1996-01-15 20:28:32 morioka Exp $ ;;; ;;; This file is part of tl (Tiny Library). ;;; @@ -46,6 +46,10 @@ ;;; Code: +(require 'mu-cite) +(require 'pp) + + ;;; @ variables ;;; @@ -125,9 +129,11 @@ (erase-buffer) (insert ";; generated automatically by mu-register.\n") (insert (format "(setq %s - '" mu-register/registration-symbol)) - (insert (prin1-to-string mu-register/citation-name-alist)) - (insert "\n)\n") + '(" mu-register/registration-symbol)) + (insert (mapconcat + (function prin1-to-string) + mu-register/citation-name-alist "\n ")) + (insert "\n ))\n") (save-buffer)) (kill-buffer buffer))) @@ -135,7 +141,6 @@ ;;; @ Installation ;;; -(require 'mu-cite) (set-alist 'mu-cite/default-methods-alist 'registered (function mu-register/citation-name)) -- 1.7.10.4