perl: Remove another useless initialisation

Signed-off-by: Michael Tremer <michael.tremer@ipfire.org>

diff --git a/src/perl/Location/Location.xs b/src/perl/Location/Location.xs
index c45e9140003f90ca1baf89d06b2889b66e07758f..1ab5ae3377180f438f982c53d5ba8f0d4e453480 100644 (file)
--- a/src/perl/Location/Location.xs
+++ b/src/perl/Location/Location.xs
@@ -95,7 +95,7 @@ database_get_vendor(db)
 
 void
 DESTROY(db)
-       struct loc_database* db = NULL;
+       struct loc_database* db;
 
        CODE:
                // Close database