tomill

package PerlIO::via::Samurai;
use strict;
use warnings;
use Encode;
use Acme::Samurai;

sub import {
    binmode STDOUT => ':via(Samurai)';
}

tomill

---
 lib/Growl/Any.pm |   17 +++++++++++++++++
 1 files changed, 17 insertions(+), 0 deletions(-)

diff --git a/lib/Growl/Any.pm b/lib/Growl/Any.pm
index 5c1f909..916fdbd 100644
--- a/lib/Growl/Any.pm
+++ b/lib/Growl/Any.pm
@@ -45,6 +45,23 @@ if (eval { require Mac::Growl; }) {
         Mac::Growl::PostNotification($self->{name}, $event, $title, $message, 0, 0, $icon);

tomill

use strict;
use warnings;
use Test::More;
use Text::Xslate;

my $tx = Text::Xslate->new(
    syntax   => 'TTerse',
    function => {
        return_array => sub { my @array = ('A'..'Z') },
    },

tomill

Index: lib/WebService/Simple.pm
===================================================================
--- lib/WebService/Simple.pm   (リビジョン 38847)
+++ lib/WebService/Simple.pm   (作業コピー)
@@ -154,7 +154,14 @@
     my $response;
     $response = $self->__cache_get( [ $uri, @headers ] );
     if ($response) {
-        return $response;
+        if ($response->isa('WebService::Simple::Response')) { # backward compatibility

tomill

use Text::Xslate qw/html_builder/;
use Text::Markdown;

my $template = Text::Xslate->new(
    syntax   => 'TTerse',
    function => {
        markdown => html_builder {
            Text::Markdown::markdown(shift);
        },
    },

tomill

2011-02-23 20:33:30.056 perl[80232:903] GrowlApplicationBridge: The Growl delegate did not supply a registration dictionary, and the app bundle at /Users/tomi/perl5/perlbrew/perls/perl-5.12.2/bin does not have one. Please tell this application's developer.

tomill

#showtooltip
/dismount
/clearfocus [@focus,dead][@focus,harm]
/castsequence [mod:ctrl,mod:shift,@player] Fear Ward; [mod:shift,@player] reset=10 Inner Fire, Power Word: Fortitude, Shadow Protection; [@mouseover,help,exists][nomod,@player][@focus,help,exists][help][@targettarget,help,exists][@player] Power Word: Shield

tomill

#showtooltip
/castsequence [mod:shift,@mouseover,help][mod:shift,@focus][mod:shift]Greater Heal; [nomod]Power Word: Barrier; [@mouseover,help][@player]Prayer of Healing

tomill

$ ping www.google.com
PING www.l.google.com (74.125.153.99): 56 data bytes
Request timeout for icmp_seq 0
Request timeout for icmp_seq 1
Request timeout for icmp_seq 2
Request timeout for icmp_seq 3
Request timeout for icmp_seq 4
Request timeout for icmp_seq 5
Request timeout for icmp_seq 6
Request timeout for icmp_seq 7

tomill

#showtooltip
/cast [mod:ctrl,nostance:1]Bear Form
/stopmacro [mod:ctrl]
/castsequence [stance:3]Tiger's Fury(Cat Form); [stance:1] reset=60 Enrage(Bear Form), Demoralizing Roar(Bear Form); [@mouseover,help][@player]Thorns