|
537 | 537 | (is (j/not-before? february january)) |
538 | 538 | (is (not (j/not-before? january february)))) |
539 | 539 |
|
540 | | - (let [:2009 (j/year 2009) |
541 | | - :2010 (j/year 2010)] |
542 | | - (is (j/after? :2010 2009)) |
543 | | - (is (not (j/after? :2009 2010))) |
544 | | - (is (j/before? :2009 2010)) |
545 | | - (is (not (j/before? :2010 2009))) |
546 | | - (is (j/not-after? :2009 :2009)) |
547 | | - (is (j/not-after? :2009 :2010)) |
548 | | - (is (not (j/not-after? :2010 :2009))) |
549 | | - (is (j/not-before? :2010 :20010)) |
550 | | - (is (j/not-before? :2010 :2009)) |
551 | | - (is (not (j/not-before? :2009 :2010)))) |
| 540 | + (let [year-2009 (j/year 2009) |
| 541 | + year-2010 (j/year 2010)] |
| 542 | + (is (j/after? year-2010 2009)) |
| 543 | + (is (not (j/after? year-2009 2010))) |
| 544 | + (is (j/before? year-2009 2010)) |
| 545 | + (is (not (j/before? year-2010 2009))) |
| 546 | + (is (j/not-after? year-2010 year-2010)) |
| 547 | + (is (j/not-after? year-2009 year-2010)) |
| 548 | + (is (not (j/not-after? year-2010 year-2009))) |
| 549 | + (is (j/not-before? year-2010 year-2010)) |
| 550 | + (is (j/not-before? year-2010 year-2009)) |
| 551 | + (is (not (j/not-before? year-2009 year-2010)))) |
552 | 552 |
|
553 | 553 | (is (j/after? (j/month-day 5 1) (j/month-day 4 1))) |
554 | 554 | (is (j/before? (j/month-day 1 1) (j/month-day 4 1))))) |
|
0 commit comments