Bug 10703: Update stats table documentation

[srvgit] / C4 / Contract.pm

diff --git a/C4/Contract.pm b/C4/Contract.pm
index 57978a0..4afd670 100644 (file)
--- a/C4/Contract.pm
+++ b/C4/Contract.pm
@@ -92,7 +92,7 @@ sub GetContracts {
 
 =head2 GetContract
 
-$contract = GetContract( { contractnumber => $contractnumber } );
+$contract = GetContract( { contractnumber => $contractnumber } );
 
 Looks up the contract that has PRIMKEY (contractnumber) value $contractID
 
@@ -104,6 +104,8 @@ sub GetContract {
     my ($params) = @_;
     my $contractnumber = $params->{contractnumber};
 
+    return unless $contractnumber;
+
     my $contracts = GetContracts({
         contractnumber => $contractnumber,
     });