Permalink
Browse files

dzilify

  • Loading branch information...
1 parent 2ba7de8 commit 5167e6e12bcc4eafc10c500a066796b1988185c2 @nothingmuch committed Jul 5, 2010
Showing with 6 additions and 35 deletions.
  1. +1 −1 dist.ini
  2. +2 −25 lib/Data/Thunk.pm
  3. +1 −3 lib/Data/Thunk/Code.pm
  4. +1 −3 lib/Data/Thunk/Object.pm
  5. +1 −3 lib/Data/Thunk/ScalarValue.pm
View
@@ -5,5 +5,5 @@ license = MIT
copyright_holder = Yuval Kogman
[@NUFFIN]
-dist = Cache-Ref
+dist = Data-Thunk
repository_at = github
View
@@ -1,6 +1,7 @@
#!/usr/bin/perl
package Data::Thunk;
+# ABSTRACT: A sneakier Scalar::Defer ;-)
use strict;
use warnings;
@@ -13,8 +14,6 @@ use Scalar::Util qw(blessed);
use namespace::clean;
-our $VERSION = "0.05";
-
use Sub::Exporter -setup => {
exports => [qw(lazy lazy_new lazy_object force)],
groups => {
@@ -61,16 +60,10 @@ sub force ($) {
# we temporarily bless into this to avoid overloading
}
-__PACKAGE__
-
-__END__
+1;
=pod
-=head1 NAME
-
-Data::Thunk - A sneakier Scalar::Defer ;-)
-
=head1 SYNOPSIS
use Data::Thunk qw(lazy);
@@ -179,21 +172,5 @@ Vivify the value and return the result.
L<Scalar::Defer>, L<Data::Lazy>, L<Data::Swap>, L<UNIVERSAL::ref>.
-=head1 VERSION CONTROL
-
-This module is maintained using Darcs. You can get the latest version from
-L<http://nothingmuch.woobling.org/code>, and use C<darcs send> to commit
-changes.
-
-=head1 AUTHOR
-
-Yuval Kogman E<lt>nothingmuch@woobling.orgE<gt>
-
-=head1 COPYRIGHT
-
- Copyright (c) 2008 Yuval Kogman. All rights reserved
- This program is free software; you can redistribute
- it and/or modify it under the same terms as Perl itself.
-
=cut
View
@@ -118,6 +118,4 @@ sub DESTROY {
# don't create the value just to destroy it
}
-__PACKAGE__
-
-__END__
+1;
View
@@ -79,6 +79,4 @@ sub AUTOLOAD {
goto $Data::Thunk::Code::vivify_and_call;
}
-__PACKAGE__
-
-__END__
+1;
@@ -50,6 +50,4 @@ sub AUTOLOAD {
sub DESTROY { }
-__PACKAGE__
-
-__END__
+1;

0 comments on commit 5167e6e

Please sign in to comment.