5 files changed, 8 insertions(+), 6 deletions(-)

M fennels.fnl
M handlers.fnl
M irc.fnl
M main.fnl
M makefile

@@ 1,4 1,4 @@
-(local {: view &as fennel} (require :fennel))
+(local {: view} (require :fennel))
 (local unpack (or table.unpack _G.unpack))
 
 (local versions {})

@@ 36,7 36,7 @@
         ;; one day
         (jam-date date (+ time (* 60 60 24))))))
 
-(fn jam [a b {: caps}]
+(fn jam [_ _ {: caps}]
   (.. "The next lisp game jam starts on "
       (jam-date caps.os.date (caps.os.time)) "."))
 

@@ 43,7 43,7 @@
 
 ;; commands are like protocol-level handlers, whereas the handlers
 ;; module is for application-level handlers.
-(fn irc.commands.ping [conn prefix rest] (irc.pong conn rest))
+(fn irc.commands.ping [conn _prefix rest] (irc.pong conn rest))
 
 (fn comma-input? [conn chan msg]
   (and (msg:find "^,") (= chan (. conn.channels 1))))


@@ 74,7 74,7 @@
                         (irc.privmsg conn chan (.. "Error: " err)))))))
 
 ;; after you've identified and are properly connected
-(fn join-handler [conn prefix rest]
+(fn join-handler [conn _prefix _rest]
   (print "Connected!")
   (each [_ channel (ipairs conn.channels)]
     (let [channel (if (channel:find "^#")

@@ 30,7 30,6 @@
 ;; versions!
 
 (local arg arg)
-(local setfenv _G.setfenv)
 (local old-preload (collect [k (pairs package.preload)] (values k true)))
 (local _ENV (capabilities.env))
 (include :pengbot)

@@ 50,4 50,7 @@ clean:
 	make -C luasocket clean
 	make -C lua-$(LUA_VERSION) clean
 
-.PHONY: run update-fennel clean
+check:
+	fennel-ls --check $(SRC)
+
+.PHONY: run update-fennel clean check