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))))))

Reply via email to