From 45f6b755fa40e6dcdbe8375a691f5ab05a083f7e Mon Sep 17 00:00:00 2001
From: Marc Veron <veron@veron.ch>
Date: Fri, 29 Jun 2012 21:31:34 +0200
Subject: [PATCH] Bug 7563 - Silent print slips using Firefox PlugIn
 jsPrintSetup and new staff client preference

Signed-off-by: Chris Cormack <chris@bigballofwax.co.nz>
Signed-off-by: Paul Poulain <paul.poulain@biblibre.com>
---
 installer/data/mysql/sysprefs.sql                    |  2 +-
 installer/data/mysql/updatedatabase.pl               |  7 +++++++
 .../en/modules/admin/preferences/staff_client.pref   |  5 +++++
 .../intranet-tmpl/prog/en/modules/circ/printslip.tt  | 12 ++++++++----
 members/printslip.pl                                 |  2 ++
 5 files changed, 23 insertions(+), 5 deletions(-)

diff --git a/installer/data/mysql/sysprefs.sql b/installer/data/mysql/sysprefs.sql
index 6a3735d584..7009155dd2 100644
--- a/installer/data/mysql/sysprefs.sql
+++ b/installer/data/mysql/sysprefs.sql
@@ -374,4 +374,4 @@ INSERT INTO systempreferences (variable,value,explanation,options,type) VALUES('
 INSERT INTO systempreferences (variable,value,options,explanation,type) VALUES ('OPACShowUnusedAuthorities','1','','Show authorities that are not being used in the OPAC.','YesNo');
 INSERT INTO systempreferences (variable,value,explanation,type) VALUES('EnableBorrowerFiles','0','If enabled, allows librarians to upload and attach arbitrary files to a borrower record.','YesNo');
 INSERT INTO systempreferences (variable,value,explanation,options,type) VALUES('UpdateTotalIssuesOnCirc','0','Whether to update the totalissues field in the biblio on each circ.',NULL,'YesNo');
-
+INSERT INTO systempreferences (variable,value,explanation,options,type) VALUES('IntranetSlipPrinterJS','','Use this JavaScript for printing slips. Define at least function printThenClose(). For use e.g. with Firefox PlugIn jsPrintSetup, see http://jsprintsetup.mozdev.org/','','Free');
diff --git a/installer/data/mysql/updatedatabase.pl b/installer/data/mysql/updatedatabase.pl
index ef9cde74ca..143edf2410 100755
--- a/installer/data/mysql/updatedatabase.pl
+++ b/installer/data/mysql/updatedatabase.pl
@@ -5466,6 +5466,13 @@ if ( C4::Context->preference("Version") < TransformToNum($DBversion) ) {
     SetVersion($DBversion);
 }
 
+$DBversion ="XXX";
+if ( C4::Context->preference("Version") < TransformToNum($DBversion) ) {
+    $dbh->do("INSERT INTO systempreferences (variable,value,explanation,options,type) VALUES('IntranetSlipPrinterJS','','Use this JavaScript for printing slips. Define at least function printThenClose(). For use e.g. with Firefox PlugIn jsPrintSetup, see http://jsprintsetup.mozdev.org/','','Free')");
+    print "Upgrade to $DBversion done (Add system preference IntranetSlipPrinterJS))\n";
+    SetVersion($DBversion);
+}
+
 =head1 FUNCTIONS
 
 =head2 TableExists($table)
diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/admin/preferences/staff_client.pref b/koha-tmpl/intranet-tmpl/prog/en/modules/admin/preferences/staff_client.pref
index b93f8fd62a..b6be289a80 100644
--- a/koha-tmpl/intranet-tmpl/prog/en/modules/admin/preferences/staff_client.pref
+++ b/koha-tmpl/intranet-tmpl/prog/en/modules/admin/preferences/staff_client.pref
@@ -15,6 +15,11 @@ Staff Client:
             - pref: intranetstylesheet
               class: url
             - on all pages in the staff interface, instead of the default. (This should be a complete URL, starting with <code>http://</code>.)
+        -
+            - "Use the following JavaScript for printing slips. Define at least function printThenClose(). For use e.g. with Firefox PlugIn jsPrintSetup, see http://jsprintsetup.mozdev.org/:"
+            - pref: IntranetSlipPrinterJS
+              type: textarea
+              class: code
         -
             - "Include the following CSS on all pages in the staff client:"
             - pref: IntranetUserCSS
diff --git a/koha-tmpl/intranet-tmpl/prog/en/modules/circ/printslip.tt b/koha-tmpl/intranet-tmpl/prog/en/modules/circ/printslip.tt
index 3e60d736e9..7b29d4ee20 100644
--- a/koha-tmpl/intranet-tmpl/prog/en/modules/circ/printslip.tt
+++ b/koha-tmpl/intranet-tmpl/prog/en/modules/circ/printslip.tt
@@ -8,10 +8,14 @@
 [% END %]
 
 <script language="javascript">
-    function printThenClose() {
-        window.print();
-        window.close();
-    }
+[% IF ( IntranetSlipPrinterJS ) %]
+    [% IntranetSlipPrinterJS %]
+[% ELSE %]
+     function printThenClose() {
+         window.print();
+         window.close();
+     }
+[% END %]
 </script>
 </head>
 <body id="circ_printslip" class="circ" onload="printThenClose();">
diff --git a/members/printslip.pl b/members/printslip.pl
index 3a499cd89e..71fdda249d 100755
--- a/members/printslip.pl
+++ b/members/printslip.pl
@@ -89,4 +89,6 @@ $template->param(
     error           => $error,
 );
 
+$template->param( IntranetSlipPrinterJS => C4::Context->preference('IntranetSlipPrinterJS' ) );
+
 output_html_with_http_headers $input, $cookie, $template->output;
-- 
2.39.5