Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Browse files

junk removed

  • Loading branch information...
commit 31496aba5cc4b84cab712f0dcbd4a3d3c7fe16a9 1 parent c03586c
@jamhed authored
View
0  blib/arch/.exists
No changes.
View
0  blib/arch/auto/Dancer/Plugin/Scoped/.exists
No changes.
View
0  blib/bin/.exists
No changes.
View
0  blib/lib/Dancer/Plugin/.exists
No changes.
View
110 blib/lib/Dancer/Plugin/Scoped.pm
@@ -1,110 +0,0 @@
-package Dancer::Plugin::Scoped;
-use base 'Exporter';
-@EXPORT = qw( scoped );
-use warnings;
-use strict;
-
-our $VERSION = '0.01';
-
-
-sub scoped (&) {
- my ($code) = @_;
- my $caller = caller;
- return sub {
- no strict 'refs';
- while (my ($k, $v) = each %{Dancer::SharedData->request->params}) {
- ${"$caller\::$k"} = $v;
- }
- $code->(@_);
- };
-}
-
-=head1 NAME
-
-Dancer::Plugin::Scoped - Allows to set params variables in scope of route handler
-
-=head1 VERSION
-
-Version 0.01
-
-=cut
-
-=head1 SYNOPSIS
-
- use Dancer;
- use Dancer::Plugin::Scoped;
-
- any '/' => scoped {
- our ($page, $test);
- template $page, { test => $test };
- };
-
- $page, $test - these variables will be set according to params data, e.g. $page is a syntactic
- alias to params->{page}.
-
-=head1 EXPORT
-
-scoped
-
-=head1 SUBROUTINES/METHODS
-
-=head2 scoped
-
-A replacement for sub in route handler definition. It sets variables passed in params hash which
-is accessible via our declarations.
-
-=cut
-
-=head1 AUTHOR
-
-Roman Galeev, C<< <jamhedd at gmail.com> >>
-
-=head1 BUGS
-
-Please report any bugs or feature requests to C<bug-dancer-plugin-scoped at rt.cpan.org>, or through
-the web interface at L<http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Dancer-Plugin-Scoped>. I will be notified, and then you'll
-automatically be notified of progress on your bug as I make changes.
-
-=head1 SUPPORT
-
-You can find documentation for this module with the perldoc command.
-
- perldoc Dancer::Plugin::Scoped
-
-You can also look for information at:
-
-=over 4
-
-=item * RT: CPAN's request tracker
-
-L<http://rt.cpan.org/NoAuth/Bugs.html?Dist=Dancer-Plugin-Scoped>
-
-=item * AnnoCPAN: Annotated CPAN documentation
-
-L<http://annocpan.org/dist/Dancer-Plugin-Scoped>
-
-=item * CPAN Ratings
-
-L<http://cpanratings.perl.org/d/Dancer-Plugin-Scoped>
-
-=item * Search CPAN
-
-L<http://search.cpan.org/dist/Dancer-Plugin-Scoped/>
-
-=back
-
-=head1 ACKNOWLEDGEMENTS
-
-=head1 LICENSE AND COPYRIGHT
-
-Copyright 2010 Roman Galeev.
-
-This program is free software; you can redistribute it and/or modify it
-under the terms of either: the GNU General Public License as published
-by the Free Software Foundation; or the Artistic License.
-
-See http://dev.perl.org/licenses/ for more information.
-
-=cut
-
-1; # End of Dancer::Plugin::Scoped
View
0  blib/lib/auto/Dancer/Plugin/Scoped/.exists
No changes.
View
0  blib/man1/.exists
No changes.
View
0  blib/man3/.exists
No changes.
View
201 blib/man3/Dancer::Plugin::Scoped.3pm
@@ -1,201 +0,0 @@
-.\" Automatically generated by Pod::Man 2.25 (Pod::Simple 3.16)
-.\"
-.\" Standard preamble:
-.\" ========================================================================
-.de Sp \" Vertical space (when we can't use .PP)
-.if t .sp .5v
-.if n .sp
-..
-.de Vb \" Begin verbatim text
-.ft CW
-.nf
-.ne \\$1
-..
-.de Ve \" End verbatim text
-.ft R
-.fi
-..
-.\" Set up some character translations and predefined strings. \*(-- will
-.\" give an unbreakable dash, \*(PI will give pi, \*(L" will give a left
-.\" double quote, and \*(R" will give a right double quote. \*(C+ will
-.\" give a nicer C++. Capital omega is used to do unbreakable dashes and
-.\" therefore won't be available. \*(C` and \*(C' expand to `' in nroff,
-.\" nothing in troff, for use with C<>.
-.tr \(*W-
-.ds C+ C\v'-.1v'\h'-1p'\s-2+\h'-1p'+\s0\v'.1v'\h'-1p'
-.ie n \{\
-. ds -- \(*W-
-. ds PI pi
-. if (\n(.H=4u)&(1m=24u) .ds -- \(*W\h'-12u'\(*W\h'-12u'-\" diablo 10 pitch
-. if (\n(.H=4u)&(1m=20u) .ds -- \(*W\h'-12u'\(*W\h'-8u'-\" diablo 12 pitch
-. ds L" ""
-. ds R" ""
-. ds C` ""
-. ds C' ""
-'br\}
-.el\{\
-. ds -- \|\(em\|
-. ds PI \(*p
-. ds L" ``
-. ds R" ''
-'br\}
-.\"
-.\" Escape single quotes in literal strings from groff's Unicode transform.
-.ie \n(.g .ds Aq \(aq
-.el .ds Aq '
-.\"
-.\" If the F register is turned on, we'll generate index entries on stderr for
-.\" titles (.TH), headers (.SH), subsections (.SS), items (.Ip), and index
-.\" entries marked with X<> in POD. Of course, you'll have to process the
-.\" output yourself in some meaningful fashion.
-.ie \nF \{\
-. de IX
-. tm Index:\\$1\t\\n%\t"\\$2"
-..
-. nr % 0
-. rr F
-.\}
-.el \{\
-. de IX
-..
-.\}
-.\"
-.\" Accent mark definitions (@(#)ms.acc 1.5 88/02/08 SMI; from UCB 4.2).
-.\" Fear. Run. Save yourself. No user-serviceable parts.
-. \" fudge factors for nroff and troff
-.if n \{\
-. ds #H 0
-. ds #V .8m
-. ds #F .3m
-. ds #[ \f1
-. ds #] \fP
-.\}
-.if t \{\
-. ds #H ((1u-(\\\\n(.fu%2u))*.13m)
-. ds #V .6m
-. ds #F 0
-. ds #[ \&
-. ds #] \&
-.\}
-. \" simple accents for nroff and troff
-.if n \{\
-. ds ' \&
-. ds ` \&
-. ds ^ \&
-. ds , \&
-. ds ~ ~
-. ds /
-.\}
-.if t \{\
-. ds ' \\k:\h'-(\\n(.wu*8/10-\*(#H)'\'\h"|\\n:u"
-. ds ` \\k:\h'-(\\n(.wu*8/10-\*(#H)'\`\h'|\\n:u'
-. ds ^ \\k:\h'-(\\n(.wu*10/11-\*(#H)'^\h'|\\n:u'
-. ds , \\k:\h'-(\\n(.wu*8/10)',\h'|\\n:u'
-. ds ~ \\k:\h'-(\\n(.wu-\*(#H-.1m)'~\h'|\\n:u'
-. ds / \\k:\h'-(\\n(.wu*8/10-\*(#H)'\z\(sl\h'|\\n:u'
-.\}
-. \" troff and (daisy-wheel) nroff accents
-.ds : \\k:\h'-(\\n(.wu*8/10-\*(#H+.1m+\*(#F)'\v'-\*(#V'\z.\h'.2m+\*(#F'.\h'|\\n:u'\v'\*(#V'
-.ds 8 \h'\*(#H'\(*b\h'-\*(#H'
-.ds o \\k:\h'-(\\n(.wu+\w'\(de'u-\*(#H)/2u'\v'-.3n'\*(#[\z\(de\v'.3n'\h'|\\n:u'\*(#]
-.ds d- \h'\*(#H'\(pd\h'-\w'~'u'\v'-.25m'\f2\(hy\fP\v'.25m'\h'-\*(#H'
-.ds D- D\\k:\h'-\w'D'u'\v'-.11m'\z\(hy\v'.11m'\h'|\\n:u'
-.ds th \*(#[\v'.3m'\s+1I\s-1\v'-.3m'\h'-(\w'I'u*2/3)'\s-1o\s+1\*(#]
-.ds Th \*(#[\s+2I\s-2\h'-\w'I'u*3/5'\v'-.3m'o\v'.3m'\*(#]
-.ds ae a\h'-(\w'a'u*4/10)'e
-.ds Ae A\h'-(\w'A'u*4/10)'E
-. \" corrections for vroff
-.if v .ds ~ \\k:\h'-(\\n(.wu*9/10-\*(#H)'\s-2\u~\d\s+2\h'|\\n:u'
-.if v .ds ^ \\k:\h'-(\\n(.wu*10/11-\*(#H)'\v'-.4m'^\v'.4m'\h'|\\n:u'
-. \" for low resolution devices (crt and lpr)
-.if \n(.H>23 .if \n(.V>19 \
-\{\
-. ds : e
-. ds 8 ss
-. ds o a
-. ds d- d\h'-1'\(ga
-. ds D- D\h'-1'\(hy
-. ds th \o'bp'
-. ds Th \o'LP'
-. ds ae ae
-. ds Ae AE
-.\}
-.rm #[ #] #H #V #F C
-.\" ========================================================================
-.\"
-.IX Title "Dancer::Plugin::Scoped 3pm"
-.TH Dancer::Plugin::Scoped 3pm "2010-06-01" "perl v5.14.2" "User Contributed Perl Documentation"
-.\" For nroff, turn off justification. Always turn off hyphenation; it makes
-.\" way too many mistakes in technical documents.
-.if n .ad l
-.nh
-.SH "NAME"
-Dancer::Plugin::Scoped \- Allows to set params variables in scope of route handler
-.SH "VERSION"
-.IX Header "VERSION"
-Version 0.01
-.SH "SYNOPSIS"
-.IX Header "SYNOPSIS"
-.Vb 2
-\& use Dancer;
-\& use Dancer::Plugin::Scoped;
-\&
-\& any \*(Aq/\*(Aq => scoped {
-\& our ($page, $test);
-\& template $page, { test => $test };
-\& };
-\&
-\& $page, $test \- these variables will be set according to params data, e.g. $page is a syntactic
-\& alias to params\->{page}.
-.Ve
-.SH "EXPORT"
-.IX Header "EXPORT"
-scoped
-.SH "SUBROUTINES/METHODS"
-.IX Header "SUBROUTINES/METHODS"
-.SS "function1"
-.IX Subsection "function1"
-.SH "AUTHOR"
-.IX Header "AUTHOR"
-Roman Galeev, \f(CW\*(C`<jamhedd at gmail.com>\*(C'\fR
-.SH "BUGS"
-.IX Header "BUGS"
-Please report any bugs or feature requests to \f(CW\*(C`bug\-dancer\-plugin\-scoped at rt.cpan.org\*(C'\fR, or through
-the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Dancer\-Plugin\-Scoped <http://rt.cpan.org/NoAuth/ReportBug.html?Queue=Dancer-Plugin-Scoped>. I will be notified, and then you'll
-automatically be notified of progress on your bug as I make changes.
-.SH "SUPPORT"
-.IX Header "SUPPORT"
-You can find documentation for this module with the perldoc command.
-.PP
-.Vb 1
-\& perldoc Dancer::Plugin::Scoped
-.Ve
-.PP
-You can also look for information at:
-.IP "\(bu" 4
-\&\s-1RT:\s0 \s-1CPAN\s0's request tracker
-.Sp
-http://rt.cpan.org/NoAuth/Bugs.html?Dist=Dancer\-Plugin\-Scoped <http://rt.cpan.org/NoAuth/Bugs.html?Dist=Dancer-Plugin-Scoped>
-.IP "\(bu" 4
-AnnoCPAN: Annotated \s-1CPAN\s0 documentation
-.Sp
-http://annocpan.org/dist/Dancer\-Plugin\-Scoped <http://annocpan.org/dist/Dancer-Plugin-Scoped>
-.IP "\(bu" 4
-\&\s-1CPAN\s0 Ratings
-.Sp
-http://cpanratings.perl.org/d/Dancer\-Plugin\-Scoped <http://cpanratings.perl.org/d/Dancer-Plugin-Scoped>
-.IP "\(bu" 4
-Search \s-1CPAN\s0
-.Sp
-http://search.cpan.org/dist/Dancer\-Plugin\-Scoped/ <http://search.cpan.org/dist/Dancer-Plugin-Scoped/>
-.SH "ACKNOWLEDGEMENTS"
-.IX Header "ACKNOWLEDGEMENTS"
-.SH "LICENSE AND COPYRIGHT"
-.IX Header "LICENSE AND COPYRIGHT"
-Copyright 2010 Roman Galeev.
-.PP
-This program is free software; you can redistribute it and/or modify it
-under the terms of either: the \s-1GNU\s0 General Public License as published
-by the Free Software Foundation; or the Artistic License.
-.PP
-See http://dev.perl.org/licenses/ for more information.
View
0  blib/script/.exists
No changes.
Please sign in to comment.
Something went wrong with that request. Please try again.