From: Allen D. <all...@us...> - 2002-01-18 04:30:18
|
Update of /cvsroot/perl-css/Parse In directory usw-pr-cvs1:/tmp/cvs-serv29461 Modified Files: CSS.pm Makefile.PL Log Message: re-releasing this package. sorry i was _such_ an amateur before. not that i'm pro now... anyway, enjoy. Index: CSS.pm =================================================================== RCS file: /cvsroot/perl-css/Parse/CSS.pm,v retrieving revision 1.2 retrieving revision 1.3 diff -u -d -r1.2 -r1.3 --- CSS.pm 2001/08/27 16:31:59 1.2 +++ CSS.pm 2002/01/18 04:30:14 1.3 @@ -1,17 +1,17 @@ -package Parse::CSS; +package CSS; -require 5.005_62; use strict; use warnings; use vars qw($VERSION); -our $VERSION = 0.1; +use vars qw($VERSION); +$VERSION = 0.06; use lib '..'; use Carp qw(croak confess); use Parse::RecDescent; $Parse::RecDescent::skip = '[ \t\n]*'; -use Parse::CSS::Style; -use Parse::CSS::Adaptor; +use CSS::Style; +use CSS::Adaptor; sub new { my $class = shift; @@ -77,7 +77,7 @@ my @return; my @option = ref $option eq 'ARRAY' ? @$option : $option; foreach my $o (@option){ - if(ref $o eq 'Parse::CSS::Style'){ + if(ref $o eq 'CSS::Style'){ $self->{style}->{$o} = $o; } else { push @return, $self->{style}->{$o}; @@ -102,7 +102,7 @@ my $parser = new Parse::RecDescent <<'EOPARSER'; sheet: statement(s) statement: selector '{' declaration(s?) '}' {push @$return, $style} - statement: <rulevar: local $style = new Parse::CSS::Style> + statement: <rulevar: local $style = new CSS::Style> declaration: property ':' value ';' declaration: <rulevar: local $property> selector: /\S+/ {$style->selector($item{__PATTERN1__})} @@ -127,16 +127,16 @@ =head1 NAME -Parse::CSS - Perl extension for blah blah blah +CSS - Perl Object oriented access to Cascading Style Sheets (CSS) =head1 SYNOPSIS - use Parse::CSS; - blah blah blah + use CSS; + ... =head1 DESCRIPTION -Stub documentation for Parse::CSS, created by h2xs. It looks like the +Stub documentation for CSS, created by h2xs. It looks like the author of the extension was negligent enough to leave the stub unedited. @@ -146,26 +146,10 @@ None by default. - -=head1 HISTORY - -=over 8 - -=item 0.01 - -Original version; created by h2xs 1.20 with options - - -p - Parse - -CAf - Parse::CSS - -=back - - =head1 AUTHOR -A. U. Thor, a.u.thor@a.galaxy.far.far.away +Allen Day <all...@uc...> +Copyright (c) 2001-2002 =head1 SEE ALSO Index: Makefile.PL =================================================================== RCS file: /cvsroot/perl-css/Parse/Makefile.PL,v retrieving revision 1.1.1.1 retrieving revision 1.2 diff -u -d -r1.1.1.1 -r1.2 --- Makefile.PL 2001/08/27 16:18:46 1.1.1.1 +++ Makefile.PL 2002/01/18 04:30:14 1.2 @@ -2,9 +2,9 @@ # See lib/ExtUtils/MakeMaker.pm for details of how to influence # the contents of the Makefile that is written. WriteMakefile( - 'NAME' => 'Parse::CSS', + 'NAME' => 'CSS', 'VERSION_FROM' => 'CSS.pm', # finds $VERSION - 'PREREQ_PM' => {}, # e.g., Module::Name => 1.1 + 'PREREQ_PM' => {Parse::RecDescent => 1.0}, # e.g., Module::Name => 1.1 'LIBS' => [''], # e.g., '-lm' 'DEFINE' => '', # e.g., '-DHAVE_SOMETHING' 'INC' => '', # e.g., '-I/usr/include/other' |