diff options
| author | Alan Pearce | 2014-10-10 09:14:30 +0100 |
|---|---|---|
| committer | Alan Pearce | 2014-10-10 09:14:30 +0100 |
| commit | bd5a901a5081d01df16ab3a750fdfa403391b3d2 (patch) | |
| tree | 01dc65b765ac3f32f5e1f32a1951260cd8fe2977 /test | |
| parent | c773b522ebafbdfc9019898a83d74503700352e5 (diff) | |
| download | microformats-bd5a901a5081d01df16ab3a750fdfa403391b3d2.tar.lz microformats-bd5a901a5081d01df16ab3a750fdfa403391b3d2.tar.zst microformats-bd5a901a5081d01df16ab3a750fdfa403391b3d2.zip | |
Add helper function to get base URL
Diffstat (limited to 'test')
| -rw-r--r-- | test/microformats/parser_expectations.clj | 3 |
1 files changed, 3 insertions, 0 deletions
diff --git a/test/microformats/parser_expectations.clj b/test/microformats/parser_expectations.clj index 1c6d4f1..7344fde 100644 --- a/test/microformats/parser_expectations.clj +++ b/test/microformats/parser_expectations.clj @@ -51,6 +51,9 @@ <p><a class=\"h-org\"></a></p> </div>")))) +(expect "http://example.com" + (get-base-url (snippet "<head><base href=\"http://example.com\"></head>"))) + (expect {:name '("Name")} (parse-p (snippet "<p class=\"p-name\"><span class=\"value\">Name</span></p>"))) |