---
C4/Context.pm | 3 ++-
kohaversion.pl | 2 +-
2 files changed, 3 insertions(+), 2 deletions(-)
diff --git a/C4/Context.pm b/C4/Context.pm
index 88bd1ad..3cba0ff 100644
--- a/C4/Context.pm
+++ b/C4/Context.pm
@@ -77,6 +77,7 @@ use DBI;
use ZOOM;
use XML::Simple;
use C4::Boolean;
+use C4::Debug;
=head1 NAME
@@ -911,7 +912,7 @@ sub set_shelves_userenv ($$) {
sub get_shelves_userenv () {
my $active;
unless ($active = $context->{userenv}->{$context->{activeuser}}) {
- warn "get_shelves_userenv cannot retrieve
context->{userenv}->{context->{activeuser}}";
+ $debug and warn "get_shelves_userenv cannot retrieve
context->{userenv}->{context->{activeuser}}";
return undef;
}
my $pubshelves = $active->{pubshelves} or undef;
diff --git a/kohaversion.pl b/kohaversion.pl
index 340b88b..956817d 100644
--- a/kohaversion.pl
+++ b/kohaversion.pl
@@ -10,7 +10,7 @@
use strict;
sub kohaversion {
- our $VERSION = "3.00.00.092";
+ our $VERSION = "3.00.00.091";
# version needs to be set this way
# so that it can be picked up by Makefile.PL
# during install
--
1.5.5.GIT
_______________________________________________
Koha-patches mailing list
[email protected]
http://lists.koha.org/mailman/listinfo/koha-patches
