perl: Rename lookup function to be more consistent with the Python bindings

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

diff --git a/src/perl/Location/Location.xs b/src/perl/Location/Location.xs
index c4d7fa9ede801152066922f0aa65b616cbb0342c..6fbf2234395ab465142e9f5660d916666db6e787 100644 (file)
--- a/src/perl/Location/Location.xs
+++ b/src/perl/Location/Location.xs
@@ -57,7 +57,7 @@ init(file)
                RETVAL
 
 char*
-get_country_code(db, address)
+lookup_country_code(db, address)
        struct loc_database* db;
        char* address;