From 05791e154cfb764ee9cb874f014a0baacf282ff7 Mon Sep 17 00:00:00 2001
From: doy <doy@tozt.net>
Date: Mon, 20 Apr 2009 02:48:54 -0500
Subject: add synopsis

---
 lib/MooseX/NonMoose.pm | 24 ++++++++++++++++++++++++
 1 file changed, 24 insertions(+)

(limited to 'lib')

diff --git a/lib/MooseX/NonMoose.pm b/lib/MooseX/NonMoose.pm
index 37f5d92..4c71fd9 100644
--- a/lib/MooseX/NonMoose.pm
+++ b/lib/MooseX/NonMoose.pm
@@ -8,6 +8,30 @@ MooseX::NonMoose - easy subclassing of non-Moose classes
 
 =head1 SYNOPSIS
 
+  package Term::VT102::NBased;
+  use Moose;
+  use MooseX::NonMoose;
+  extends 'Term::VT102';
+
+  has [qw/x_base y_base/] => (
+      is      => 'ro',
+      isa     => 'Int',
+      default => 1,
+  );
+
+  around x => sub {
+      my $orig = shift;
+      my $self = shift;
+      $self->$orig(@_) + $self->x_base - 1;
+  };
+
+  # ... (wrap other methods)
+
+  no Moose;
+  __PACKAGE__->meta->make_immutable;
+
+  my $vt = Term::VT102::NBased->new(x_base => 0, y_base => 0);
+
 =head1 DESCRIPTION
 
 =cut
-- 
cgit v1.2.3-54-g00ecf