[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Koha-cvs] koha/C4 Context.pm [rel_3_0]
From: |
paul poulain |
Subject: |
[Koha-cvs] koha/C4 Context.pm [rel_3_0] |
Date: |
Wed, 11 Oct 2006 14:27:26 +0000 |
CVSROOT: /sources/koha
Module name: koha
Branch: rel_3_0
Changes by: paul poulain <tipaul> 06/10/11 14:27:26
Modified files:
C4 : Context.pm
Log message:
removing a warning
CVSWeb URLs:
http://cvs.savannah.gnu.org/viewcvs/koha/C4/Context.pm?cvsroot=koha&only_with_tag=rel_3_0&r1=1.43.2.2&r2=1.43.2.3
Patches:
Index: Context.pm
===================================================================
RCS file: /sources/koha/koha/C4/Context.pm,v
retrieving revision 1.43.2.2
retrieving revision 1.43.2.3
diff -u -b -r1.43.2.2 -r1.43.2.3
--- Context.pm 10 Oct 2006 15:28:16 -0000 1.43.2.2
+++ Context.pm 11 Oct 2006 14:27:26 -0000 1.43.2.3
@@ -16,7 +16,7 @@
# Koha; if not, write to the Free Software Foundation, Inc., 59 Temple Place,
# Suite 330, Boston, MA 02111-1307 USA
-# $Id: Context.pm,v 1.43.2.2 2006/10/10 15:28:16 hdl Exp $
+# $Id: Context.pm,v 1.43.2.3 2006/10/11 14:27:26 tipaul Exp $
use strict;
use DBI;
use ZOOM;
@@ -28,7 +28,7 @@
qw($context),
qw(@context_stack);
-$VERSION = do { my @v = '$Revision: 1.43.2.2 $' =~ /\d+/g;
+$VERSION = do { my @v = '$Revision: 1.43.2.3 $' =~ /\d+/g;
shift(@v) . "." . join("_", map {sprintf "%03d", $_ } @v); };
=head1 NAME
@@ -421,8 +421,6 @@
my $auth=shift;
my $piggyback=shift;
my $syntax=shift;
- warn "self : $self server : $server";
-
if ( defined($context->{"Zconn"}) ) {
return $context->{"Zconn"};
@@ -843,6 +841,9 @@
=cut
# $Log: Context.pm,v $
+# Revision 1.43.2.3 2006/10/11 14:27:26 tipaul
+# removing a warning
+#
# Revision 1.43.2.2 2006/10/10 15:28:16 hdl
# BUG FIXING : using database name in Zconn if defined and not hard coded value
#