diff --git a/reserve/request.pl b/reserve/request.pl
index e7cbad573d..4fb83ead8e 100755
--- a/reserve/request.pl
+++ b/reserve/request.pl
@@ -36,7 +36,7 @@ use C4::Reserves;
 use C4::Biblio;
 use C4::Koha;
 use C4::Circulation;
-use C4::Date;
+use C4::Dates;
 use C4::Members;
 
 my $dbh = C4::Context->dbh;
@@ -351,7 +351,7 @@ foreach my $biblioitemnumber (@biblioitemnumbers) {
 # existingreserves building
 my @reserveloop;
 my $branches = GetBranches();
-my ( $count, $reserves ) = GetReservesFromBiblionumber($biblionumber);
+( $count, $reserves ) = GetReservesFromBiblionumber($biblionumber);
 foreach my $res ( sort { $a->{found} cmp $b->{found} } @$reserves ) {
     my %reserve;
     my @optionloop;
diff --git a/virtualshelves/shelves.pl b/virtualshelves/shelves.pl
index f6615451c0..99d739b921 100755
--- a/virtualshelves/shelves.pl
+++ b/virtualshelves/shelves.pl
@@ -198,7 +198,7 @@ SWITCH: {
     }
 }
 
-my $shelflist = GetShelves( $loggedinuser, 2 );
+$shelflist = GetShelves( $loggedinuser, 2 );
 my $color = '';
 my @shelvesloop;
 my $numberCanManage = 0;
@@ -224,7 +224,6 @@ foreach my $element ( sort keys %$shelflist ) {
 
 $template->param(
     shelvesloop     => \@shelvesloop,
-
     numberCanManage => $numberCanManage,
 );