[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 => address@hidden,    
     routingnotes => $routingnotes,
+    libraryname => $library_name,
     );
 
         output_html_with_http_headers $query, $cookie, $template->output;