X-Git-Url: https://git.camperquake.de/gitweb.cgi?a=blobdiff_plain;ds=sidebyside;f=videosite-irssi.pl;h=4029c1cce0b4b315a199b580a18b3ccebc7de75a;hb=8d918b07ad100a4d7b96cf5df640cef0a8a0411d;hp=dc6196b8955d772c81b90515a8ea208913d0b5ca;hpb=918efb1095354b8863af5eba168ffba5faecb50c;p=videosite.git

diff --git a/videosite-irssi.pl b/videosite-irssi.pl
index dc6196b..4029c1c 100644
--- a/videosite-irssi.pl
+++ b/videosite-irssi.pl
@@ -785,7 +785,6 @@ sub config_init {
 
     # Try to find old config files and load them.
     if (-r $conffile) {
-        write_debug("Attempting JSON config load from %s", $conffile);
         eval {
             local $/;
             open(CONF, '<', $conffile);
@@ -793,7 +792,6 @@ sub config_init {
             close(CONF);
         };
     } elsif (-r $xmlconffile) {
-        write_debug("Attempting XML config load from %s", $xmlconffile);
         $conf = XML::Simple::XMLin($xmlconffile, ForceArray => ['config', 'option', 'connectorlist'], KeepRoot => 1, KeyAttr => {'connector' => '+name', 'config' => 'module', 'option' => 'key'});
     }
 
@@ -805,7 +803,7 @@ sub config_init {
     #   content => value
     # }
     #
-    # by this structure
+    # with this structure
     #
     # key => value
     #
@@ -868,7 +866,7 @@ sub config_init {
 #
 sub config_get {
     my $path = shift;
-    my $item = join('.', @{$path});
+    my $item = join('.', 'videosite', @{$path});
     my $val;
 
 
@@ -883,7 +881,7 @@ sub config_get {
 #
 sub config_has {
     my $path = shift;
-    my $item = join('.', @{$path});
+    my $item = join('.', 'videosite', @{$path});
 
     Irssi::settings_add_str('videosite', $item, "\0");
     return Irssi::settings_get_str ne "\0";
@@ -895,7 +893,7 @@ sub config_has {
 sub config_set {
     my $path = shift;
     my $value = shift;
-    my $item = join('.', @{$path});
+    my $item = join('.', 'videosite', @{$path});
 
     Irssi::settings_add_str('videosite', $item, "\0");
     Irssi::settings_set_str($item, $value);
@@ -906,7 +904,7 @@ sub config_set {
 #
 sub config_del {
     my $path = shift;
-    my $item = join('.', @{$path});
+    my $item = join('.', 'videosite', @{$path});
 
     Irssi::settings_remove($item);
 }