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