hebohebo-mobileprogrammer-diary

 | 

2008-03-03

H::M::P::Locator trunkにマージ 22:13

r7422でbranches/get_locator_from_paramsをマージさせていただきました。

しっかしpodの書き方そろそろ本気で覚えないと駄目だわ・・・。

あと英語・・・。

H::M::P::Locator再度修正 20:04

#mobilejpでいろいろとアドバイスを受けr7408の修正をしました。

下記のように使えるようになりました。

use HTTP::MobileAgent;
use HTTP::MobileAgent::Plugin::Locator qw/:locator/;
# これで、$LOCATOR_AUTO_FROM_COMPLIANT $LOCATOR_AUTO $LOCATOR_GPS $LOCATOR_BASIC が使えるようになる
# $LOCATOR_AUTO_FROM_COMPLIANT = 今のtrunkと一緒。GPS対応機ならGPSロケータ
# $LOCATOR_AUTO                = 入力パラメータによる自動判別
# $LOCATOR_GPS                 = GPSロケータ
# $LOCATOR_BASIC               = Basicロケータ

my $agent = HTTP::MobileAgent->new;

# いままでどおりGPS対応機ならGPSロケータ使用
my $location = $agent->get_location($params);

# 明示的にロケータ使用
$location = $agent->get_location($params, { locator => $LOCATOR_BASIC });

テストはもちっと追加しなきゃかも。ドキュメントは英語・・・だとうまく書ける自信なし><


H::M::P::Locatorにさらに手を加える 15:55

パラメータの自動判別はどうなんだろとid:tokuhirom氏にDISられたので明示的に指定する引数を追加するように方向転換。指定されていなかったら(undefinedだったら)従前通りGPSかどうかで判断してます。

あと、パラメータでの判別も外側でやりたいので

$agent->gps_parameter

を追加しました。

下記のように3種類の使い分けができます。

my $agent = HTTP::MobileAgent->new;

# いままでどおりGPS対応機ならGPSロケータ使用
my $location = $agent->get_location($params);

# 明示的にBasicロケータ使用
$location = $agent->get_location($params, 0);

# 入力パラメータによってロケータを切り分け
$location = $agent->get_location(
    $params,
    $agent->gps_paramter($params)
);

ブランチはget_locator_from_paramsのままです。

ChrisChris2012/07/16 18:32This post has helped me think tihgns through

meyskgameyskga2012/07/16 21:26AovZtb <a href="http://phxuiysclykh.com/">phxuiysclykh</a>

 |