[Koha-cvs] koha/bull routing-preview.pl [rel_2_2]

[Mason James]

CVSROOT:	/sources/koha
Module name:	koha
Branch:		rel_2_2
Changes by:	Mason James <sushi>	07/05/07 01:22:22

Modified files:
	bull           : routing-preview.pl 

Log message:
	replaced hardcoded 'opus', with syspref

CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/bull/routing-preview.pl?cvsroot=koha&only_with_tag=rel_2_2&r1=1.1.2.4&r2=1.1.2.5

Patches:
Index: routing-preview.pl
===================================================================
RCS file: /sources/koha/koha/bull/Attic/routing-preview.pl,v
retrieving revision 1.1.2.4
retrieving revision 1.1.2.5
diff -u -b -r1.1.2.4 -r1.1.2.5
--- routing-preview.pl	23 Apr 2007 03:37:04 -0000	1.1.2.4
+++ routing-preview.pl	7 May 2007 01:22:22 -0000	1.1.2.5
@@ -27,6 +27,8 @@
 my $delete = $query->param('delete');
 my $dbh = C4::Context->dbh;
 
+my $library_name = C4::Context->preference("LibraryName");
+
 if($delete){
     delroutingmember($routingid,$subscriptionid);
     my $sth = $dbh->prepare("UPDATE serial SET routingnotes = NULL WHERE subscriptionid = ?");
@@ -128,6 +130,7 @@
     subscriptionid => $subscriptionid,
     memberloop => \@results,    
     routingnotes => $routingnotes,
+    libraryname => $library_name,
     );
 
         output_html_with_http_headers $query, $cookie, $template->output;