Skip to content

Commit 9aea501

Browse files
p4v4nbbatsov
authored andcommitted
Replace beginning-of-defun fn
1 parent b153e51 commit 9aea501

File tree

2 files changed

+2
-1
lines changed

2 files changed

+2
-1
lines changed

CHANGELOG.md

+1
Original file line numberDiff line numberDiff line change
@@ -1,6 +1,7 @@
11
# Changelog
22

33
## master (unreleased)
4+
* Improve support for multiple forms in the same line by replacing beginning-of-defun fn.
45
* [#202](https://github.com/clojure-emacs/inf-clojure/issues/202): Add ClojureCLR support.
56
* [#204](https://github.com/clojure-emacs/inf-clojure/issues/204): Scroll repl buffer on insert commands
67
* [#208](https://github.com/clojure-emacs/inf-clojure/pull/208) Display message after setting repl.

inf-clojure.el

+1-1
Original file line numberDiff line numberDiff line change
@@ -1018,7 +1018,7 @@ current defun else return the string.."
10181018
(let ((end (point))
10191019
(case-fold-search t)
10201020
(func (if bounds #'cons #'buffer-substring-no-properties)))
1021-
(beginning-of-defun)
1021+
(beginning-of-defun-raw)
10221022
(funcall func (point) end))))
10231023

10241024
(defun inf-clojure-eval-defun (&optional and-go)

0 commit comments

Comments
 (0)