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

(-)a/opac/opac-sendshelf.pl (-2 lines)
Lines 84-90 if ( $email ) { Link Here
84
        my $fw               = GetFrameworkCode($biblionumber);
84
        my $fw               = GetFrameworkCode($biblionumber);
85
        my $dat              = GetBiblioData($biblionumber);
85
        my $dat              = GetBiblioData($biblionumber);
86
        my $record           = GetMarcBiblio($biblionumber, 1);
86
        my $record           = GetMarcBiblio($biblionumber, 1);
87
        my $marcnotesarray   = GetMarcNotes( $record, $marcflavour );
88
        my $marcauthorsarray = GetMarcAuthors( $record, $marcflavour );
87
        my $marcauthorsarray = GetMarcAuthors( $record, $marcflavour );
89
        my $marcsubjctsarray = GetMarcSubjects( $record, $marcflavour );
88
        my $marcsubjctsarray = GetMarcSubjects( $record, $marcflavour );
90
        my $subtitle         = GetRecordValue('subtitle', $record, $fw);
89
        my $subtitle         = GetRecordValue('subtitle', $record, $fw);
Lines 92-98 if ( $email ) { Link Here
92
        my @items = GetItemsInfo( $biblionumber );
91
        my @items = GetItemsInfo( $biblionumber );
93
92
94
        $dat->{ISBN}           = GetMarcISBN($record, $marcflavour);
93
        $dat->{ISBN}           = GetMarcISBN($record, $marcflavour);
95
        $dat->{MARCNOTES}      = $marcnotesarray;
96
        $dat->{MARCSUBJCTS}    = $marcsubjctsarray;
94
        $dat->{MARCSUBJCTS}    = $marcsubjctsarray;
97
        $dat->{MARCAUTHORS}    = $marcauthorsarray;
95
        $dat->{MARCAUTHORS}    = $marcauthorsarray;
98
        $dat->{'biblionumber'} = $biblionumber;
96
        $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