# # # add_dir "tests/heads_of_certs" # # add_file "tests/heads_of_certs/__driver__.lua" # content [6c2ce78bb9caf92755a69ae8e9fa6155c948ba69] # # patch "ChangeLog" # from [19ef27d91d42e12876dada385cbf651df5cb2898] # to [9479c4c64c5458c99b33d8fa12dabc9152ddd918] # ============================================================ --- tests/heads_of_certs/__driver__.lua 6c2ce78bb9caf92755a69ae8e9fa6155c948ba69 +++ tests/heads_of_certs/__driver__.lua 6c2ce78bb9caf92755a69ae8e9fa6155c948ba69 @@ -0,0 +1,29 @@ +mtn_setup() + +addfile("testfile", "this is just a file\n") +commit("testbranch") +first = base_revision() + +writefile("testfile", "Now, this is a different file\n") +commit("testbranch") +second = base_revision() + +writefile("testfile", "And we change it a third time\n") +commit("testbranch") +third = base_revision() + +check(mtn("cert", first, "testcert", "value=with=equal=signs")) +check(mtn("cert", second, "testcert", "value")) + +-- Check that a log without H: gives both the first and second commit... +check(mtn("log", "--revision=c:testcert", "--last=1"), 0, true, false) +check(qgrep("Revision: "..first, "stdout")) +check(qgrep("Revision: "..second, "stdout")) + +-- Check that a log with H: gives only the second commit... +check(mtn("log", "--revision=H:c:testcert", "--last=1"), 0, true, false) +check(not qgrep("Revision: "..first, "stdout")) +check(qgrep("Revision: "..second, "stdout")) +-- Note that if the third revision is in the log, something else is wrong... +-- There is really no case for this last test, just paranoia. +check(not qgrep(third, "stdout")) ============================================================ --- ChangeLog 19ef27d91d42e12876dada385cbf651df5cb2898 +++ ChangeLog 9479c4c64c5458c99b33d8fa12dabc9152ddd918 @@ -1,5 +1,11 @@ 2006-07-11 Richard Levitte + * tests/heads_of_certs/__driver__.lua (third): New test that + replaces... + * tests/t_heads_of_certs.at: this + +2006-07-11 Richard Levitte + * po/sv.po: Two new strings to translate. 2006-07-10 Derek Scherger