[dw-free] 500 error when trying to edit a comment while logged out

[fu]

[commit: http://hg.dwscoalition.org/dw-free/rev/47ef8a829f05]

http://bugs.dwscoalition.org/show_bug.cgi?id=3126

Use correct method.

Patch by fu.

Files modified:

• cgi-bin/LJ/S2/ReplyPage.pm

--------------------------------------------------------------------------------
diff -r 6fb01f07a7ae -r 47ef8a829f05 cgi-bin/LJ/S2/ReplyPage.pm
--- a/cgi-bin/LJ/S2/ReplyPage.pm	Tue Oct 12 18:15:14 2010 +0800
+++ b/cgi-bin/LJ/S2/ReplyPage.pm	Tue Oct 12 19:10:40 2010 +0800
@@ -90,7 +90,7 @@ sub ReplyPage
         $comment = LJ::Comment->new($u, dtalkid => $editid);
         unless ($remote) {
             my $r = $opts->{'r'};
-            my $host = $r->header_in("Host");
+            my $host = $r->headers_in->{Host};
             my $uri = $r->uri;
             my $args = scalar $r->args;
             my $querysep = $args ? "?" : "";
--------------------------------------------------------------------------------