Standardize naming of repl handler commands

This commit is contained in:
Henrik Lissner 2019-10-07 14:08:58 -04:00
parent 01fa9ec169
commit 11a6c03d69
No known key found for this signature in database
GPG key ID: 5F6C0EA160557395
6 changed files with 6 additions and 6 deletions

View file

@ -1,7 +1,7 @@
;;; lang/scheme/autoload.el -*- lexical-binding: t; -*-
;;;###autoload
(defun +scheme/repl (&optional arg)
(defun +scheme/open-repl (&optional arg)
"Open the Scheme REPL."
(interactive "P")
(switch-to-geiser arg)

View file

@ -11,7 +11,7 @@
(unless (featurep! :lang racket)
(push 'racket geiser-active-implementations))
(after! scheme ; built-in
(set-repl-handler! 'scheme-mode '+scheme/repl)
(set-repl-handler! 'scheme-mode '+scheme/open-repl)
(set-eval-handler! 'scheme-mode #'geiser-eval-region)
(set-lookup-handlers! 'scheme-mode
:definition #'geiser-edit-symbol-at-point