← Back to branch summary

~ubuntu-branches/ubuntu/saucy/wl/saucy-proposed

« back to all changes in this revision

Viewing changes to tests/test-elmo-localdir.el

  • Committer: Bazaar Package Importer
  • Author(s): Tatsuya Kinoshita
  • Date: 2007-01-02 21:08:54 UTC
  • mfrom: (3.1.3 edgy)
  • Revision ID: james.westby@ubuntu.com-20070102210854-nw929130dlxgi6q3
Tags: 2.14.0-4
http://bugs.debian.org/405284
elmo/elmo-imap4.el: Fix "IMAP error: No `OK' response from server",
patch from upstream CVS version. (closes: #405284)

Show diffs side-by-side

added added

removed removed

Lines of Context:
tests/test-elmo-localdir.el
 
1
(require 'lunit)
 
2
(require 'elmo-localdir)
 
3
 
 
4
(luna-define-class test-elmo-localdir (lunit-test-case))
 
5
 
 
6
(luna-define-method test-elmo-folder-expand-msgdb-path-1 ((case test-elmo-localdir))
 
7
  (lunit-assert
 
8
   (string=
 
9
    (elmo-folder-expand-msgdb-path
 
10
     (wl-folder-get-elmo-folder
 
11
      (concat "+" (expand-file-name "~/Mail/inbox"))))
 
12
    (elmo-folder-expand-msgdb-path
 
13
     (wl-folder-get-elmo-folder "+~/Mail/inbox")))))
 
14
 
 
15
(luna-define-method test-elmo-folder-expand-msgdb-path-2 ((case test-elmo-localdir))
 
16
  (lunit-assert
 
17
   (string=
 
18
    (expand-file-name "localdir/inbox" elmo-msgdb-directory)
 
19
    (elmo-folder-expand-msgdb-path (wl-folder-get-elmo-folder "+inbox")))))
 
20
 
 
21
 
 
22
(luna-define-method test-elmo-folder-expand-msgdb-path-3 ((case test-elmo-localdir))
 
23
  (lunit-assert
 
24
   (not
 
25
    (string=
 
26
     (elmo-folder-expand-msgdb-path (wl-folder-get-elmo-folder "+/inbox"))
 
27
     (elmo-folder-expand-msgdb-path (wl-folder-get-elmo-folder "+inbox"))))))