From 2ab20374892220cc0979a7999026da98ecf9b4c1 Mon Sep 17 00:00:00 2001 From: Clément Pit-Claudel Date: Sat, 15 Dec 2018 17:08:37 -0500 Subject: Prepend cl- to more c[ad]+r instances --- coq/coq.el | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'coq') diff --git a/coq/coq.el b/coq/coq.el index c7163769..c7aa4b22 100644 --- a/coq/coq.el +++ b/coq/coq.el @@ -1454,8 +1454,8 @@ Maintained by a hook in `proof-shell-handle-delayed-output-hook'.") (begcross (car positions)) (beghypname (cadr positions)) (endhypname (cl-caddr positions)) - (beg (cadddr positions)) - (end (cadddr (cdr positions)))) + (beg (cl-cadddr positions)) + (end (cl-cadddr (cdr positions)))) (let ((hypnameov (coq-make-hypname-overlay beghypname endhypname fstname buf)) (hypov (coq-make-hyp-overlay beg end fstname buf)) (crosshypov (coq-make-hypcross-overlay begcross (+ 1 begcross) fstname buf)) -- cgit v1.2.3