ccc-count-undos: declare str (doesnae fix bug though)

1 files changed, 1 insertions, 1 deletions

diff --git a/ccc/ccc.el b/ccc/ccc.el
index 81754b00..d9d43aac 100644
--- a/ccc/ccc.el
+++ b/ccc/ccc.el
@@ -102,7 +102,7 @@
   (let
       ((count-ccc 0) 
        (count-casl 0)
-       casl)
+       casl str)
     (while span
       (setq str (span-property span 'cmd))
       (cond ((eq (span-property span 'type) 'vanilla)