[Mew-dist 17289] Config module

[OHARA Shigeki]

大原です。

Config をいっぱい設定していると、
Config が module 化できると便利だなと思うことがしばしばあります。


こういうのはどうでしょうか？


- config の部品 (module) をリストとして設定する。
  (下の例だと、mew-config-module-alist)

- config には、include したい module のリストを設定する。
  (下の例だと、"include-module-list")

- ある config に設定される値は、次のような順序で上書きされる。
  "default" → "include-module-list" の設定 → その config に設定された値

- リスト中の複数の module で同じ設定があるばあいは、
  リストの後ろの方で設定した値が、前の方の設定を上書きする。


設定例 (あくまで例です):

(setq mew-config-module-alist
      '(
	("private"
	 ("user" . "ohara")
	 ("name" . "おおはら")
	 )
	("private2"
	 ("name" . "お")
	 )
	("smtpauth"
	 ("smtp-user" . "ohara")
	 ("smtp-auth-list" . '("DIGEST-MD5" "CRAM-MD5"))
	 )
	("secure"
	 ("smtp-auth-list" . '("DIGEST-MD5" "CRAM-MD5" "PLAIN" "LOGIN"))
	 )
	("submission"
	 ("smtp-port" . "587")
	 )
	("tls"
	 ("smtp-connection-type" . 'starttls)
	 ("pop-connection-type" . 'starttls)
	 )
	("ssl"
	 ("smtp-connection-type" . 'ssl)
	 ("smtp-port" . "995")
	 ("pop-connection-type" . 'ssl)
	 ("pop-port" . "465")
	 )
	)
      )

(setq mew-config-alist
      '(
        ("default"
	 ("user" . "os")
	 ("name" . "OHARA Shigeki")
	 ("smtp-server" . "smtp-server.example.co.jp")
	 ("smtp-port" . "25")
	 ("pop-user" . "os")
	 ("pop-server" . "pop-server.example.co.jp")
	 ("pop-port" . "110")
	 ("pop-auth" . 'apop)
	 )
	("provider1"
	 ("include-module-list" . '("private"))
	 ("pop-auth" . 'pass)
	 ("smtp-server" . "smtp.example.ne.jp")
	 ("pop-server" . "pop.example.ne.jp")
	 )
	("provider2"
	 ("include-module-list" . '("private" "smtpauth" "submission"))
	 ("pop-auth" . 'auth)
	 ("smtp-server" . "smtp.example.net")
	 ("pop-server" . "pop.example.net")
	 )
	("provider3"
	 ("include-module-list" .
	  '("private" "private2" "smtpauth" "secure" "ssl"))
	 ("pop-auth" . 'pass)
	 ("smtp-server" . "smtp.example.jp")
	 ("pop-server" . "pop.example.jp")
	 )
	)
      )

----
OHARA Shigeki (大原 重樹) <os at example.com>