From ef6db75848f4d5b2c811ce0b105844c2464018c9 Mon Sep 17 00:00:00 2001 From: Jonathan Druart Date: Thu, 23 Apr 2015 15:41:17 +0200 Subject: [PATCH] Bug 11625: Implement DefaultToLoggedInLibraryNoticesSlips --- tools/letter.pl | 6 ++++++ 1 file changed, 6 insertions(+) diff --git a/tools/letter.pl b/tools/letter.pl index e9f39d9..27d64a1 100755 --- a/tools/letter.pl +++ b/tools/letter.pl @@ -353,6 +353,12 @@ sub retrieve_letters { sub default_display { my ($branchcode, $searchfield) = @_; + unless ( defined $branchcode ) { + if ( C4::Context->preference('DefaultToLoggedInLibraryNoticesSlips') ) { + $branchcode = C4::Branch::mybranch(); + } + } + if ( $searchfield ) { $template->param( search => 1 ); } -- 2.1.0