X-Git-Url: https://git.camperquake.de/gitweb.cgi?a=blobdiff_plain;f=videosite%2FBase.pm;h=d9e2044401b1e852de24d1433676e7bc07127435;hb=096ea86a7d54ff2aa88fad7e9629fd7dc206da70;hp=be0272eb8aaaa60352b02489deebf6e07d2dce84;hpb=422536027a2fb0656c25e18dba1e342c70533655;p=videosite.git

diff --git a/videosite/Base.pm b/videosite/Base.pm
index be0272e..d9e2044 100644
--- a/videosite/Base.pm
+++ b/videosite/Base.pm
@@ -12,7 +12,7 @@ sub new {
     my $class = shift;
     my $self = {'_DEBUG' => 0,
                 '_CONNECTOR' => undef,
-                API => {
+                _API => {
                     io => sub { printf(@_) },
                     connectors => sub { return ({ 'name' => 'direct',
                                                   'schemas' => {} }) },
@@ -248,13 +248,23 @@ sub selectconn {
 }
 
 #
+# This function was used in previous versions of videosite. If it's called
+# we are dealing with an old plugin which probably needs some minor modifications
+# to work properly.
+#
+# Generate a warning message.
+#
+sub _prepare_parameters {
+    my $self = shift;
+
+    $self->error("THIS MODULE IS CALLING _prepare_parameters(). THIS FUNCTION IS DEPRECATED. See readme.txt in the plugin directory.");
+}
+
+#
 # Register a callbacks into the core API to the plugin.
 # Example of those are config getter/setters and IO functions
 # The API is a hash reference containing subroutine references.
 #
-# After the API is registered an attempt is made to load the config
-# (or set defaults if config values are not found)
-#
 sub register_api {
     my $self = shift;
     my $api = shift;