Skip to content

Commit

Permalink
updated dzil stuff
Browse files Browse the repository at this point in the history
  • Loading branch information
doy committed Jun 16, 2010
1 parent a9daba9 commit 988beb4
Show file tree
Hide file tree
Showing 13 changed files with 69 additions and 87 deletions.
2 changes: 2 additions & 0 deletions .gitignore
Expand Up @@ -9,3 +9,5 @@ Makefile.old
nytprof.out
MANIFEST.bak
*.sw[po]
.build
Package-Stash-*
24 changes: 13 additions & 11 deletions Changes
@@ -1,16 +1,18 @@
Revision history for Package::Stash
Revision history for Package-Stash

0.04 2010-06-13
get_package_symbol now doesn't autovivify stash entries. A new method
get_or_add_package_symbol can now be used for that behavior.
{{$NEXT}}

Update %DB::sub on add_package_symbol (Tim Bunce).
0.04 2010-06-13
- get_package_symbol now doesn't autovivify stash entries. A new method
get_or_add_package_symbol can now be used for that behavior.

0.03 2010-05-14
Rename from Stash::Manip to Package::Stash
- Update %DB::sub on add_package_symbol (Tim Bunce).

0.02 2010-05-13
Need to dep on Test::Exception
0.03 2010-05-14
- Rename from Stash::Manip to Package::Stash

0.01 2010-05-12
Initial release
0.02 2010-05-13
- Need to dep on Test::Exception

0.01 2010-05-12
- Initial release
7 changes: 4 additions & 3 deletions dist.ini
@@ -1,13 +1,14 @@
name = Package-Stash
version = 0.04
author = Jesse Luehrs <doy at tozt dot net>
license = Perl_5
copyright_holder = Jesse Luehrs
abstract = routines for manipulating stashes

[@Classic]
[@DOY]
dist = Package-Stash

[Prereq]
Scalar::Util = 0

[Prereq / TestRequires]
Test::Exception = 0
Test::More = 0.88
78 changes: 13 additions & 65 deletions lib/Package/Stash.pm
@@ -1,14 +1,11 @@
package Package::Stash;
use strict;
use warnings;
# ABSTRACT: routines for manipulating stashes

use Carp qw(confess);
use Scalar::Util qw(reftype);

=head1 NAME
Package::Stash - routines for manipulating stashes
=head1 SYNOPSIS
my $stash = Package::Stash->new('Foo');
Expand All @@ -27,11 +24,7 @@ simple API.
NOTE: Most methods in this class require a variable specification that includes
a sigil. If this sigil is absent, it is assumed to represent the IO slot.
=head1 METHODS
=cut

=head2 new $package_name
=method new $package_name
Creates a new C<Package::Stash> object, for the package given as the only
argument.
Expand All @@ -44,7 +37,7 @@ sub new {
return bless { 'package' => $namespace }, $class;
}

=head2 name
=method name
Returns the name of the package that this object represents.
Expand All @@ -54,7 +47,7 @@ sub name {
return $_[0]->{package};
}

=head2 namespace
=method namespace
Returns the raw stash itself.
Expand Down Expand Up @@ -98,7 +91,7 @@ sub namespace {
}
}

=head2 add_package_symbol $variable $value %opts
=method add_package_symbol $variable $value %opts
Adds a new package symbol, for the symbol given as C<$variable>, and optionally
gives it an initial value of C<$value>. C<$variable> should be the name of
Expand Down Expand Up @@ -172,7 +165,7 @@ sub add_package_symbol {
*{$pkg . '::' . $name} = ref $initial_value ? $initial_value : \$initial_value;
}

=head2 remove_package_glob $name
=method remove_package_glob $name
Removes all package variables with the given name, regardless of sigil.
Expand All @@ -186,7 +179,7 @@ sub remove_package_glob {

# ... these functions deal with stuff on the namespace level

=head2 has_package_symbol $variable
=method has_package_symbol $variable
Returns whether or not the given package variable (including sigil) exists.
Expand Down Expand Up @@ -219,7 +212,7 @@ sub has_package_symbol {
}
}

=head2 get_package_symbol $variable
=method get_package_symbol $variable
Returns the value of the given package variable (including sigil).
Expand Down Expand Up @@ -269,7 +262,7 @@ sub get_package_symbol {
}
}

=head2 get_or_add_package_symbol $variable
=method get_or_add_package_symbol $variable
Like C<get_package_symbol>, except that it will return an empty hashref or
arrayref if the variable doesn't exist.
Expand All @@ -281,7 +274,7 @@ sub get_or_add_package_symbol {
$self->get_package_symbol(@_, vivify => 1);
}

=head2 remove_package_symbol $variable
=method remove_package_symbol $variable
Removes the package variable described by C<$variable> (which includes the
sigil); other variables with the same name but different sigils will be
Expand Down Expand Up @@ -352,7 +345,7 @@ sub remove_package_symbol {
$self->add_package_symbol($io_desc => $io) if defined $io;
}

=head2 list_all_package_symbols $type_filter
=method list_all_package_symbols $type_filter
Returns a list of package variable names in the package, without sigils. If a
C<type_filter> is passed, it is used to select package variables of a given
Expand Down Expand Up @@ -382,61 +375,16 @@ sub list_all_package_symbols {
}
}

=head1 BUGS
No known bugs.
Please report any bugs through RT: email
C<bug-package-stash at rt.cpan.org>, or browse to
L<http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Package-Stash>.
=head1 SEE ALSO
L<Class::MOP::Package> - this module is a factoring out of code that used to
live here
=head1 SUPPORT
You can find this documentation for this module with the perldoc command.
perldoc Package::Stash
You can also look for information at:
=over 4
=item * AnnoCPAN: Annotated CPAN documentation
=item * L<Class::MOP::Package>
L<http://annocpan.org/dist/Package-Stash>
=item * CPAN Ratings
L<http://cpanratings.perl.org/d/Package-Stash>
=item * RT: CPAN's request tracker
L<http://rt.cpan.org/NoAuth/Bugs.html?Dist=Package-Stash>
=item * Search CPAN
L<http://search.cpan.org/dist/Package-Stash>
This module is a factoring out of code that used to live here
=back
=head1 AUTHOR
Jesse Luehrs <doy at tozt dot net>
Mostly copied from code from L<Class::MOP::Package>, by Stevan Little and the
Moose Cabal.
=head1 COPYRIGHT AND LICENSE
This software is copyright (c) 2010 by Jesse Luehrs.
This is free software; you can redistribute it and/or modify it under
the same terms as perl itself.
=cut

1;
8 changes: 0 additions & 8 deletions t/000-load.t

This file was deleted.

File renamed without changes.
File renamed without changes.
File renamed without changes.
File renamed without changes.
File renamed without changes.
File renamed without changes.
File renamed without changes.
37 changes: 37 additions & 0 deletions weaver.ini
@@ -0,0 +1,37 @@
[@CorePrep]

[Name]
[Version]

[Region / prelude]

[Generic / SYNOPSIS]
[Generic / DESCRIPTION]
[Generic / OVERVIEW]

[Collect / ATTRIBUTES]
command = attr

[Collect / METHODS]
command = method

[Collect / FUNCTIONS]
command = func

[Leftovers]

[Region / postlude]

[Template / BUGS]
template = ~/.dzil/pod_templates/bugs.section
main_module_only = 1

[Generic / SEEALSO]
header = SEE ALSO

[Template / SUPPORT]
template = ~/.dzil/pod_templates/support.section
main_module_only = 1

[Authors]
[Legal]

0 comments on commit 988beb4

Please sign in to comment.