r65074 - in /trunk/libdancer-perl: CHANGES MANIFEST META.yml debian/changelog lib/Dancer.pm t/01_config/05_serialiers.t t/01_config/05_serializers.t t/03_route_handler/02_before_filter.t t/03_route_handler/30_bug_gh190.t t/12_response/03_charset.t
dmn at users.alioth.debian.org
dmn at users.alioth.debian.org
Sat Nov 20 14:08:08 UTC 2010
Author: dmn
Date: Sat Nov 20 14:07:57 2010
New Revision: 65074
URL: http://svn.debian.org/wsvn/pkg-perl/?sc=1&rev=65074
Log:
new upstream stable release
Added:
trunk/libdancer-perl/t/01_config/05_serializers.t
- copied unchanged from r65073, branches/upstream/libdancer-perl/current/t/01_config/05_serializers.t
trunk/libdancer-perl/t/03_route_handler/30_bug_gh190.t
- copied unchanged from r65073, branches/upstream/libdancer-perl/current/t/03_route_handler/30_bug_gh190.t
Removed:
trunk/libdancer-perl/t/01_config/05_serialiers.t
Modified:
trunk/libdancer-perl/CHANGES
trunk/libdancer-perl/MANIFEST
trunk/libdancer-perl/META.yml
trunk/libdancer-perl/debian/changelog
trunk/libdancer-perl/lib/Dancer.pm
trunk/libdancer-perl/t/03_route_handler/02_before_filter.t
trunk/libdancer-perl/t/12_response/03_charset.t
Modified: trunk/libdancer-perl/CHANGES
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdancer-perl/CHANGES?rev=65074&op=diff
==============================================================================
--- trunk/libdancer-perl/CHANGES (original)
+++ trunk/libdancer-perl/CHANGES Sat Nov 20 14:07:57 2010
@@ -1,3 +1,18 @@
+Dancer 1.2000
+ ** 1.2 is a stable release of Dancer **
+ ** We assure consistency and stability for this release and the following **
+ ** 1.2xxx releases; you should not have issues updating to any 1.2xxx **
+ ** version because of it. **
+
+ ++ A very special thanks goes to the Dancer community who improved and ++
+ ++ perfected this release and worked hard on reporting bugs, fixing them, ++
+ ++ improving the stability, providing important features and everything ++
+ ++ else which makes Dancer so attractive - and above all: its community ++
+ ++ so thank you! ++
+
+ [ Sawyer X ]
+ * Fixing some more XML tests with missing preqreqs.
+
Dancer 1.1999_04 (RC4)
[ Sawyer X ]
* Load Plack::Loader dynamically in test.
Modified: trunk/libdancer-perl/MANIFEST
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdancer-perl/MANIFEST?rev=65074&op=diff
==============================================================================
--- trunk/libdancer-perl/MANIFEST (original)
+++ trunk/libdancer-perl/MANIFEST Sat Nov 20 14:07:57 2010
@@ -90,7 +90,7 @@
t/01_config/02_mime_type.t
t/01_config/03_logger.t
t/01_config/04_config_file.t
-t/01_config/05_serialiers.t
+t/01_config/05_serializers.t
t/01_config/06_stack_trace.t
t/01_config/environments/development.pl
t/01_config/yaml_dependency.t
@@ -140,6 +140,7 @@
t/03_route_handler/27_issue_77_pass_breaks_routes.t
t/03_route_handler/28_plack_mount.t
t/03_route_handler/29_redirect_immediatly.t
+t/03_route_handler/30_bug_gh190.t
t/03_route_handler/public/404.html
t/03_route_handler/views/hello.tt
t/04_static_file/001_base.t
Modified: trunk/libdancer-perl/META.yml
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdancer-perl/META.yml?rev=65074&op=diff
==============================================================================
--- trunk/libdancer-perl/META.yml (original)
+++ trunk/libdancer-perl/META.yml Sat Nov 20 14:07:57 2010
@@ -1,6 +1,6 @@
--- #YAML:1.0
name: Dancer
-version: 1.1999_04
+version: 1.2000
abstract: A minimal-effort oriented web application framework
author: []
license: perl
Modified: trunk/libdancer-perl/debian/changelog
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdancer-perl/debian/changelog?rev=65074&op=diff
==============================================================================
--- trunk/libdancer-perl/debian/changelog (original)
+++ trunk/libdancer-perl/debian/changelog Sat Nov 20 14:07:57 2010
@@ -1,10 +1,10 @@
-libdancer-perl (1.1999~04-1) UNRELEASED; urgency=low
+libdancer-perl (1.2000-1) UNRELEASED; urgency=low
TODO: investigate embedded JavaScript libraries and images
* New upstream release
- -- Damyan Ivanov <dmn at debian.org> Thu, 18 Nov 2010 16:22:01 +0200
+ -- Damyan Ivanov <dmn at debian.org> Sat, 20 Nov 2010 16:05:26 +0200
libdancer-perl (1.1904-1) unstable; urgency=low
Modified: trunk/libdancer-perl/lib/Dancer.pm
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdancer-perl/lib/Dancer.pm?rev=65074&op=diff
==============================================================================
--- trunk/libdancer-perl/lib/Dancer.pm (original)
+++ trunk/libdancer-perl/lib/Dancer.pm Sat Nov 20 14:07:57 2010
@@ -31,7 +31,7 @@
use base 'Exporter';
$AUTHORITY = 'SUKRIA';
-$VERSION = '1.1999_04';
+$VERSION = '1.2000';
@EXPORT = qw(
after
any
Modified: trunk/libdancer-perl/t/03_route_handler/02_before_filter.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdancer-perl/t/03_route_handler/02_before_filter.t?rev=65074&op=diff
==============================================================================
--- trunk/libdancer-perl/t/03_route_handler/02_before_filter.t (original)
+++ trunk/libdancer-perl/t/03_route_handler/02_before_filter.t Sat Nov 20 14:07:57 2010
@@ -1,21 +1,46 @@
use strict;
use warnings;
-use Test::More tests => 13, import => ['!pass'];
+use Test::More tests => 16, import => ['!pass'];
use Dancer ':syntax';
use Dancer::Test;
-ok(before(sub {
- params->{number} = 42;
- var notice => "I am here";
- request->path_info('/');
-}), 'before filter is defined');
+my $i = 0;
-ok(get('/' => sub {
- is(params->{number}, 42, "params->{number} is set");
- is("I am here", vars->{notice}, "vars->{notice} is set");
- return 'index';
-}), 'index route is defined');
+ok(
+ before(
+ sub {
+ if ( request->path_info eq '/redirect_from' ) {
+ redirect('/redirect_to');
+ }
+ else {
+ params->{number} = 42;
+ var notice => "I am here";
+ request->path_info('/');
+ }
+ }
+ ),
+ 'before filter is defined'
+);
+
+ok(
+ get(
+ '/' => sub {
+ is( params->{number}, 42, "params->{number} is set" );
+ is( "I am here", vars->{notice}, "vars->{notice} is set" );
+ return 'index';
+ }
+ ),
+ 'index route is defined'
+);
+
+ok(
+ get(
+ '/redirect_from' => sub {
+ $i++;
+ }
+ )
+);
route_exists [GET => '/'];
response_exists [GET => '/'];
@@ -31,3 +56,9 @@
response_content_is $request, 'index',
"which is the result of a redirection to /";
+
+response_headers_are_deeply [GET => '/redirect_from'], [
+ 'Location' => 'http://localhost/redirect_to',
+];
+
+is $i, 0, 'never gone to redirect_from';
Modified: trunk/libdancer-perl/t/12_response/03_charset.t
URL: http://svn.debian.org/wsvn/pkg-perl/trunk/libdancer-perl/t/12_response/03_charset.t?rev=65074&op=diff
==============================================================================
--- trunk/libdancer-perl/t/12_response/03_charset.t (original)
+++ trunk/libdancer-perl/t/12_response/03_charset.t Sat Nov 20 14:07:57 2010
@@ -70,6 +70,10 @@
skip "XML::Simple is needed for this test" , 1
unless Dancer::ModuleLoader->load('XML::Simple');
+ skip "XML::Parser or XML::SAX are needed to run this test", 1
+ unless Dancer::ModuleLoader->load('XML::Parser') or
+ Dancer::ModuleLoader->load('XML::SAX');
+
setting serializer => 'XML';
$res->{content_type} = 'text/xml';
$res->{content} = { key => "\x{0429}" };
More information about the Pkg-perl-cvs-commits
mailing list