Bug 18400 - Noisy warns in opac-search.pl during itemtype sorting
[koha-ffzg.git] / opac / opac-alert-subscribe.pl
index eec71f3..6ed153d 100755 (executable)
@@ -38,6 +38,7 @@ my $sth;
 my ( $template, $loggedinuser, $cookie );
 my $externalid   = $query->param('externalid');
 my $alerttype    = $query->param('alerttype') || '';
+my $referer      = $query->param('referer') || 'detail';
 my $biblionumber = $query->param('biblionumber');
 
 ( $template, $loggedinuser, $cookie ) = get_template_and_user(
@@ -53,11 +54,11 @@ my $biblionumber = $query->param('biblionumber');
 
 if ( $op eq 'alert_confirmed' ) {
     addalert( $loggedinuser, $alerttype, $externalid );
-    if ( $alerttype eq 'issue_ser' ) {
+    if ( $referer eq 'serial' ) {
         print $query->redirect(
             "opac-serial-issues.pl?biblionumber=$biblionumber");
         exit;
-    } elsif ( $alerttype eq 'issue_det' ) {
+    } else {
         print $query->redirect(
             "opac-detail.pl?biblionumber=$biblionumber");
         exit;
@@ -70,11 +71,11 @@ elsif ( $op eq 'cancel_confirmed' ) {
     {    # we are supposed to have only 1 result, but just in case...
         delalert( $_->{alertid} );
     }
-    if ( $alerttype eq 'issue_ser' ) {
+    if ( $referer eq 'serial' ) {
         print $query->redirect(
             "opac-serial-issues.pl?biblionumber=$biblionumber");
         exit;
-    } elsif ( $alerttype eq 'issue_det' ) {
+    } else {
         print $query->redirect(
             "opac-detail.pl?biblionumber=$biblionumber");
         exit;
@@ -83,18 +84,17 @@ elsif ( $op eq 'cancel_confirmed' ) {
 
 }
 else {
-    if ( $alerttype eq 'issue_ser' || $alerttype eq 'issue_det' ) {    # alert for subscription issues
+    if ( $alerttype eq 'issue' ) { # alert for subscription issues
         my $subscription = &GetSubscription($externalid);
         $template->param(
             alerttype      => $alerttype,
+            referer        => $referer,
             "typeissue$op" => 1,
             bibliotitle    => $subscription->{bibliotitle},
             notes          => $subscription->{notes},
             externalid     => $externalid,
             biblionumber   => $biblionumber,
         );
-    } else {
     }
-
 }
 output_html_with_http_headers $query, $cookie, $template->output;