bugfix - don't allow deletion of authority records from OPAC

Because of some copy-and-paste work, it was possible to
construct an OPAC URL that would attempt to call DelAuthority
on a selected authority record.  This is perhaps taking
patron contributations to library metadata a bit too far.

Signed-off-by: Joshua Ferraro <jmf@liblime.com>

diff --git a/opac/opac-authorities-home.pl b/opac/opac-authorities-home.pl
index e1ea484..6284e81 100755 (executable)
--- a/opac/opac-authorities-home.pl
+++ b/opac/opac-authorities-home.pl
@@ -145,24 +145,6 @@ if ( $op eq "do_search" ) {
     );
 
 }
-elsif ( $op eq "delete" ) {
-
-    &DelAuthority( $authid, 1 );
-
-    ( $template, $loggedinuser, $cookie ) = get_template_and_user(
-        {
-            template_name   => "authorities/authorities-home.tmpl",
-            query           => $query,
-            type            => 'intranet',
-            authnotrequired => 0,
-            flagsrequired   => { catalogue => 1 },
-            debug           => 1,
-        }
-    );
-
-    #  $template->param("statements" => \@statements,
-    #                                          "nbstatements" => $nbstatements);
-}
 elsif ( $op eq "AddStatement" ) {
 
     ( $template, $loggedinuser, $cookie ) = get_template_and_user(