- Add feedback for /videosite save

diff --git a/videosite.pl b/videosite.pl
index 847e627..0c5b650 100644 (file)
--- a/videosite.pl
+++ b/videosite.pl
@@ -96,9 +96,16 @@ sub check_for_link {
 
 sub cmd_save {
 
-    open(CONF, '>'.$conffile);
-    print CONF XML::Simple::XMLout($conf, KeepRoot => 1, KeyAttr => {'config' => 'module', 'option' => 'key'});
-    close(CONF);
+    eval {
+        open(CONF, '>'.$conffile) or die 'Could not open config file';
+        print CONF XML::Simple::XMLout($conf, KeepRoot => 1, KeyAttr => {'config' => 'module', 'option' => 'key'});
+        close(CONF);
+    };
+    if ($@) {
+        write_irssi(undef, 'Could not save config: %s', $@);
+    } else {
+        write_irssi(undef, 'Saved config');
+    }
 }
 
 sub cmd_set {