          (compilation-buffer-name-function
           'saw-script--compilation-buffer-name-function)
          (default-directory dir) )
-    (let ((compilation-finish-functions (list (lambda (x) (message "Done!")))))
+    (let ((compilation-finish-functions (list (lambda (_x) (message "Done!")))))
       (compile command))))
 
 (defun saw-script-run-buffer (buffer)

    :command ("saw" "--output-locations" source-inplace)
    :error-parser saw-script--flycheck-parse
    :modes (saw-script-mode))
  (add-to-list 'flycheck-checkers 'saw-script))


;;; The mode itself

      (concat (substring str 0 117) "...")
    str))

(with-eval-after-load 'flycheck
  (flycheck-define-checker saw-script
    "A checker for SAWScript.
