diff options
author | Clément Pit-Claudel <clement.pitclaudel@live.com> | 2018-12-15 17:08:37 -0500 |
---|---|---|
committer | Clément Pit-Claudel <clement.pitclaudel@live.com> | 2018-12-15 17:08:37 -0500 |
commit | 2ab20374892220cc0979a7999026da98ecf9b4c1 (patch) | |
tree | 4f2d7b6c75fedb77cd557d684aa0adfc05bb42f3 /generic/proof-depends.el | |
parent | 7b37ce02a548eff9d97d504edaaf8075ebd236c7 (diff) |
Prepend cl- to more c[ad]+r instances
Diffstat (limited to 'generic/proof-depends.el')
-rw-r--r-- | generic/proof-depends.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/generic/proof-depends.el b/generic/proof-depends.el index 9f3b469a..372ce06b 100644 --- a/generic/proof-depends.el +++ b/generic/proof-depends.el @@ -241,7 +241,7 @@ This is simply to display the dependency somehow." (defun proof-highlight-depcs (name nmspans) (let ((helpmsg (concat "This item is a dependency (ancestor) of " name))) (while nmspans - (let ((span (cadar nmspans))) + (let ((span (cl-cadar nmspans))) (proof-depends-save-old-face span) (span-set-property span 'face 'proof-highlight-dependency-face) ;; (span-set-property span 'priority pg-dep-span-priority) @@ -252,7 +252,7 @@ This is simply to display the dependency somehow." (defun proof-highlight-depts (name nmspans) (let ((helpmsg (concat "This item depends on (is a child of) " name))) (while nmspans - (let ((span (cadar nmspans))) + (let ((span (cl-cadar nmspans))) (proof-depends-save-old-face span) (span-set-property span 'face 'proof-highlight-dependent-face) ;; (span-set-property span 'priority pg-dep-span-priority) |