[Mew-dist 17337] Re: signature

[OHARA Shigeki]

大原です。

From: Yoshinori Sakamoto <yosino-s at example.com>
Subject: [Mew-dist 17331] Re: signature
Message-ID: <20010511.191031.846956136.yosino-s at example.com>
Date: Fri, 11 May 2001 19:10:32 +0900

> すばらしい。c-sig だと、データベースを作ってくれるのはいいんだけど、宛
> 先ごとになってしまうので往生していました。case ごとに変わってくれた方
> が思考と一致しててありがたいです。

私は、c-sig の signature が case で切り替えられるようになっていると
かなり嬉しいです。

----
OHARA Shigeki (大原 重樹) <os at example.com>
＃ 私は、Emacs Lisp はさっぱりなので、ヘンなところがあるかも知れません……。
-------------- next part --------------
Common subdirectories: mew-1.95b121/bin and mew-1.95b121.c-sig/bin
Common subdirectories: mew-1.95b121/contrib and mew-1.95b121.c-sig/contrib
Common subdirectories: mew-1.95b121/etc and mew-1.95b121.c-sig/etc
Common subdirectories: mew-1.95b121/info and mew-1.95b121.c-sig/info
diff -u mew-1.95b121/mew-config.el mew-1.95b121.c-sig/mew-config.el
--- mew-1.95b121/mew-config.el	Tue Apr 17 11:14:35 2001
+++ mew-1.95b121.c-sig/mew-config.el	Fri May 11 20:37:21 2001
@@ -224,6 +224,9 @@
 (defun mew-header-alist (&optional case)
   (mew-cfent-value case "header-alist" mew-header-alist))
 
+(defun mew-c-sig (&optional case)
+  (mew-cfent-value case "c-sig" mew-c-sig))
+
 ;;;
 ;;; Setting Config
 ;;;
diff -u mew-1.95b121/mew-vars.el mew-1.95b121.c-sig/mew-vars.el
--- mew-1.95b121/mew-vars.el	Tue Apr 24 15:45:04 2001
+++ mew-1.95b121.c-sig/mew-vars.el	Fri May 11 20:35:12 2001
@@ -1087,6 +1087,11 @@
   :group 'mew-draft
   :type 'boolean)
 
+(defcustom mew-c-sig nil
+  ""
+  :group 'mew-draft
+  :type 'string)
+
 ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
 ;;;
 ;;; Draft mode
-------------- next part --------------
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
;;;
;;; mew-c-sig
;;;
;;; Usage: put these lines into your ~/.emacs or ~/.mew
;;;  (load "mew-c-sig")
;;;  (setq sig-search-functions
;;;    (list
;;;     'sig-search-mew-config 'sig-search-name-alist 'sig-search-regexp))

(defun sig-search-mew-config ()
  (interactive)
  (let* ((case (mew-tinfo-get-config)))
    (mew-c-sig case)))