summaryrefslogtreecommitdiff
path: root/elisp/geiser-mode.el
diff options
context:
space:
mode:
authorjao <jao@gnu.org>2022-01-18 23:39:36 +0000
committerjao <jao@gnu.org>2022-01-18 23:41:05 +0000
commit0f2cb17dd6cad1eb5c1447a1b5f80c933309a153 (patch)
tree87dce73747c99509959fd1148f2eeaa2a6193735 /elisp/geiser-mode.el
parente204771601e5c985bb0d6b373666be4bc22582f9 (diff)
downloadgeiser-0f2cb17dd6cad1eb5c1447a1b5f80c933309a153.tar.gz
geiser-0f2cb17dd6cad1eb5c1447a1b5f80c933309a153.tar.bz2
Make C-u C-x C-e work again (fixes #33)
Diffstat (limited to 'elisp/geiser-mode.el')
-rw-r--r--elisp/geiser-mode.el3
1 files changed, 2 insertions, 1 deletions
diff --git a/elisp/geiser-mode.el b/elisp/geiser-mode.el
index 9ea4d60..a7f49a1 100644
--- a/elisp/geiser-mode.el
+++ b/elisp/geiser-mode.el
@@ -1,6 +1,6 @@
;;; geiser-mode.el -- minor mode for scheme buffers
-;; Copyright (C) 2009, 2010, 2011, 2012, 2013, 2014, 2015, 2016, 2017, 2020 Jose Antonio Ortega Ruiz
+;; Copyright (C) 2009, 2010, 2011, 2012, 2013, 2014, 2015, 2016, 2017, 2020, 2022 Jose Antonio Ortega Ruiz
;; This program is free software; you can redistribute it and/or
;; modify it under the terms of the Modified BSD License. You should
@@ -194,6 +194,7 @@ With a prefix, revert the effect of `geiser-mode-eval-last-sexp-to-buffer' "
nil
t
print-to-buffer-p)))
+ (ret (geiser-wait-eval ret 30))
(err (geiser-eval--retort-error ret))
(will-eval-to-buffer (if print-to-buffer-p
(not geiser-mode-eval-last-sexp-to-buffer)