From d48b4997c7d53211749f0bebed828930fd0167ec Mon Sep 17 00:00:00 2001
From: Hektor Misplon <hektor.misplon@pm.me>
Date: Sun, 21 Aug 2022 11:02:29 +0200
Subject: [PATCH] Remove old R5RS REPL support

---
 .vim/ftplugin/scheme/icp1.vim | 31 -------------------------------
 1 file changed, 31 deletions(-)
 delete mode 100644 .vim/ftplugin/scheme/icp1.vim

diff --git a/.vim/ftplugin/scheme/icp1.vim b/.vim/ftplugin/scheme/icp1.vim
deleted file mode 100644
index 851fbe7..0000000
--- a/.vim/ftplugin/scheme/icp1.vim
+++ /dev/null
@@ -1,31 +0,0 @@
-"
-" Originally from:
-" https://github.com/ward/dotfiles/blob/master/vim/ftplugin/scheme/icp1.vim
-"
-
-fu! s:OpenR5RS(path)
-  let prelude = [
-        \ "(#%require xrepl)",
-        \ "(load \"" . a:path . "\")",
-        \ "\<CR>"
-        \ ]->join("")
-  let s:term = term_start("plt-r5rs --no-prim", {"term_finish": "close", "vertical": 1})
-  call term_sendkeys("", prelude)
-endfu
-
-fu! s:GetVisualSelection()
-  try
-    let a_save = @a
-    normal! gv"ay
-    return @a
-  finally
-    let @a = a_save
-  endtry
-endfu
-
-fu! s:SendR5RSkeys()
-  call term_sendkeys(s:term, s:GetVisualSelection())
-endfu
-
-nnoremap <buffer> <leader>o :call <sid>OpenR5RS(@%)<cr>
-vnoremap <buffer> <leader>r <esc>:call <sid>SendR5RSkeys()<cr>