diff options
| author | louise <louise> | 2009-09-16 17:00:35 +0000 |
|---|---|---|
| committer | louise <louise> | 2009-09-16 17:00:35 +0000 |
| commit | ad3a4b6bb92f2a18be9788d4b23933b3dc746e53 (patch) | |
| tree | 9ff4aaf9c35167e07cf83d822c66e1e29feaabd9 /bin/send-questionnaires | |
| parent | 29a92a67bb5d1c6f4e717c5c97a2d950d1af1fb5 (diff) | |
Allowing base url to be set for links sent in emails
Diffstat (limited to 'bin/send-questionnaires')
| -rwxr-xr-x | bin/send-questionnaires | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/bin/send-questionnaires b/bin/send-questionnaires index 9390360d8..03511f8dd 100755 --- a/bin/send-questionnaires +++ b/bin/send-questionnaires @@ -6,7 +6,7 @@ # Copyright (c) 2007 UK Citizens Online Democracy. All rights reserved. # Email: matthew@mysociety.org. WWW: http://www.mysociety.org # -# $Id: send-questionnaires,v 1.16 2009-09-10 13:03:37 louise Exp $ +# $Id: send-questionnaires,v 1.17 2009-09-16 17:00:35 louise Exp $ use strict; require 5.8.0; @@ -78,7 +78,7 @@ foreach my $row (@$unsent) { dbh()->do("update problem set send_questionnaire = 'f' where id=?", {}, $row->{id}); my $token = mySociety::AuthToken::store('questionnaire', $id); - $h{url} = Cobrand::base_url($cobrand) . '/Q/' . $token; + $h{url} = Cobrand::base_url_for_emails($cobrand) . '/Q/' . $token; my $sender = Cobrand::contact_email($cobrand); $sender =~ s/team/fms-DO-NOT-REPLY/; |