Logujeme referrer

VERSION

-1.1.1
+1.2.0

lib/PZ/Controller/Shortcut.pm

@@ -17,8 +17,9 @@ sub redirect ($c) {
     }
 
     $shortcut->add_to_log_items({
-        ip => ($c->forwarded_for || $c->tx->remote_address),
-        ua => $c->req->headers->user_agent,
+        ip       => ($c->forwarded_for || $c->tx->remote_address),
+        ua       => $c->req->headers->user_agent,
+        referrer => $c->req->headers->referrer,
     });
 
     $c->res->code($shortcut->code);

lib/PZ/Schema/Result/Log.pm

@@ -21,6 +21,7 @@ __PACKAGE__->add_columns(
         shortcut_id
         ip
         ua
+        referrer
     ),
 );
 

sql/migrations.sql

@@ -47,3 +47,6 @@ create index "shortcuts_shortcut_idx" on "shortcuts" ("shortcut");
 
 -- 3 up
 alter table "log" add column "ua" text;
+
+-- 4 up
+alter table "log" add column "referrer" text;