emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[nongnu] elpa/geiser-racket 42376b7 189/191: unused variables


From: Philip Kaludercic
Subject: [nongnu] elpa/geiser-racket 42376b7 189/191: unused variables
Date: Sun, 1 Aug 2021 18:32:26 -0400 (EDT)

branch: elpa/geiser-racket
commit 42376b74ae0ad84d02c26560dfd9181493dcccd7
Author: jao <jao@gnu.org>
Commit: jao <jao@gnu.org>

    unused variables
---
 geiser-racket.el | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/geiser-racket.el b/geiser-racket.el
index 049d0bb..fbacffc 100644
--- a/geiser-racket.el
+++ b/geiser-racket.el
@@ -203,8 +203,8 @@ using start-geiser, a procedure in the geiser/server 
module."
         ((stringp module) (make-symbol module))
         (t nil)))
 
-(defun geiser-racket--symbol-begin (module)
-  "Position of the beginning of MODULE's declaration."
+(defun geiser-racket--symbol-begin (_module)
+  "Position of the beginning of a symbol."
   (save-excursion (skip-syntax-backward "^'-()>") (point)))
 
 (defun geiser-racket--import-command (module)
@@ -267,8 +267,8 @@ using start-geiser, a procedure in the geiser/server 
module."
     (while (re-search-forward geiser-racket--geiser-file-rx nil t)
       (kill-whole-line))))
 
-(defun geiser-racket--display-error (module key msg)
-  "Display an error returned from an evaluation with the given MODULE, KEY and 
MSG."
+(defun geiser-racket--display-error (_module key msg)
+  "Display an error returned from an evaluation with the given KEY and MSG."
   (when key
     (insert "Error: ")
     (geiser-doc--insert-button key nil 'racket)
@@ -402,8 +402,8 @@ using start-geiser, a procedure in the geiser/server 
module."
 
 (defvar geiser-racket--image-cache-dir nil)
 
-(defun geiser-racket--startup (remote)
-  "Start the Racket REPL, which is perhaps REMOTE."
+(defun geiser-racket--startup (_remote)
+  "Start the Racket REPL."
   (set (make-local-variable 'compilation-error-regexp-alist)
        `(("^ *\\([^:(\t\n]+\\):\\([0-9]+\\):\\([0-9]+\\):" 1 2 3)))
   (compilation-setup t)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]