Bug 303803: Remove the unused get_classification_name() routine - Patch by Frédéric...

diff --git a/globals.pl b/globals.pl
index d4ba17004eab8985739f74c997745d4b031f828c..ed4159335f73d149cfb51c692fe56f4a681fa239 100644 (file)
--- a/globals.pl
+++ b/globals.pl
@@ -688,19 +688,6 @@ sub get_classification_id {
     return $classification_id;
 }
 
-sub get_classification_name {
-    my ($classification_id) = @_;
-    die "non-numeric classification_id '$classification_id' passed to get_classification_name"
-      unless ($classification_id =~ /^\d+$/);
-    PushGlobalSQLState();
-    SendSQL("SELECT name FROM classifications WHERE id = $classification_id");
-    my ($classification) = FetchSQLData();
-    PopGlobalSQLState();
-    return $classification;
-}
-
-
-
 sub get_product_id {
     my ($prod) = @_;
     PushGlobalSQLState();