From 5fa0256cf4192fc9b7b41fa47aa961e1f32936e1 Mon Sep 17 00:00:00 2001
From: Dylan William Hardison <dylan@hardison.net>
Date: Sat, 7 Apr 2018 22:22:21 -0400
Subject: add referer

---
 Bugzilla/Quantum/CGI.pm | 7 +++++++
 1 file changed, 7 insertions(+)

(limited to 'Bugzilla')

diff --git a/Bugzilla/Quantum/CGI.pm b/Bugzilla/Quantum/CGI.pm
index 5afa19b18..34db9a46f 100644
--- a/Bugzilla/Quantum/CGI.pm
+++ b/Bugzilla/Quantum/CGI.pm
@@ -27,6 +27,13 @@ sub script_name {
     return $self->controller->req->env->{SCRIPT_NAME};
 }
 
+sub referer {
+    my ($self) = @_;
+    my $c = $self->controller;
+
+    return $c->req->headers->referrer;
+}
+
 sub http {
     my ($self, $header) = @_;
     return $self->controller->req->headers->header($header);
-- 
cgit v1.2.3-24-g4f1b