X-Git-Url: http://git.chise.org/gitweb/?a=blobdiff_plain;f=wl%2Fwl-folder.el;h=835715d22e3f25d2e83c6d3e8ccbeb4d1e4e51c1;hb=d9e613d8c4841bd56a057163810d8b77487bf8a9;hp=4e53bb8d20bf6342bacd67fead019c70d8f82e27;hpb=e848cab764dc9bbfd976826b9257be95de45a35d;p=elisp%2Fwanderlust.git diff --git a/wl/wl-folder.el b/wl/wl-folder.el index 4e53bb8..835715d 100644 --- a/wl/wl-folder.el +++ b/wl/wl-folder.el @@ -2926,7 +2926,7 @@ Call `wl-summary-write-current-folder' with current folder name." (unless entity (error "No folder")) (wl-folder-goto-folder-subr (concat "/" - (elmo-read-search-condition + (wl-read-search-condition wl-fldmgr-make-filter-default) "/" entity)))) @@ -2934,7 +2934,7 @@ Call `wl-summary-write-current-folder' with current folder name." (interactive) (save-excursion (let* ((condition (car (elmo-parse-search-condition - (elmo-read-search-condition + (wl-read-search-condition wl-summary-pick-field-default)))) (entity (wl-folder-get-entity-from-buffer)) (folder-list