From 6f94fbb0c12c6cae309c752b6556f69c9df96dc5 Mon Sep 17 00:00:00 2001 From: tusharhero Date: Thu, 7 Mar 2024 11:04:27 +0530 Subject: [PATCH 1/2] Fix incorrect pcase pattern. --- pet.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/pet.el b/pet.el index 5ae3548..f9e3c1e 100644 --- a/pet.el +++ b/pet.el @@ -289,7 +289,7 @@ If the file was deleted or renamed, remove the file's watcher, and delete the file entry from CACHE-VAR and `pet-watched-config-files'." (lambda (event) - (pcase-let ((`(,_ ,action ,file ,@_) event)) + (pcase-let ((`(,_ ,action ,file) event)) (pcase action ((or 'deleted 'renamed) (file-notify-rm-watch (assoc-default file pet-watched-config-files)) From 530709d8ead91936d0ba8aaf37671e15531e0707 Mon Sep 17 00:00:00 2001 From: tusharhero Date: Sat, 9 Mar 2024 15:54:10 +0530 Subject: [PATCH 2/2] correct pcase --- pet.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/pet.el b/pet.el index f9e3c1e..6fbf68a 100644 --- a/pet.el +++ b/pet.el @@ -289,7 +289,7 @@ If the file was deleted or renamed, remove the file's watcher, and delete the file entry from CACHE-VAR and `pet-watched-config-files'." (lambda (event) - (pcase-let ((`(,_ ,action ,file) event)) + (pcase-let ((`(,_ ,action ,file . ,_) event)) (pcase action ((or 'deleted 'renamed) (file-notify-rm-watch (assoc-default file pet-watched-config-files))