aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authormatthew <matthew>2009-07-22 21:56:38 +0000
committermatthew <matthew>2009-07-22 21:56:38 +0000
commitd6499a4ee6542b1a1fc749389ff17581bb0722a1 (patch)
tree579ce58102414f18c433a1b421defa012104f885
parentcfc64592535b2f904dd00f83f3bdcd2f3d841a75 (diff)
Add link to admin page.
-rwxr-xr-xweb/contact.cgi5
1 files changed, 3 insertions, 2 deletions
diff --git a/web/contact.cgi b/web/contact.cgi
index 29e929516..fa9596f55 100755
--- a/web/contact.cgi
+++ b/web/contact.cgi
@@ -6,7 +6,7 @@
# Copyright (c) 2006 UK Citizens Online Democracy. All rights reserved.
# Email: matthew@mysociety.org. WWW: http://www.mysociety.org
#
-# $Id: contact.cgi,v 1.39 2009-05-27 13:53:53 matthew Exp $
+# $Id: contact.cgi,v 1.40 2009-07-22 21:56:38 matthew Exp $
use strict;
use Standard;
@@ -50,7 +50,8 @@ sub contact_submit {
(my $message = $input{message}) =~ s/\r\n/\n/g;
(my $subject = $input{subject}) =~ s/\r|\n/ /g;
$message .= "\n\n[ Complaint about report $input{id} - "
- . mySociety::Config::get('BASE_URL') . "/report/$input{id} ]"
+ . mySociety::Config::get('BASE_URL') . "/report/$input{id} - "
+ . "https://secure.mysociety.org/admin/bci/?page=report_edit;id=$input{id} ]"
if $input{id};
my $postfix = '[ Sent by contact.cgi on ' .
$ENV{'HTTP_HOST'} . '. ' .