From 68569576e658306d1f29368bce7a933888c49dd5 Mon Sep 17 00:00:00 2001
From: yoichi <yoichi>
Date: Sun, 8 Apr 2007 16:01:06 +0000
Subject: [PATCH] sample setting to call wl-summary-unvirtual as
 wl-summary-buffer-exit-function

---
 samples/en/dot.wl |    9 +++++++++
 samples/ja/dot.wl |    9 +++++++++
 2 files changed, 18 insertions(+)

diff --git a/samples/en/dot.wl b/samples/en/dot.wl
index 41bda50..904aca6 100644
--- a/samples/en/dot.wl
+++ b/samples/en/dot.wl
@@ -174,6 +174,15 @@
 ;	     (wl-folder-open-unread-folder entity)
 ;	     ))
 
+;; Jump to unfiltered folder by `wl-summary-exit'. It is useful for people who
+;; use filtered folder as a temporary folder created by `wl-summary-virtual'.
+;(add-hook 'wl-summary-prepared-hook
+;	  '(lambda ()
+;	     (setq wl-summary-buffer-exit-function
+;		   (when (eq 'filter
+;			     (elmo-folder-type-internal wl-summary-buffer-elmo-folder))
+;		     'wl-summary-unvirtual))))
+
 ;; Change summary display function.
 
 ;; Set extra field use with `elmo-message-entity-field'.
diff --git a/samples/ja/dot.wl b/samples/ja/dot.wl
index 7dd59eb..dbe8c62 100644
--- a/samples/ja/dot.wl
+++ b/samples/ja/dot.wl
@@ -173,6 +173,15 @@
 ;	     (wl-folder-open-unread-folder entity)
 ;	     ))
 
+;; `wl-summary-exit' によりフィルタされる前のフォルダに飛ぶ。フィルタフォルダを
+;; `wl-summary-virtual' で生成される一時的なフォルダとして使う場合に有用。
+;(add-hook 'wl-summary-prepared-hook
+;	  '(lambda ()
+;	     (setq wl-summary-buffer-exit-function
+;		   (when (eq 'filter
+;			     (elmo-folder-type-internal wl-summary-buffer-elmo-folder))
+;		     'wl-summary-unvirtual))))
+
 ;; サマリ表示関数を変更する
 
 ;; `elmo-message-entity-field' で参照したいフィールド。
-- 
1.7.10.4