+;; -*- lexical-binding: t -*-
(require 'lunit)
(require 'elmo-localdir)
(luna-define-method test-elmo-folder-expand-msgdb-path-2 ((case test-elmo-localdir))
(lunit-assert
(string=
- (elmo-folder-expand-msgdb-path (wl-folder-get-elmo-folder "+inbox"))
- (expand-file-name "localdir/inbox" elmo-msgdb-directory))))
+ (expand-file-name "localdir/inbox" elmo-msgdb-directory)
+ (elmo-folder-expand-msgdb-path (wl-folder-get-elmo-folder "+inbox")))))
(luna-define-method test-elmo-folder-expand-msgdb-path-3 ((case test-elmo-localdir))