Remove hardcoded 'http://' URL. Closes #12447.

diff --git a/ChangeLog b/ChangeLog
index ee2c394..e6d6520 100644 (file)
--- a/ChangeLog
+++ b/ChangeLog
@@ -4,6 +4,10 @@
        lib/Keitairc/IrcCallback.pm: join/leave\e$B%a%C%;!<%8$r$^$H$a$FI=<($9\e(B
        \e$B$k%7%9%F%`%a%C%;!<%8MQ\e(B(\e$B2>A[\e(B)\e$B%A%c%s%M%k$rI=<($9$k$?$a$N%*%W%7%g%s$r\e(B
        \e$BDI2C\e(B (thanks to Takahashi Yoshihiro)\e$B!%\e(B Closes #12452.
+       * lib/Keitairc/View.pm: keitairc\e$B$K%"%/%;%9$9$k:]$N\e(BURL\e$B$,\e(Bhttp\e$B%W%m%H\e(B
+       \e$B%3%k7h$aBG$A$K$J$C$F$$$k$N$r$d$a$k!%$3$l$K$h$j!$\e(BSSL\e$B7PM3$G$N%"%/%;\e(B
+       \e$B%9$r9T$&$h$&$K$7$F$b4|BT$7$?F0:n$r$9$k$h$&$K$J$k\e(B
+       (thanks to Takahashi Yoshihiro)\e$B!%\e(B Closes #12447.
 
 2008-05-02  Makoto Matsushita  <matusita@jp.FreeBSD.org>
 

diff --git a/lib/Keitairc/View.pm b/lib/Keitairc/View.pm
index 4d549fe..896d3bd 100644 (file)
--- a/lib/Keitairc/View.pm
+++ b/lib/Keitairc/View.pm
@@ -1,6 +1,6 @@
 # -*-perl-*-
 # Keitairc::View
-# $Id: View.pm,v 1.8 2008-02-26 00:41:09 morimoto Exp $
+# $Id: View.pm,v 1.9 2008-05-02 15:29:36 matusita Exp $
 # $Source: /home/ishikawa/work/keitairc/tmp/keitairc/lib/Keitairc/View.pm,v $
 #
 # Copyright (c) 2008 Jun Morimoto <morimoto@mrmt.net>
@@ -33,18 +33,10 @@ sub redirect{
        my $me = shift;
        my $path = shift;
 
-       if($me->{Config}->web_root() eq '/'){
-               $path = sprintf('http://%s:%d%s%s',
-                               $me->{Config}->web_host(),
-                               $me->{Config}->web_port(),
-                               $path);
-       }else{
+       if($me->{Config}->web_root() ne '/'){
                # Softbank
                $path =~ s|^/||;
-               $path = sprintf('http://%s%s%s',
-                               $me->{Config}->web_host(),
-                               $me->{Config}->web_root(),
-                               $path);
+               $path = sprintf('%s%s', $me->{Config}->web_root(), $path);
        }
 
        ::log_debug("path [$path]");