From: Olof-Joachim Frahm Date: Sat, 9 Feb 2013 15:36:24 +0000 (+0100) Subject: Fix example with more efficient version. X-Git-Url: http://repo.macrolet.net/gitweb/?p=cl-inotify.git;a=commitdiff_plain;h=380091232fce38d01de465e91842a7961c709715 Fix example with more efficient version. --- diff --git a/README.md b/README.md index c26fe8e..cd2a5aa 100644 --- a/README.md +++ b/README.md @@ -29,7 +29,8 @@ Macros make keeping track easier, so the following example is straightforward: > (with-inotify (inotify T ("." :all-events)) - > (loop (format T "~{~A~%~}" (next-events inotify)))) + > (do-events (event inotify :blocking-p T) + > (format T "~A~%" event))) > => > #S(CL-INOTIFY::INOTIFY-EVENT :WD 1 :MASK (CREATE) :COOKIE 0 :NAME .zshist.LOCK) > #S(CL-INOTIFY::INOTIFY-EVENT :WD 1 :MASK (OPEN) :COOKIE 0 :NAME .zshist)