Bug 4941 [QA Followup] - Retain singleBranchMode in list of sysprefs passed to XSLT

diff --git a/C4/XSLT.pm b/C4/XSLT.pm
index d7658a2..5622e5f 100644 (file)
--- a/C4/XSLT.pm
+++ b/C4/XSLT.pm
@@ -32,6 +32,7 @@ use C4::Biblio;
 use C4::Circulation;
 use C4::Reserves;
 use Koha::XSLT_Handler;
 use C4::Circulation;
 use C4::Reserves;
 use Koha::XSLT_Handler;

+use Koha::Libraries;

 
 use Encode;
 
 
 use Encode;
 


@@ -212,6 +213,12 @@ sub XSLTParse4Display {
         next unless defined($sp);
         $sysxml .= "<syspref name=\"$syspref\">$sp</syspref>\n";
     }
         next unless defined($sp);
         $sysxml .= "<syspref name=\"$syspref\">$sp</syspref>\n";
     }

+
+    # singleBranchMode was a system preference, but no longer is
+    # we can retain it here for compatibility
+    my $singleBranchMode = Koha::Libraries->search->count == 1;
+    $sysxml .= "<syspref name=\"singleBranchMode\">$singleBranchMode</syspref>\n";
+

     $sysxml .= "</sysprefs>\n";
     $xmlrecord =~ s/\<\/record\>/$itemsxml$sysxml\<\/record\>/;
     if ($fixamps) { # We need to correct the HTML entities that Zebra outputs
     $sysxml .= "</sysprefs>\n";
     $xmlrecord =~ s/\<\/record\>/$itemsxml$sysxml\<\/record\>/;
     if ($fixamps) { # We need to correct the HTML entities that Zebra outputs