Attachment 70231 Details for Bug 18477 – Bug 18477: Add tests

[patch] Bug 18477: Add tests

Bug-18477-Add-tests.patch (text/plain), 2.74 KB, created by Jonathan Druart on 2018-01-02 17:37:35 UTC

(hide)

Description:

Filename:

MIME Type:

Creator: Jonathan Druart

Created: 2018-01-02 17:37:35 UTC

Size: 2.74 KB

patch

obsolete

>From a0cbd81170f7669b7a63bbefc1fdf6742854e90c Mon Sep 17 00:00:00 2001
>From: Jonathan Druart <jonathan.druart@bugs.koha-community.org>
>Date: Tue, 2 Jan 2018 14:36:43 -0300
>Subject: [PATCH] Bug 18477: Add tests
>
>---
> t/db_dependent/ArticleRequests.t | 25 +++++++++++++++++++++++--
> 1 file changed, 23 insertions(+), 2 deletions(-)
>
>diff --git a/t/db_dependent/ArticleRequests.t b/t/db_dependent/ArticleRequests.t
>index ae0c2a3caa..4d56315633 100755
>--- a/t/db_dependent/ArticleRequests.t
>+++ b/t/db_dependent/ArticleRequests.t
>@@ -19,12 +19,13 @@ use Modern::Perl;
> 
> use POSIX qw(strftime);
> 
>-use Test::More tests => 49;
>+use Test::More tests => 54;
> 
> use t::lib::TestBuilder;
> 
> use Koha::Database;
> use Koha::Biblio;
>+use Koha::Notice::Messages;
> use Koha::Patron;
> use Koha::Library;
> 
>@@ -73,21 +74,41 @@ my $patron   = Koha::Patron->new(
> )->store();
> ok( $patron->id, 'Koha::Patron created' );
> 
>+# store
>+Koha::Notice::Messages->delete;
>+my $article_request_title = 'an article request title';
> my $article_request = Koha::ArticleRequest->new(
>     {
>         borrowernumber => $patron->id,
>         biblionumber   => $biblio->id,
>         itemnumber     => $item->id,
>+        title          => $article_request_title,
>     }
> )->store();
>+
>+my $notify_message = Koha::Notice::Messages->search->next;
>+is( $notify_message->letter_code, "AR_".Koha::ArticleRequest::Status::Pending);
>+# Default AR_PROCESSING template content "Title: <<article_requests.title>>"
>+like( $notify_message->content, qr{Title: $article_request_title}, 'Values from article_requests table must be fetched for the notification' );
>+
> $article_request = Koha::ArticleRequests->find( $article_request->id );
> ok( $article_request->id, 'Koha::ArticleRequest created' );
>-
> is( $article_request->status, Koha::ArticleRequest::Status::Pending, 'New article request has status of Open' );
>+is( $article_request->updated_on, undef, 'New article request has not an updated_on date set yet' );
>+
>+# process
>+Koha::Notice::Messages->delete;
> $article_request->process();
>+$notify_message = Koha::Notice::Messages->search->next;
>+is( $notify_message->letter_code, "AR_".Koha::ArticleRequest::Status::Processing);
> is( $article_request->status, Koha::ArticleRequest::Status::Processing, '$ar->process() changes status to Processing' );
>+isnt( $article_request->updated_on, undef, 'Updated article request has an updated_on date set' );
>+
>+# complete
> $article_request->complete();
> is( $article_request->status, Koha::ArticleRequest::Status::Completed, '$ar->complete() changes status to Completed' );
>+
>+# cancel
> $article_request->cancel();
> is( $article_request->status, Koha::ArticleRequest::Status::Canceled, '$ar->complete() changes status to Canceled' );
> $article_request->status(Koha::ArticleRequest::Status::Pending);
>-- 
>2.11.0

Actions: View | Diff | Splinter Review

Attachments on bug 18477: 63251 | 63261 | 70228 | 70231 | 70633 | 70634