projects
/
elisp
/
wanderlust.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (parent:
db8dc12
)
* test-elmo-date.el (test-elmo-date-get-week): Add assert.
author
kaoru
<kaoru>
Fri, 22 Jan 2010 02:19:24 +0000
(
02:19
+0000)
committer
kaoru
<kaoru>
Fri, 22 Jan 2010 02:19:24 +0000
(
02:19
+0000)
tests/ChangeLog
patch
|
blob
|
history
tests/test-elmo-date.el
patch
|
blob
|
history
diff --git
a/tests/ChangeLog
b/tests/ChangeLog
index
147275c
..
1bba609
100644
(file)
--- a/
tests/ChangeLog
+++ b/
tests/ChangeLog
@@
-1,3
+1,7
@@
+2010-01-22 TAKAHASHI Kaoru <kaoru@kaisei.org>
+
+ * test-elmo-date.el (test-elmo-date-get-week): Add assert.
+
2010-01-01 TAKAHASHI Kaoru <kaoru@kaisei.org>
* test-elmo-util.el (test-elmo-delete-cr-1): New testcase.
2010-01-01 TAKAHASHI Kaoru <kaoru@kaisei.org>
* test-elmo-util.el (test-elmo-delete-cr-1): New testcase.
diff --git
a/tests/test-elmo-date.el
b/tests/test-elmo-date.el
index
2f1562c
..
1808eb0
100644
(file)
--- a/
tests/test-elmo-date.el
+++ b/
tests/test-elmo-date.el
@@
-7,6
+7,8
@@
"Check around singularity date. leap year and 2038-01-19."
(let ((elmo-lang "en"))
(lunit-assert
"Check around singularity date. leap year and 2038-01-19."
(let ((elmo-lang "en"))
(lunit-assert
+ (string= "Fri" (elmo-date-get-week 1582 10 15)))
+ (lunit-assert
(string= "Tue" (elmo-date-get-week 2000 2 29)))
(lunit-assert
(string= "Tue" (elmo-date-get-week 2038 1 19)))
(string= "Tue" (elmo-date-get-week 2000 2 29)))
(lunit-assert
(string= "Tue" (elmo-date-get-week 2038 1 19)))