;;; -*- lexical-binding: t -*-
;;
;; this file:
;;   https://dataswamp.org/~incal/emacs-init/count.el

(require 'seq)

(defalias 'count-region #'count-words-region)

(defun count-char-in-string (char str)
  (seq-count (lambda (c) (= c char)) str) )

;; (count-char-in-string ?a "Emacs skills kills") ; 1

(provide 'count)