summary refs log tree commit diff
path: root/pkgs/development/perl-modules/DBIx-Class-0.082820-Adjust-view-dependency-tests-to-work-on-newer-libsql.patch
diff options
context:
space:
mode:
Diffstat (limited to 'pkgs/development/perl-modules/DBIx-Class-0.082820-Adjust-view-dependency-tests-to-work-on-newer-libsql.patch')
-rw-r--r--pkgs/development/perl-modules/DBIx-Class-0.082820-Adjust-view-dependency-tests-to-work-on-newer-libsql.patch95
1 files changed, 0 insertions, 95 deletions
diff --git a/pkgs/development/perl-modules/DBIx-Class-0.082820-Adjust-view-dependency-tests-to-work-on-newer-libsql.patch b/pkgs/development/perl-modules/DBIx-Class-0.082820-Adjust-view-dependency-tests-to-work-on-newer-libsql.patch
deleted file mode 100644
index b080771b17d..00000000000
--- a/pkgs/development/perl-modules/DBIx-Class-0.082820-Adjust-view-dependency-tests-to-work-on-newer-libsql.patch
+++ /dev/null
@@ -1,95 +0,0 @@
-From 5de3b12e4eecd4efb47e1896dc1d5432bc532568 Mon Sep 17 00:00:00 2001
-From: =?UTF-8?q?Petr=20P=C3=ADsa=C5=99?= <ppisar@redhat.com>
-Date: Tue, 3 Nov 2015 15:22:54 +0100
-Subject: [PATCH] Adjust view-dependency tests to work on newer libsqlite
-MIME-Version: 1.0
-Content-Type: text/plain; charset=UTF-8
-Content-Transfer-Encoding: 8bit
-
-Port upstream fix for SQLite-3.9.0 to 0.082820:
-
-commit 26c663f123032941cb3f61d6cd11869b86716d6d
-Author: Peter Rabbitson <ribasushi@cpan.org>
-Date:   Tue Nov 3 14:35:35 2015 +0100
-
-    Adjust view-dependency tests to work on newer libsqlite
-
-    The test and mechanism behind it is largely useless in these cases, but old
-    sqlite installations will lurk around for ever, so keep the check while moving
-    it to xt/
-
-The original fix makes the tests author's tests, so they are not run
-at all. Let's keep the test running by default until upstream releases
-new version.
-
-CPAN RT#107852
-
-Signed-off-by: Petr Písař <ppisar@redhat.com>
----
- t/105view_deps.t | 29 ++++++++++++++++-------------
- 1 file changed, 16 insertions(+), 13 deletions(-)
-
-diff --git a/t/105view_deps.t b/t/105view_deps.t
-index 21aa92b..39bb632 100644
---- a/t/105view_deps.t
-+++ b/t/105view_deps.t
-@@ -1,4 +1,4 @@
--#!/usr/bin/perl
-+use DBIx::Class::Optional::Dependencies -skip_all_without => 'deploy';
-
- use strict;
- use warnings;
-@@ -11,15 +11,6 @@ use DBICTest;
- use ViewDeps;
- use ViewDepsBad;
-
--BEGIN {
--    require DBIx::Class;
--    plan skip_all => 'Test needs ' .
--        DBIx::Class::Optional::Dependencies->req_missing_for('deploy')
--      unless DBIx::Class::Optional::Dependencies->req_ok_for('deploy');
--}
--
--use_ok('DBIx::Class::ResultSource::View');
--
- #################### SANITY
-
- my $view = DBIx::Class::ResultSource::View->new;
-@@ -73,10 +64,16 @@ can_ok( $view, $_ ) for qw/new from deploy_depends_on/;
-     = ViewDepsBad->connect( DBICTest->_database ( quote_char => '"') );
-   ok( $schema2, 'Connected to ViewDepsBad schema OK' );
-
-+  my $lazy_view_validity = !(
-+    $schema2->storage->_server_info->{normalized_dbms_version}
-+      <
-+    3.009
-+  );
-+
- #################### DEPLOY2
-
-   warnings_exist { $schema2->deploy }
--    [qr/no such table: main.aba_name_artists/],
-+    [ $lazy_view_validity ? () : qr/no such table: main.aba_name_artists/ ],
-     "Deploying the bad schema produces a warning: aba_name_artists was not created.";
-
- #################### DOES ORDERING WORK 2?
-@@ -106,9 +103,15 @@ can_ok( $view, $_ ) for qw/new from deploy_depends_on/;
-     } grep { !/AbaNameArtistsAnd2010CDsWithManyTracks/ }
-     @{ [ $schema2->sources ] };
-
-+  $schema2->storage->dbh->do(q( DROP VIEW "aba_name_artists" ))
-+    if $lazy_view_validity;
-+
-   throws_ok { $schema2->resultset('AbaNameArtistsAnd2010CDsWithManyTracks')->next }
--    qr/no such table: aba_name_artists_and_2010_cds_with_many_tracks/,
--    "Query on AbaNameArtistsAnd2010CDsWithManyTracks throws, because the table does not exist"
-+    qr/no such table: (?:main\.)?aba_name_artists/,
-+    sprintf(
-+      "Query on AbaNameArtistsAnd2010CDsWithManyTracks throws, because the%s view does not exist",
-+      $lazy_view_validity ? ' underlying' : ''
-+    )
-   ;
- }
-
---
-2.4.3