View | Details | Raw Unified | Return to bug 14306
Collapse All | Expand All

(-)a/opac/opac-sendshelf.pl (-2 lines)
Lines 90-96 if ( $email ) { Link Here
90
        my $fw               = GetFrameworkCode($biblionumber);
90
        my $fw               = GetFrameworkCode($biblionumber);
91
        my $dat              = GetBiblioData($biblionumber);
91
        my $dat              = GetBiblioData($biblionumber);
92
        my $record           = GetMarcBiblio($biblionumber, 1);
92
        my $record           = GetMarcBiblio($biblionumber, 1);
93
        my $marcnotesarray   = GetMarcNotes( $record, $marcflavour );
94
        my $marcauthorsarray = GetMarcAuthors( $record, $marcflavour );
93
        my $marcauthorsarray = GetMarcAuthors( $record, $marcflavour );
95
        my $marcsubjctsarray = GetMarcSubjects( $record, $marcflavour );
94
        my $marcsubjctsarray = GetMarcSubjects( $record, $marcflavour );
96
        my $subtitle         = GetRecordValue('subtitle', $record, $fw);
95
        my $subtitle         = GetRecordValue('subtitle', $record, $fw);
Lines 98-104 if ( $email ) { Link Here
98
        my @items = GetItemsInfo( $biblionumber );
97
        my @items = GetItemsInfo( $biblionumber );
99
98
100
        $dat->{ISBN}           = GetMarcISBN($record, $marcflavour);
99
        $dat->{ISBN}           = GetMarcISBN($record, $marcflavour);
101
        $dat->{MARCNOTES}      = $marcnotesarray;
102
        $dat->{MARCSUBJCTS}    = $marcsubjctsarray;
100
        $dat->{MARCSUBJCTS}    = $marcsubjctsarray;
103
        $dat->{MARCAUTHORS}    = $marcauthorsarray;
101
        $dat->{MARCAUTHORS}    = $marcauthorsarray;
104
        $dat->{'biblionumber'} = $biblionumber;
102
        $dat->{'biblionumber'} = $biblionumber;
(-)a/virtualshelves/sendshelf.pl (-3 lines)
Lines 81-87 if ($email) { Link Here
81
        my $fw               = GetFrameworkCode($biblionumber);
81
        my $fw               = GetFrameworkCode($biblionumber);
82
        my $dat              = GetBiblioData($biblionumber);
82
        my $dat              = GetBiblioData($biblionumber);
83
        my $record           = GetMarcBiblio($biblionumber, 1);
83
        my $record           = GetMarcBiblio($biblionumber, 1);
84
        my $marcnotesarray   = GetMarcNotes( $record, $marcflavour );
85
        my $marcauthorsarray = GetMarcAuthors( $record, $marcflavour );
84
        my $marcauthorsarray = GetMarcAuthors( $record, $marcflavour );
86
        my $marcsubjctsarray = GetMarcSubjects( $record, $marcflavour );
85
        my $marcsubjctsarray = GetMarcSubjects( $record, $marcflavour );
87
        my $subtitle         = GetRecordValue( 'subtitle', $record, $fw );
86
        my $subtitle         = GetRecordValue( 'subtitle', $record, $fw );
Lines 89-95 if ($email) { Link Here
89
        my @items = GetItemsInfo($biblionumber);
88
        my @items = GetItemsInfo($biblionumber);
90
89
91
        $dat->{ISBN}           = GetMarcISBN($record, $marcflavour);
90
        $dat->{ISBN}           = GetMarcISBN($record, $marcflavour);
92
        $dat->{MARCNOTES}      = $marcnotesarray;
93
        $dat->{MARCSUBJCTS}    = $marcsubjctsarray;
91
        $dat->{MARCSUBJCTS}    = $marcsubjctsarray;
94
        $dat->{MARCAUTHORS}    = $marcauthorsarray;
92
        $dat->{MARCAUTHORS}    = $marcauthorsarray;
95
        $dat->{'biblionumber'} = $biblionumber;
93
        $dat->{'biblionumber'} = $biblionumber;
96
- 

Return to bug 14306