|
Lines 38-45
my $query = new CGI;
Link Here
|
| 38 |
my $dbh = C4::Context->dbh; |
38 |
my $dbh = C4::Context->dbh; |
| 39 |
my $biblionumber = $query->param('biblionumber'); |
39 |
my $biblionumber = $query->param('biblionumber'); |
| 40 |
$biblionumber = HTML::Entities::encode($biblionumber); |
40 |
$biblionumber = HTML::Entities::encode($biblionumber); |
| 41 |
my $frameworkcode = $query->param('frameworkcode'); |
41 |
my $frameworkcode = $query->param('frameworkcode') // GetFrameworkCode( $biblionumber ); |
| 42 |
$frameworkcode = GetFrameworkCode( $biblionumber ) unless ($frameworkcode); |
|
|
| 43 |
my $popup = |
42 |
my $popup = |
| 44 |
$query->param('popup') |
43 |
$query->param('popup') |
| 45 |
; # if set to 1, then don't insert links, it's just to show the biblio |
44 |
; # if set to 1, then don't insert links, it's just to show the biblio |
| 46 |
- |
|
|