Skip to content

Commit 71a8093

Browse files
committed
[Fix #443] Don't consider #? as starting non-logical sexp
1 parent 5d0b53a commit 71a8093

File tree

2 files changed

+2
-2
lines changed

2 files changed

+2
-2
lines changed

CHANGELOG.md

+1
Original file line numberDiff line numberDiff line change
@@ -5,6 +5,7 @@
55
### Bugs fixed
66

77
* Fix fill-paragraph in multi-line comments.
8+
* [#443](https://github.com/clojure-emacs/clojure-mode/issues/443): Fix behavior of `clojure-forward-logical-sexp` and `clojure-backward-logical-sexp` with conditional macros.
89
* [#429](https://github.com/clojure-emacs/clojure-mode/issues/429): Fix a bug causing last occurrence of expression sometimes is not replaced when using `move-to-let`.
910
* [#423](https://github.com/clojure-emacs/clojure-mode/issues/423): Make `clojure-match-next-def` more robust against zero-arity def-like forms.
1011

clojure-mode.el

+1-2
Original file line numberDiff line numberDiff line change
@@ -1767,11 +1767,10 @@ Returns a list pair, e.g. (\"defn\" \"abc\") or (\"deftest\" \"some-test\")."
17671767
;;; Sexp navigation
17681768
(defun clojure--looking-at-non-logical-sexp ()
17691769
"Return non-nil if text after point is \"non-logical\" sexp.
1770-
17711770
\"Non-logical\" sexp are ^metadata and #reader.macros."
17721771
(comment-normalize-vars)
17731772
(comment-forward (point-max))
1774-
(looking-at-p "\\^\\|#[?[:alpha:]]"))
1773+
(looking-at-p "\\^\\|#[[:alpha:]]"))
17751774

17761775
(defun clojure-forward-logical-sexp (&optional n)
17771776
"Move forward N logical sexps.

0 commit comments

Comments
 (0)