aboutsummaryrefslogtreecommitdiffhomepage
diff options
context:
space:
mode:
-rw-r--r--coq/coq-smie.el4
1 files changed, 3 insertions, 1 deletions
diff --git a/coq/coq-smie.el b/coq/coq-smie.el
index 14bf6b87..57363a6f 100644
--- a/coq/coq-smie.el
+++ b/coq/coq-smie.el
@@ -431,7 +431,9 @@ The point should be at the beginning of the command name."
(defun coq-smie-backward-token ()
- (let ((tok (smie-default-backward-token)))
+ (let* ((tok (smie-default-backward-token))
+ (start (save-excursion (coq-find-real-start) (point)))
+ (is-tactic (coq-smie-is-tactic)))
(cond
;; Distinguish between "," from quantification and other uses of
;; "," (tuples, tactic arguments)