From 8886f6672f56846cedbebd0da9c3498e87a904d5 Mon Sep 17 00:00:00 2001 From: Konstantin Kharlamov Date: Wed, 5 Mar 2025 19:20:07 +0300 Subject: [PATCH] Fix "unused arg" warning in `purescript-presentation-mode` MIME-Version: 1.0 Content-Type: text/plain; charset=UTF-8 Content-Transfer-Encoding: 8bit I'm not sure if the mode is even useful in Purescript because I'm not exactly clear what it does (keep in mind this code was part of haskell-mode before fork happened), but let's for now at least make sure it doesn't produce warning and is included in compilation. Fixes warning: purescript-presentation-mode.el:38:33: Error: Unused lexical argument ‘session’ --- Makefile | 1 + purescript-presentation-mode.el | 2 +- 2 files changed, 2 insertions(+), 1 deletion(-) diff --git a/Makefile b/Makefile index 03a7e1e..3740ef0 100644 --- a/Makefile +++ b/Makefile @@ -16,6 +16,7 @@ ELFILES = \ purescript-mode.el \ purescript-move-nested.el \ purescript-navigate-imports.el \ + purescript-presentation-mode.el \ purescript-simple-indent.el \ purescript-sort-imports.el \ purescript-str.el \ diff --git a/purescript-presentation-mode.el b/purescript-presentation-mode.el index 1a8fa9b..8dcd86c 100644 --- a/purescript-presentation-mode.el +++ b/purescript-presentation-mode.el @@ -35,7 +35,7 @@ (define-key purescript-presentation-mode-map (kbd "q") 'quit-window) -(defun purescript-present (name session code) +(defun purescript-present (name _ code) "Present CODE in a popup buffer suffixed with NAME and set SESSION as the current purescript-session." (let* ((name (format "*PureScript Presentation%s*" name))