# -*- mode: perl; coding: utf-8 -*-
# keitairc/lib/plugins/10url
# URL処理
-# $Id: 10url,v 1.12 2009-07-16 14:36:31 ishikawa Exp $
+# $Id: 10url,v 1.13 2009-07-16 14:51:06 ishikawa Exp $
# $Source: /home/ishikawa/work/keitairc/tmp/keitairc/lib/plugins/10url,v $
# The line number (1 incremented) and filename below must be
my $ci = new Keitairc::ClientInfo($request);
my $url = $param =~ m/^http/ ? $param : 'http://' . $param;
if ($ci->is_ipod) {
- return sprintf('<a target="_self" class="inline" onTouchStart="restore_original(this);" onClick="noreferer(this);true;" o_href="%s" href="%s">%s</a>',
+ return sprintf('<a target="_blank" class="inline" onTouchStart="restore_original(this);" onClick="noreferer(this);true;" o_href="%s" href="%s">%s</a>',
$url, $url, $param);
} else {
return sprintf('<a target="_self" class="inline" href="%s%s/url/%s">%s</a>',