|
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 |
- |
|
|