Lines 911-917
sub handle_login {
Link Here
|
911 |
sub summary_info { |
911 |
sub summary_info { |
912 |
my ( $ils, $patron, $summary, $start, $end, $server ) = @_; |
912 |
my ( $ils, $patron, $summary, $start, $end, $server ) = @_; |
913 |
my $resp = ''; |
913 |
my $resp = ''; |
914 |
my $summary_type; |
|
|
915 |
|
914 |
|
916 |
# |
915 |
# |
917 |
# Map from offsets in the "summary" field of the Patron Information |
916 |
# Map from offsets in the "summary" field of the Patron Information |
Lines 926-934
sub summary_info {
Link Here
|
926 |
{ func => $patron->can("unavail_holds"), fid => FID_UNAVAILABLE_HOLD_ITEMS }, |
925 |
{ func => $patron->can("unavail_holds"), fid => FID_UNAVAILABLE_HOLD_ITEMS }, |
927 |
); |
926 |
); |
928 |
|
927 |
|
929 |
if ( ( $summary_type = index( $summary, 'Y' ) ) == -1 ) { |
928 |
my $summary_type = index( $summary, 'Y' ); |
930 |
return ''; # No detailed information required |
929 |
return q{} if $summary_type == -1; # No detailed information required. |
931 |
} |
930 |
return q{} if $summary_type > 5; # Positions 6-9 are not defined in the sip spec, |
|
|
931 |
# and we have no extensions to handle them. |
932 |
|
932 |
|
933 |
siplog( "LOG_DEBUG", "Summary_info: index == '%d', field '%s'", $summary_type, $summary_map[$summary_type]->{fid} ); |
933 |
siplog( "LOG_DEBUG", "Summary_info: index == '%d', field '%s'", $summary_type, $summary_map[$summary_type]->{fid} ); |
934 |
|
934 |
|
935 |
- |
|
|