[Mew-dist 07834] Re: mew wishes :-)

[Hideyuki SHIRAI ( 白井秀行 )]

白井です。(日本語ね ^^;)

From: Kazu Yamamoto (山本和彦) <kazu at example.com> さん曰く
Subject: [Mew-dist 07833] Re: mew wishes :-)
Message-ID: <19990301191205J.kazu at example.com>
Date: Mon, 1 Mar 1999 19:12:17 +0900

> not being able to do use customize w/ emacs-19.x/mule-2.x is
> unfortunate :-(   i am more worried about whether it will cause problems
> w/ emacs-19.x/mule-2.x...(will using defcustom and such cause errors
> for emacs-19.x/mule-2.x?)

kazu> Uhhhm. Support for Emacs 19 and Mule 2.3 will be obsolete but not so
kazu> soon. Probably we should provide a dummy defcustom macro for them.

# M-x custom ってする前に、*.el みて setq しちゃうので、以下の話が
# 本当かどうか、今一不明なのですが……

とりあえず、

;;; custom.el --- User friendly customization support.
;; Copyright (C) 1995 Free Software Foundation, Inc.
;;
;; Author: Per Abrahamsen <abraham at example.com>
;; Keywords: help
;; Version: 0.5

という、custom.el (たしか、昔の w3 についてきた)が Emacs 19.28 で
動いているような感じがします。custom.el がなくても setq できますし。

また、defcustom や defgroup は以下の様にするのが一般的(?)なようで
す。(こおりやまさんの x-face-mule.el から引用)

;; for old Emacs
(eval-and-compile
  (condition-case ()
      (require 'custom)
    (file-error nil)))

(eval-when-compile
  (unless (and (fboundp 'defgroup)
	       (fboundp 'defcustom))
    (defmacro defgroup (&rest args))
    (defmacro defcustom (symbol value &optional doc &rest args)
      (let ((doc (concat "*" (or doc ""))))
	(` (defvar (, symbol) (, value) (, doc))))))
…以下 old Emacs 対応が続く…

# ご参考まで。