Add helper function to get base URL
Add function to normalise a URL
Use zippers all the way down

Includes an ugly "workaround" for interface differences in enlive
between select and zip-select
Normalise parsed URLs