equal
deleted
inserted
replaced
802 repo := self repositoryNamed:'test_repo_01'. |
802 repo := self repositoryNamed:'test_repo_01'. |
803 |
803 |
804 self should: [ repo @ 100] raise: HGUnknownRevisionError |
804 self should: [ repo @ 100] raise: HGUnknownRevisionError |
805 |
805 |
806 "Created: / 27-08-2015 / 19:37:57 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
806 "Created: / 27-08-2015 / 19:37:57 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
|
807 ! |
|
808 |
|
809 test_csentry_newer_01 |
|
810 |
|
811 | repo cs csentry newer | |
|
812 |
|
813 repo := self repositoryNamed: 'mocks/hg/p6' revision: 1. |
|
814 " |
|
815 UserPreferences fileBrowserClass openOn: repo pathName. |
|
816 " |
|
817 cs := repo @ 1. |
|
818 csentry := cs / 'MocksHGP6Bar.st'. |
|
819 newer := csentry newer: true. |
|
820 self assert: newer size == 2. |
|
821 self assert: newer first changesetId = '4:f71dfc6c6f9b' asHGChangesetId. |
|
822 self assert: newer second changesetId = '2:581b3cabbf8f' asHGChangesetId. |
|
823 |
|
824 "Created: / 24-04-2016 / 12:16:14 / Jan Vrany <jan.vrany@fit.cvut.cz>" |
807 ! ! |
825 ! ! |
808 |
826 |
809 !HGTests methodsFor:'tests - commit'! |
827 !HGTests methodsFor:'tests - commit'! |
810 |
828 |
811 test_commit_02 |
829 test_commit_02 |