Merge pull request #657 from yorik/fix-autostart

Fix #162: Removes panic in Autostart package
shutter-project · Mar 27, 2024 · 53367d1 · 53367d1
2 parents 0966fc2 + ed84c78
commit 53367d1
Showing 1 changed file with 5 additions and 2 deletions.
diff --git a/share/shutter/resources/modules/Shutter/App/Autostart.pm b/share/shutter/resources/modules/Shutter/App/Autostart.pm
@@ -56,7 +56,10 @@ sub create_autostart_file {
 
 	my $path = $dir . "/shutter.desktop";
 
-	open FILE, ">:utf8", $path or die $!;
+	open FILE, ">:utf8", $path or do {
+		warn "WARNING: can not create/update file $path: $!\n";
+		return FALSE;
+	};
 	foreach my $line (@data) {
 		if ($line =~ /Exec=shutter<options>/) {
 
@@ -74,7 +77,7 @@ sub create_autostart_file {
 		}
 		print FILE $line;
 	}
-	close FILE or die $!;
+	close FILE or warn "WARNING: close $path fail: $!\n";
 
 	return TRUE;
 }