Failover to language '000' (unknown/default)

diff --git a/Sip/MsgType.pm b/Sip/MsgType.pm
index 55555aa..822eff2 100644 (file)
--- a/Sip/MsgType.pm
+++ b/Sip/MsgType.pm
@@ -443,6 +443,7 @@ sub handle {
 # 
 sub build_patron_status {
     my ($patron, $lang, $fields)= @_;
+    $lang ||= '000';
     my $patron_pwd = $fields->{(FID_PATRON_PWD)};
     my $resp = (PATRON_STATUS_RESP);