Don't crash if file doesn't exist

This commit is contained in:
prpr 2023-05-28 19:21:06 +01:00
parent b24ade080f
commit 0ab8fb125d
1 changed files with 2 additions and 0 deletions

View File

@ -28,6 +28,8 @@ if {![exists -proc _del_bindir]} {
proc safe_delete {file {px ""}} {
global _del_dustbin
if {![file exists $file]} return 1
# Check if undelete is installed and that the file being
# deleted is not already in the dustbin.
set dustbin 1