Add missing psql function domain (thanks sjuxax)

Author: ketralnis

sql/functions.sql

@@ -36,9 +36,13 @@ create or replace function ip_network(ip text) returns text as $$
     select substring($1 from E'[\\d]+\.[\\d]+\.[\\d]+')
 $$ language sql immutable;
 
-create or replace function base_url(url texT) returns text as $$
+create or replace function base_url(url text) returns text as $$
     select substring($1 from E'(?i)(?:.+?://)?(?:www[\\d]*\\.)?([^#]*[^#/])/?')
 $$ language sql immutable;
 
+create or replace function domain(url text) returns text as $$
+    select substring($1 from E'(?i)(?:.+?://)?(?:www[\\d]*\\.)?([^#/]*)/?')
+$$ language sql immutable;
+
 create view active as
     select pg_stat_activity.procpid, (now() - pg_stat_activity.query_start) as t, pg_stat_activity.current_query from pg_stat_activity where (pg_stat_activity.current_query <> '<IDLE>'::text) order by (now() - pg_stat_activity.query_start);