branch: scratch/el-mock commit 50840459891f4206e00739b19e2f3e7135a92185 Author: Antoine R. Dumont (@ardumont) <antoine.romain.dum...@gmail.com> Commit: Antoine R. Dumont (@ardumont) <antoine.romain.dum...@gmail.com>
Fix incf function symbol to cl-incf Using directly the cl-incf symbol from the already required cl-lib library seems more appropriate than requiring the 'cl library (which aliases that incf symbol with cl-incf). Related #18 --- el-mock.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/el-mock.el b/el-mock.el index 47de237d56..bb95d1e27b 100644 --- a/el-mock.el +++ b/el-mock.el @@ -94,7 +94,7 @@ (put funcsym 'mock-call-count 0) (fset funcsym `(lambda (&rest actual-args) - (incf (get ',funcsym 'mock-call-count)) + (cl-incf (get ',funcsym 'mock-call-count)) (add-to-list 'mock-verify-list (list ',funcsym ',(cdr func-spec) actual-args ,times)) ,value))))))