From 150141065349450c4f8126d4c41aed5ed97b54b4 Mon Sep 17 00:00:00 2001
From: Brandon Adams <emidln@gmail.com>
Date: Fri, 27 Jan 2017 09:29:31 -0600
Subject: [PATCH] avoid throwing inside `clojure-match-next-def` on 0 arity
 forms

Fixes #423
---
 CHANGELOG.md    | 4 ++++
 clojure-mode.el | 4 +++-
 2 files changed, 7 insertions(+), 1 deletion(-)

diff --git a/CHANGELOG.md b/CHANGELOG.md
index 3d795cfc..801fa4ca 100644
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -2,6 +2,10 @@
 
 ## master (unreleased)
 
+### Bugs fixed
+
+* Make `clojure-match-next-def` more robust against zero-arity def-like forms.
+
 ### New features
 
 * New interactive command `clojure-cycle-when`.
diff --git a/clojure-mode.el b/clojure-mode.el
index b8c1282b..228d4f56 100644
--- a/clojure-mode.el
+++ b/clojure-mode.el
@@ -664,7 +664,9 @@ Called by `imenu--generic-function'."
         (down-list)
         (forward-sexp)
         (while (not found?)
-          (forward-sexp)
+          (condition-case nil
+              (forward-sexp)
+            (error nil))
           (or (if (char-equal ?[ (char-after (point)))
                               (backward-sexp))
                   (if (char-equal ?) (char-after (point)))