From a198d2600d5fa9c99d85ac7c27cd9e82a4bea9ec Mon Sep 17 00:00:00 2001 From: Olof-Joachim Frahm Date: Sat, 9 Feb 2013 16:35:11 +0100 Subject: [PATCH] Discard return values of watch functions. --- inotify.lisp | 2 ++ 1 file changed, 2 insertions(+) diff --git a/inotify.lisp b/inotify.lisp index 9319295..0e27e6e 100644 --- a/inotify.lisp +++ b/inotify.lisp @@ -404,6 +404,7 @@ instead. Useful if you need to monitor just a fixed set of paths." ,.(mapcar (lambda (specifier) `(watch-raw ,inotify ,@specifier)) rest) + (values) ,@body) (close-inotify ,inotify)))) @@ -422,5 +423,6 @@ UNWATCH calls on all WATCHed paths." ,.(mapcar (lambda (specifier) `(watch ,inotify ,@specifier)) rest) + (values) ,@body) (close-inotify ,inotify)))) -- 1.7.10.4