(def cc (ev/thread-chan 99)) # Sets up a message channel. (def ww (filewatch/new cc)) # Creates the watcher. (filewatch/add ww "ftest.janet" :all) # File to watch. (filewatch/listen ww) # Start filewatcher listening for changes. (ev/spawn-thread # Spawn thread to catch change events. (print "Waiting...") (forever (pp (ev/take cc))))